Orpheus — Wed, 22 Dec 1999 01:09:00 +0000

thanks a lot, that worked great

japhy — Tue, 21 Dec 1999 22:46:00 +0000

Ugh, why do so many people use the pipe sign as an element separator? Sigh...

Anyway, here's how I'd do it, using a Schwartzian Transform (read "Effective Perl Programming" to find out more about these time saving structures):

Code Sample:
@sorted = map { join "|", @$_ } sort { $b->[1] <=> $a->[1] } map { [ split /\|/ ] } @list;

To learn about each of the individual segments, read up on: map(), sort(), split(), join(), and the perlref documentation for information on references.

------------------
--
MIDN 4/C PINYAN, NROTCURPI, US Naval Reserve