for (49..54) { $x=2**$_; $y = $x + 1.1; print $_, "\t", $y-$x; } 49 1.125 50 1 51 1 52 1 53 2 54 0