... test: expr(s) /^\Z/ { my %hash; @hash{keys %$_} = values %$_ for @{$item{"expr(s)"}}; return \%hash; } ...