File::Sort, but is there an Array::Sort?

Saved has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: File::Sort, but is there an Array::Sort? by Corion (Patriarch) on Jul 28, 2011 at 18:51 UTC
Have you looked at sort?	[reply]
Re^2: File::Sort, but is there an Array::Sort? by Saved (Beadle) on Jul 28, 2011 at 18:58 UTC
Yes, but having a UNIX background, I was hoping to use something more like UNIX sort to sort multi fields.	[reply]
Re^3: File::Sort, but is there an Array::Sort? by Corion (Patriarch) on Jul 28, 2011 at 19:03 UTC
Also see perlfaq4 on How do I sort an array by (anything)?. I don't see a module making this much easier/better.	[reply]
Re: File::Sort, but is there an Array::Sort? by zentara (Cardinal) on Jul 28, 2011 at 19:06 UTC
See Sorting Alphanumeric Arrays I'm not really a human, but I play one on earth. Old Perl Programmer Haiku ................... flash japh	[reply]
Re^2: File::Sort, but is there an Array::Sort? by Saved (Beadle) on Jul 28, 2011 at 19:34 UTC
Thank You.	[reply]
Re: File::Sort, but is there an Array::Sort? by toolic (Bishop) on Jul 28, 2011 at 18:56 UTC
A simple search of CPAN turns up Sort::Array as its first item.	[reply]
Re^2: File::Sort, but is there an Array::Sort? by Saved (Beadle) on Jul 28, 2011 at 19:08 UTC
Good for one field sorts, but it does not appear to handle multi	[reply]
Re: File::Sort, but is there an Array::Sort? by salva (Canon) on Jul 29, 2011 at 07:25 UTC
Use Sort::Maker or Sort::Key.	[reply]
Re: File::Sort, but is there an Array::Sort? by Khen1950fx (Canon) on Jul 29, 2011 at 07:13 UTC
Here's a multi-field sort. What I did was to reverse the 2nd field using Sort::Fields. It's flexible. Give it try: #!/usr/local/bin/perl use strict; use warnings; use Sort::Fields qw(fieldsort); use Data::Dumper::Concise; my(@data) = <DATA>; my @sorted_data = fieldsort [1, -2], @data; foreach my $sorted_data(@sorted_data) { print $sorted_data; } __DATA__ 0 a 1 -4.5 0 a 2 -2.5 0 b 3 1e2 1 b 4 123456 1 b 5 1e3 1 b 6 2e5 0 b 7 .00001 0 a 8 .00002 1 a 9 -.234e2 1 b 10 1e-1 0 a 12 1e-2 0 a 13 .123 0 a 14 .234 0 b 15 1.234 0 a 16 12345.6789 1 a 17 12345.6788 1 a 18 12345.6787 1 a 19 -2222 0 b 20 -2223 0 b 21 -1e1 1 b 22 -1e-1 1 b 23 -2e2 0 b 24 -2e-2 0 b 25 -3e3 0 b 26 -3e-3 0 b 27 123345.123234 0 a 28 123345.123235 0 a 29 123345.123233 0 a 30 -4.6 0 b 31 -4.7 0 b 32 -4.8 1 b 33 -4.5e1 1 a 34 1.23 1 a 35 2.345 1 b 36 345.456 1 a 37 45678.67567 0 b 38 23423422.34234234 1 a 39 123124123 [download] Note: the minus sign in `[1,-2]` means reverse order. Ascending order would be a positive number. You can choose ascending order or reverse order for any of the 4 fields. And you can have as many fields as necessary.	[reply] [d/l] [select]