How to sort Array with hashref Elements and custom search function (gelöst) - #147764 (Allgemeines zu Perl)

rosti

2011-04-14 18:37

User since
2011-03-19
3492 Artikel
BenutzerIn

Quote
Can anybody enlighten me?

Later?

Please take a little look at my Solution

Code (perl): (dl )

use strict;
use warnings;
use Data::Dump qw(dump);


#my @t = ( {'b','1','w','10'},{'b','3','w','30'},{'b','2','w','40'});
# at first, making hash readable as such
my @t = ( {'b' => '1','w' => '10'},{'b' => '3','w' =>'30'},{'b' => '2','w' => '40'});
# consider issue: the value in key 'b' is numeric, use spaceship '<=>' for compare

# transform by Randal Schwartz
@t = 
        map{$_->[0]}
        sort{$a->[1] <=> $b->[1]}
        map{ [$_, $_->{b}] }@t;

print dump \@t;