Thread Arrays nach einem Wert sortieren (3 answers)
Opened by Gast at 2007-08-02 00:24

sid burn
 2007-08-02 02:08
#97194 #97194
User since
2006-03-29
1520 Artikel
BenutzerIn

user image
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

#!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;
use utf8;

my @array = (
    [ qw/ david raab 24 3 /    ],
    [ qw/ anne schmidt 23 1/   ],
    [ qw/ manuel montero 24 2/ ],
);

@array = sort { $a->[3] <=>  $b->[3] } @array;

print Dumper \@array;


Das Sortiert nach dem vierten Feld die Ausgabe so das die ausgabe folgendermaßen ist.

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
$VAR1 = [
          [
            'anne',
            'schmidt',
            '23',
            1
          ],
          [
            'manuel',
            'montero',
            '24',
            2
          ],
          [
            'david',
            'raab',
            '24',
            3
          ]
        ];


Ich hoffe du verstehst das Beispiel. So wie du Codest könnte ich mir Vorstellen das du noch keine Referenzen kennst?

Wenn die Reihenfolge vertauscht werden soll, muss nur $a und $b ausgetauscht werden.
Nicht mehr aktiv. Bei Kontakt: ICQ: 404181669 E-Mail: perl@david-raab.de

View full thread Arrays nach einem Wert sortieren