for (0..69) (
   my $x = ( 80 - $_ ) / 100;
   say $x;
}