$lat =~ s/-?[\d.,]+/$new_lat/;
        $lon =~ s/-?[\d.,]+/$new_lon/;