That is perfect. I like the way you've saved the value of the outer key map { my $key=$_; map... and used that in the inner query.