$,=$";print unpack'w*','1%(|m!'