in reply to for_list and sorting key/value hash pairs

for my ($k, $v) ( map { $_, $h{$_} } sort keys %h )

untested :)