@sorted = map {$_->[0], ", "} sort {$a->[0] <=> $b->[0]} map {[$_, pack ("N*", $_)]} @unsorted;
For anyone who doesn't understand what the above code does, here are some nodes with explanations of the technique and some interesting discussion:
<list>-Matt
In reply to RE: RE: RE: Re: Sorting on Section Numbers
by DrManhattan
in thread Sorting on Section Numbers
by Zoogie
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |