UNItopia News: Brett Computer, Gruppe Allgemeines, Artikel 1760

-------------------------------------------------------------------------------
Titel: Re: Perl-Frage
Artikel: 1760                                          Bezug: 1758
Verfasser: Garamon                                     Datum: 03.08.05 14:26:24
-------------------------------------------------------------------------------
Wenn du garantieren kannst, dass auf jedes *INCLUDE eine Zeile folgt:

while (<>) {
    my $nextLine = <> if /^\Q*INCLUDE\E/o;
    ...
}

\Q ... \E sorgt dafuer, dass die Zeichen dazwischen ohne
Regexp-Sonderbehandlung verwendet werden.

Aufruf von perl waere: perl <script> <file>

Garamon