$ perl -e '@names = (["Nan Tregar"], ["Sam Tregar"]); @names = sort { $a->[0] <=> $b->[0] } @names;'
Sort subroutine didn't return a numeric value at -e line 1.