my @cities = $test =~ m/'(.*?)[|']/g;