http://qs321.pair.com?node_id=798162


in reply to Sort of anonymous hash

Schwartzian transform 

for my $d ( map { $_->[0] }
              sort { $a->[1] cmp $b->[1] }
                map { [ $_, $hash{$_}{desc} ] }
                  keys %hash )
{
   

}

[download]

In Section Seekers of Perl Wisdom