DB<5> $s = q/"foo:bar","test:boing!","whirrr:clunk"/; DB<6> %hsh = split /[:,]/, $s; ## do both the required splits in one step DB<7> x %hsh 0 '"whirrr' 1 'clunk"' 2 '"foo' 3 'bar"' 4 '"test' 5 'boing!"'