Perl: Problem bei Parsen - #49569 (Allgemeines zu Perl)

Relais

2004-08-23 10:55

User since
2003-08-06
2254 Artikel
ModeratorIn

Code: (dl )

1
2
3

while ( <> ) {
    print m/(\w+)/, "\n";
}

Bearbeitet die Eingabe zeilenweise.
Alles ausser der ersten Folge von Buchstaben, Ziffern u. _ wird weggeworfen.
Das Übrige wird ausgegeben

Edit: Dank @renees Tip hier der angepaßte Hack:

Code: (dl )

<>; # Erste Zeile wegwerfen.
while ( <> ) {
    print m/(\w+)/, "\n"; # Pro Zeile die erste Folge von Buchstaben, Ziffern u. _ ausgeben.
}

\n\n

Erst denken, dann posten --
27. Deutscher Perl- u. Raku -Workshop 12. bis 14. Mai 2025 in München.

Winter is Coming