for my $n (0..100) { $n /= 100; # do something with a number between 0.00 and 1.00 }