sub binround { my $out = 1; my $in = shift; while ($in) { $in >>= 1; $out += $out; } $out; } [download]
In reply to Re (tilly) 1: Power of two round up. by tilly in thread Power of two round up. by boo_radley