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

Let's say I have the following array of arrays:

@array = (
        [ "array1name", "array1info", "array1num" ],
        [ "array2name", "array2info", "array2num" ],
        [ "array3name", "array3info", "array3num" ],
      );

[download]

Now, how can I sort the arrays within the array according to the value of 'array#num' in descending order.

Thanks in advance.

-- Zenon Zabinski

Replies are listed 'Best First'.
Re: Sorting Arrays
by nardo (Friar) on Jun 26, 2000 at 09:27 UTC 
    @sorted = sort {@{$b}[2] cmp @{$a}[2]} @array;

    [download]
[reply]
[d/l]
      Nope. You're using an array slice @x[$y] where you really want an element $x[$y]. And as pointed out elsewhere, you're using cmp where you want <=>.

      -- Randal L. Schwartz, Perl hacker

[reply]
[d/l]
[select]
      Thanks for the help. And now that I think about it, I probably should have got it on my own, but when I go into unchartered territory (functions that I have never used before), my brain freezes. Thanks again.

      -- zdog (Zenon Zabinski)
         Go Bells!! '¿'

[reply]
        if array#num is really a number, <=> might be a better option ... 
        @array = sort { $$a[2] <=> $$b[2] } @array;

        [download]
        --
        Greg McCarroll
        http://www.mccarroll.uklinux.net
[reply]
[d/l]
      Thanks for the tip. I used this to sort my array[][][]. I was able to sort my list by an object property as follows: 
      @memory_blocks = sort {hex(${$b}[0][0]->address) <=> hex(${$a}[0][0]->
+address)} @memory_blocks;

      [download]
      Hope that might help someone else who gets stuck. Thanks again!
[reply]
[d/l]
[select]

Back to Seekers of Perl Wisdom