use Data::Table;
my $t= Data::Table::fromCSV("data.csv");
$t->sort('exp', 0, 1); #Sort table by col 'exp', numeric, descending
print $t->csv;