It looks like you might not be sorting what you think you're sorting... you're sorting based on the entire line. Do you mean to sort on a specific column? If so, then change

sort { $b->[0] cmp $a->[0] }
[download]

to

sort { $b->[$i] cmp $a->[$i] }
[download]

where $i is the 1-based column number that you want to sort on.

I don't think that will keep it from being a memory hog, though...

-- Mike

--
just,my${.02}