The internal perl sort command can be used to sort numerically:

@sorted_list = sort {$a<=>$b} @unsorted_list
[download]

The <=> operator returns 0 if the two numbers are equal, -1 if $a<$b and 1 if $a>$b. Hope that helps.