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