Re^5: Sorting one column of results

[Anonymous Monk]

for my $line (sort { $a->[10] cmp $b->[10] } @out) {
    printf $OUT "%s\n%s\n" .
        "Quantity:%s\n\n%s\n%s\n%s\n%s\n%s\n%s\n%s\n%s\n\n\n",
        @$line[10..12],
        @$line[16..23];
}