Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

RE: Dynamic sort algorithm selection

by quidity (Pilgrim)
on Nov 15, 2000 at 05:42 UTC ( [id://41695] : note . print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    sub ascii {$a cmp $b}
    sub alpha {lc($a) cmp lc($b)}
    
    ...
    @sorted = sort $subname @a;
    
    print @sorted;