SCHLEIFE ANFANG
        if ( $fil ne "" ) {
            if ( $fmode eq "-" ) { next if ( /$fil/ ); }
            if ( $fmode eq "+" ) { next if ( ! /$fil/ ); }
    }
SCHLEIFE ENDE