$input = "name: jones location: ny";;

%query = map{ split ':\s+' } $input =~ m[(\S+:\s+\S+)]g;;

pp \%query;;
{ location => "ny", name => "jones" }

##</code><code>##

$input = "name: jones location: ny";;

%query = $input =~ m[(\S+):\s+(\S+)]g;;

pp \%query;;
{ location => "ny", name => "jones" }