C:\@Work\Perl>perl -we "print oct do { local $\" = ''; qq(0b@ARGV) }" 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2147483648 C:\@Work\Perl>perl -we "print oct do { local $\" = ''; qq(0b@ARGV) }" 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 2147483647 C:\@Work\Perl>perl -we "print oct do { local $\" = ''; qq(0b@ARGV) }" 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 2147483649 C:\@Work\Perl>perl -we "print oct do { local $\" = ''; qq(0b@ARGV) }" 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 C:\@Work\Perl>perl -we "print oct do { local $\" = ''; qq(0b@ARGV) }" 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
In reply to Re: unpack(pack(join simplification
by Anonymous Monk
in thread unpack(pack(join simplification
by JSlice
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |