perl -wle'@a = sort { print "$a <=> $b"; $a <=> $b } 2, 3, "nan";
print "\@a = @a";'
2 <=> 3
2 <=> nan
Sort subroutine didn't return a numeric value at -e line 1.