Help for this page
@sorted = sort { foo($a) cmp foo($b) } @unsorted;
@sorted = map { $_->[0] } sort { $a->[1] cmp $b->[1] } map { [$_, foo($_)] } @unsorted;
www.com | www.net | www.org
No recent polls found