Change the split criteria to remove whitespace as well. Building on davorg's code:
my @sorted_list = map { $_->[0] } sort { $a->[1] cmp $b->[1] or $a->[2] cmp $b->[2] } map { [ $_, (split /\t\s*/)[3,4] ] } @database_in;
Blessed Be
The Pixel
In reply to Re: Re: Re: Sort Question (Again) :(
by pixel
in thread Sort Question (Again) :(
by LostS
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |