Zeichensuche - #76692 (Allgemeines zu Perl)

Froschpopo

2007-05-14 15:23

User since
2003-08-15
2653 Artikel
BenutzerIn
[default_avatar]

Code: (dl )

while (<FILE>) {
   chomp;
   print "true\n" if /$_/;
}

nicht vergessen den Newline am Ende von STDIN zu löschen mit chomp\n\n