RosettaCodeData/Task/Associative-array-Creation/Perl-6/associative-array-creation-4.pl6

my $h = {key1 => 'val1', 'key-2' => 2, three => -238.83, 4 => 'val3'};
say $h<key1>;