Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Dynamic sort algorithm selection

by Sentinel (Initiate)
on Nov 15, 2000 at 05:27 UTC ( [id://41693] : perlquestion . print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    sub firstname_descending {
      $data{$b}{'FirstName'} cmp $data{$a}{'FirstName'};
    }