To disable integer math within a block
#!/usr/bin/perl -w do { # Use integer math inside block only. no integer; for ($i = 0; $i < 10; $i++) { print "$i\n"; } }