Select Code to Download

for(my $x = 0; $x <= 0.1; $x += 0.001){
     print "$x\n";
}

0
0.001
...
0.07200000000000001 (????)
0.07300000000000001 (????)
.....