Select Code to Download

No such pseudo-hash field "HASH(0x10a57c)" at ./listref line 22.

my $foo = [ {blah=>5,d=>1},
            {blah=>4,d=>2},
...

print join(',',map {$_->{blah}} @bar), $/;

my $foo = [ [5,1],
            [4,2],
...

my @bar = sort {$foo->{$a} cmp $foo->{$a} } @$foo;
# should be my @bar = sort {$a[0] cmp $b[0]} @$foo;