How can I sort an array or table by column in Perl?

Question

I\'ve been looking everywhere for an answer to this, and I just can\'t get it to work.

I have an input file that is read into an array using Perl. The file is a text

Answer 1

You might also like the nsort_by function from List::UtilsBy:

use List::UtilsBy 'rev_nsort_by';

my @sorted = rev_nsort_by { (split(' ', $_))[4] } @input;