Hallo an alle,
ich will den Inhalt eines Arrays(aus einer Datei):
nach der 2.Spalte aufsteigend sortieren, verucht hab ich das so:
input:
R43              R0402            14662         2387
C35              C0402            19424         475
C36              C0402            19552         3092
R42              R0402            14800         2685
C38              C0402            20046         4633
R36              R0402            13720         1817
R34              R0402            13228         948
C41              C0402            20449         2142
C42              C0402            20667         3807
R27              R0402            11992         2528

aoutput soll so sein:
C35              C0402            19424         475
C36              C0402            19552         3092
C38              C0402            20046         4633
C41              C0402            20449         2142
C42              C0402            20667         3807
R43              R0402            14662         2387
R42              R0402            14800         2685
R36              R0402            13720         1817
R34              R0402            13228         948
R27              R0402            11992         2528

so hab ichs versucht:



kann mir jemand sagen warum das nicht funzt?

Danke schon mal
Gruß
Andreas

my @eingang2 = sort { $a->[1] cmp $b->[1] } @eingang;
das sollte funktionieren und ist sehr viel übersichtlicher.

deine subroutine gibt übrigens kein 0 zurück, wenn die werte gleich sind, ausserdem benutzt du map im "void-kontext", also du verwendest die ausgabe von map nicht. ich würde hier lieber for verwenden:
chomp for @eingang

Hi, erst mal Danke für deine Antwort,
bin aber leider ein totaler Anfänger, kannst du das in mein Codeschnippsel einbauen?
Danke
Gruß

andreas

warum das nicht funzt? hast du es schon mal mit use strict; und use warnings; ausgefuehrt?

map zu verwenden ohne rueckgabewert finden etwa 95% der guten perl-programmierer sehr schlechten stil, vor allem, wenn es voellig unnoetig ist. wenn es doch mal noetig ist, dann besser for(each)-schleifen verwenden.


auf meiner HP steht unter perl -> Sortierungen was zur Schwartzian Transform (das ist das map-sort-map-konstrukt)\n\n

<!--EDIT|Strat|1137072338-->

[quote=Strat,12.01.2006, 14:23]map zu verwenden ohne rueckgabewert finden etwa 95% der guten perl-programmierer sehr schlechten stil[/quote]
also ich nicht =)

Hallo Strat,
hab ja nicht behauptet das ich ein guter Programmierer bin;-)
hab deinen Code eingebaut, und es funzt.

Dankeschön

Gruß
andreas

[quote=pq,12.01.2006, 14:31][quote=Strat,12.01.2006, 14:23]map zu verwenden ohne rueckgabewert finden etwa 95% der guten perl-programmierer sehr schlechten stil[/quote]
also ich nicht =)[/quote]
ernsthaft?

map ist imho genau so wie grep ein sonderfall von for(each). ich versuche diese beiden funktionen eigendlich immer nur dann zu benutzen, wenn sie sich lohnen, also wenn ich die rückgabewerte haben/verarbeiten will. das macht den code imho leichter verständlich.

[quote=pq,12.01.2006, 14:31][quote=Strat,12.01.2006, 14:23]map zu verwenden ohne rueckgabewert finden etwa 95% der guten perl-programmierer sehr schlechten stil[/quote]
also ich nicht =)[/quote]
wie sagte schon mein schwiegervater in spe? 5% verlust gibt's immer ;-)

warum verwendest du in einem solchen fall kein for(each)? das finde ich einfacher zu durchschauen und besser ans problem angepasst. Und wenn jemand ein map-in-void-context als letzte zeile einer subroutine verwendet, dann wird's voellig obskur, weil man nicht mehr sagen kann, ob jetzt damit wirklich ein return gemeint ist oder nicht.\n\n

<!--EDIT|Strat|1137081531-->

[quote=Andreas,12.01.2006, 14:46]hab ja nicht behauptet das ich ein guter Programmierer bin;-)[/quote]
aber du hast die chance, ein guter Perl-Programmierer zu werden. Und mit Hilfe von anderen geht's einfach leichter, besser zu werden. Und das ist ja eins der Ziele dieses Forums.

[quote=Taulmarill,12.01.2006, 16:27][quote=pq,12.01.2006, 14:31][quote=Strat,12.01.2006, 14:23]map zu verwenden ohne rueckgabewert finden etwa 95% der guten perl-programmierer sehr schlechten stil[/quote]
also ich nicht =)[/quote]
ernsthaft?[/quote]
also ich kann mir situationen vorstellen, in denen ich ein map im void
kontext schöner finden würde als ein for.
nicht, dass ich dauernd map im void kontext schreibe, aber ich verteufele
es nicht generell, noch dazu, wo die performance-nachteile wohl in neueren
perls eliminiert sind.