pugs> my @good = <a b c>
("a", "b", "c")
pugs> @good Z 1 xx @good
(("a", 1), ("b", 1), ("c", 1))

##</code><code>##

# Perl 6:
my %hash = @good Z 1 xx @good