[quote=haijp,20.04.2006, 11:32] [/quote]
Mir erschließt sich der Sinn dieser Zeilen nicht.
Das Array @_ manuell zu füllen ist selten sinnvoll; es ist dazu da, um in einer Subroutine an die Übergabeparameter zu gelangen (siehe perlvar). Die Sub suchstring() macht gar nix, denn sie ist leer. Und die Sub schleife() benutzt nach wie vor die dateiweit deklarierten Variablen @lines und $out. Nichts besser als vorher. Und das chop() ist auch immer noch kein chomp().