Select Code to Download

use strict;
use warnings;
...
# ...initial spaces in column 2!
@sorted = fieldsort( ['2n'], @data2);
print STDERR "Second sorted DUMP:\n", Dumper(\@sorted), "\n";