3:03 >perl -wE "my $iterations = 0; my $number = 192; while ($number != 0) { $number /= 2; ++$iterations; } say qq[$iterations iterations];"
1083 iterations

 3:06 >