Select Code to Download

#!/usr/local/bin/perl5 -w
use strict;
...
for (my $i = 20 ; $i >= 1 ; $i -= 1){
  printf "%f\n", $i/10;
}

2.000000
1.900000
...
0.300000
0.200000
0.100000