On 07.06.2011 23:01, Denis Ibaev wrote:
Только для неотрицательных и не очень больших: $ perl -le 'print unpack "%W*", join "", map chr, 1..3;' 6
Как-то так:[email protected]:~% perl -le 'print unpack("%32d*", pack "d*", (.5, .6, .7, -.2))'
1.6 -- Олег Алистратов -- Moscow.pm mailing list [email protected] | http://moscow.pm.org
