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