[Perl-unix-users] Sorting

[jna]

Hello List,   I have a datafile in the simple format of:   |2500|78|Marky| |3200|55|Johnny| |1988|10|Joey|   etc....   What I am trying to do is sort my display out so when the datafile is read in and then display to the screen as its read in it will show the entire entry with the largest first cell first and then descending. So the above would now be displayed as:   |3200|55|Johnny| |2500|78|Marky| |1988|10|Joey|   to the screen but not changing the actuall data file any.   I tried using the sort function but it isnt sorting by the first number bank? Is sort not the way to do this?   Thanks, John