Select Code to Download

###############################
# try to sort fields as numbers first, then as strings
...
  }
  return $a cmp $b;
}

sub smart_sort
{
...
  # can't decide by fields, decide by whole string
  return $a cmp $b;
}