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

##</code><code>##

...
99.7999999999986
99.8999999999986
99.9999999999986

##</code><code>##

for (my $_ = 0*10; $_ < 100*10; ++$_) {
   my $i = $_/10;
   say $i;
}

##</code><code>##

...
99.7
99.8
99.9

##</code><code>##

for (0*10..100*10) {
   my $i = $_/10;
   say $i;
}

##</code><code>##

map $_/10, 0*10..100*10