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