Farid Hajji: Perl - Einführung, Anwendungen, Referenz
2., aktualisierte und erweiterte Auflage
Addison-Wesley Longman, ISBN 3-8273-1535-2
sortreversegrepmapsplit() und join()unpack() und pack()push(), pop(), unshift() und shift()splice()
(1, "hello", 4711, $var); # Heterogene Listen
(); # Leere Liste
(1,2,(3,4,5),6) ist identisch mit (1,2,3,4,5,6)
@array = ("hello", "world"); # Arrays speichern Listen
$array[5]; # Zugriff auf Element
$maxindex = $#array; # Höchster Index
$length = @array; # Anzahl der Elemente
@array[2,7] = (555,666); # Array-Slices
@newlist = (55,66,77) x $ntripels; # Wiederholungsoperator
@sorted = sort @non_sorted; # Sortierung von Arrays
@numsort = sort { $a <=> $b } @nums; # Numerische Sortierung
@specsrt = sort mycmp @input; # Eigene Vergleichsfunktion
@reversed = reverse @list; # Umkehrung
@selected = grep(myselect, @input); # Auswahl einiger Elemente
@modified = map(mymodifier, @input); # Mapping
@range = 'a' .. 'z'; # ('a','b',...,'z')
push(@list, "some", "new", "elements"); # Am Ende hinzufügen
$last = pop(@list); # Vom Ende entfernen
unshift(@list, "new top"); # Am Anfang hinzufügen
$top = shift @list; # Vom Anfang entfernen
@removed = splice(@list, $offset, $len, @newlist);
@fields = split(/:/, $pwd); # Trennt an ':'
$pwd = join(":", @fields); # Füge wieder zusammen
randpoetry.pl |
Erzeugt zufällige Sätze aus Wortlisten |
In Vorbereitung
In Vorbereitung
In Vorbereitung
@uplines = map(lc, @lines); # Alle Zeilen mit lc()
# in Kleinbuchstaben konvertieren
@list = 'zzy' .. 'aaab'; # ('zzy', 'zzz', 'aaaa', 'aaab')
@chars = ( 'A'..'Z', 'a'..'z', 0..9 );
[Alte Quelle]
| Last modified: $Date: 2006/05/18 12:55:44 $ FH. Search :: Sitemap :: Disclaimer :: Copyright :: Privacy |
|