for (0..99) { my $i = $_/100; print("$i\n"); }