Nope, but what's wrong with

map { @{$_}{@b} } @h{@a}
map { $_->{$x}  } @h{@a}
[download]

They're both quite concise.