Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re: Sorting Hashes of hashes

by kcott (Archbishop)
on Mar 06, 2012 at 16:28 UTC ( [id://958111] : note . print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/env perl
    
    ...
    
        map { print join(q{ } => @$_), qq{\n} } sort { $b->[3] <=> $a->[3]
    + } @record;
    }
    
  2. or download this
    dove-n mero head-n 0.541972342596793
    dove-n mero plume-n 0.164895598193776
    ...
    cockroach-n random-v land-v 0.0149882471117093
    cockroach-n random-v suggest-v 0.0148588863336517
    cockroach-n random-v guarantee-v 0.00591007188858908
    
  3. or download this
    ... sort { $a->[3] <=> $b->[3] } ...