$line =~ s/lon='(\d+\.\d+)/lon='$lon_new/;
      $line =~ s/lat='(\d+\.\d+)/lat='$lat_new/;