Select Code to Download

for (0..(5-1)/2) {  # 1..5, step 2
   my $i = $_*2 + 1;
   ...
}

>perl -le "for (my $i=0; $i<10; $i+=0.1) { print $i }"
...
...
9.7
9.8
9.9