Re^3: converting binary to decimal

[ysth]

You seem to be running an extremely old version of perl. Try changing it it:

(my $decimal = join '', map sprintf('%0*d', $size, $_), reverse @numbe
+r) =~ s/0+(?=.)//;