in reply to Smoothsort
my @sorted = sort {comparator($a,$b)} @unsorted; # fixed. [download]
www.com | www.net | www.org
No recent polls found