Help for this page
2 3 ... 8 12 ...
2 3 3 3 5 7 8 12 ...
my @data = split /\s+/,<$in>;
my @new_sort = sort_num (@data);