http://www.perlmonks.org?node_id=520508


in reply to Effective sort method?

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