my $val_str = join "\n" => @values; my @latitudes = $val_str =~ /(.*),/g; my @longitudes = $val_str =~ /,(.*)/g;