my @sorted = sort{ $a <=> $b } @names;