Opened by Gast at 2006-06-28 11:59
User since
2006-03-29
1520 Artikel
BenutzerIn
2006-03-29
1520 Artikel
BenutzerIn
[quote=pq,28.June.2006, 10:28]kennst du zufällig perldoc?
aus perldoc -f sort:
perldoc -q sort (-q steht für faq) hält ebenfalls beispiele für dich bereit, falls
es mal etwas komplexer werden soll.[/quote]
Sofern man das über Perldoc verstehen kann, ich glaube ich hätte den Sinn dahinter so nicht verstanden.
------
sort erwartet entweder ein Coderef oder einen Block der ausgeführt wird. Es werden immer zwei Elemente aus dem Array genommen die danach in der variablen $a und $b stehen.
Es wird der Coderef ausgeführt und wenn die Funktion -1 zurück gibt wird $a vor $b sortiert. Gibt die Funktion 0 zurück sind beide Werte identisch, also reihenfolge kann beliebig sein. Und gibt die Funktion +1 zurück, dann muss $b vor $a einsortiert werden.
sort { $a cmp $b } @liste;
ist also das selbe, als würdest du nur "sort" schreiben.
aus perldoc -f sort:
Code: (dl
)
1
2
3
4
5
# sort using explicit subroutine name
sub byage {
$age{$a} <=> $age{$b}; # presuming numeric
}
@sortedclass = sort byage @class;
perldoc -q sort (-q steht für faq) hält ebenfalls beispiele für dich bereit, falls
es mal etwas komplexer werden soll.[/quote]
Sofern man das über Perldoc verstehen kann, ich glaube ich hätte den Sinn dahinter so nicht verstanden.
------
sort erwartet entweder ein Coderef oder einen Block der ausgeführt wird. Es werden immer zwei Elemente aus dem Array genommen die danach in der variablen $a und $b stehen.
Es wird der Coderef ausgeführt und wenn die Funktion -1 zurück gibt wird $a vor $b sortiert. Gibt die Funktion 0 zurück sind beide Werte identisch, also reihenfolge kann beliebig sein. Und gibt die Funktion +1 zurück, dann muss $b vor $a einsortiert werden.
sort { $a cmp $b } @liste;
ist also das selbe, als würdest du nur "sort" schreiben.
Nicht mehr aktiv. Bei Kontakt: ICQ: 404181669 E-Mail: perl@david-raab.de