Hallo Siechfred!
Ähm, noch'n Gedicht:
Gerne mehr davon!
push @lines, 'not found' and last unless grep { /$pattern/ } @lines;
@lines = map( _test($_), @lines );
Und ich wollte letztens nach schönen Anwendungsbeispielen für grep() und map() oder auch für Schwartzsche Trafo fragen... ;)
Hach, Listenverarbeitung mit Perl macht einfach Spaß :)
Ich seh's ;)
Viele Grüße aus Frankfurt/Main,
Patrick
--

_ - jenseits vom delirium - _
[link:hatehtehpehdoppelpunktslashslashwehwehwehpunktatomicminuseggspunktcomslash]
Nichts ist unmöglich? Doch!
Heute schon gegökt?

_ - jenseits vom delirium - _
[link:hatehtehpehdoppelpunktslashslashwehwehwehpunktatomicminuseggspunktcomslash]
Nichts ist unmöglich? Doch!
Heute schon gegökt?