in reply to Effective sort method?

Sort numerically: 
sort { $a <=> $b } @sort

[download]

In Section Seekers of Perl Wisdom