for ( 1*10 .. 2*10 ) {
  my $x = $_/10;
  printf "%.16e\n", $x;
}