array nach beliebigen element sortieren (gelöst) - #157796 (Allgemeines zu Perl)

Alexander

2012-04-23 19:52

User since
2012-02-21
25 Artikel
BenutzerIn
[default_avatar]

Topeg hat recht, leider funktioniert seine Methode nicht

so sieht mein code aus, wobei GET usw das Wort bilden und die Scalare eine Zahl beinhalten

Code: (dl )

push (@request_unsorted,"GET: $get");
push (@request_unsorted,"POST: $post");
push (@request_unsorted,"HEAD: $head");
push (@request_unsorted,"OPTIONS: $option");

print FHR join("\n",@request_unsorted,"\n");

der Ausdruck ist dann so:
GET: 994
POST: 0
HEAD: 5
OPTIONS: 1

Ich würde gerne durch sortieren HEAD an zweite Stelle kriegen und dann OPTIONS usw.

Wenn ich das von Topeg probiere kommt folgendes raus:

Code: (dl )

push (@request_unsorted,["GET:","$get"]);
push (@request_unsorted,["POST:","$post"]);
push (@request_unsorted,["HEAD:","$head"]);
push (@request_unsorted,["OPTIONS:","$option"]);
my @request_sorted = sort{$a->[0] cmp $b->[0]}@request_unsorted;
print FHR join("\n",@request_sorted,"\n");

Und das Ergebnis sieht dann so aus:
ARRAY(0x20db18c)
ARRAY(0x20db1fc)
ARRAY(0x20db23c)
ARRAY(0x20db1bc)

Das zweite array sieht so aus

Code: (dl )

 push (@ip_und_counter, "$_: $counter_gesammt");

wobei hier $_ eine Zahl darstellt und $counter_gesammt");

128.101.35.183: 13
129.133.198.105: 24
129.42.184.35: 2
130.191.179.33: 3
130.208.136.10: 1
143.183.121.3: 3
159.134.136.104: 16
165.21.154.103: 1
165.21.154.93: 1

Hier möchte ich gerne die ip nach den Treffern absteigend sortieren