$_->() for map @$_, values %HoL; #### $_->() for map @$_, @HoL{qw/ one two /}; #### @ret = map $_->(), map @$_, @HoL{qw/ one two /}; #### (\&hello, \&goodbye,) #### \(&hello, &goodbye,)