for (my $i = 0; $i < 100; $i += 0.1) { say $i; }