hallo
Hallo Beat,
und wie reagiert dein System auf falsche Eingaben?
open(my $c, "<", $CONFIG_FILE ) or die $!;
while(<$c>){
$_ =~ m{^SET_PASSWORD_HASH \s+ (\S+) }x and $PASSWORD_HASH = $1 and next;
$_ =~ m{^SET_ROOT_DIR \s+ (\S+) }x and $ROOT_DIR = $1 and next;
$_ =~ m{^SET_HTTP_BASE_PATH \s+ (\S+) }x and $HTTP_BASE_PATH = $1 and next;
$_ =~ m{^SET_REDIRECT \s+ (\S+) }x and $REDIRECT = $1 and next;
$_ =~ m{^SET_FILESYSENCODING \s+ (\S+) }x and $FILESYSENCODING = $1 and next;
$_ =~ m{^ADD_FILETYPE \s+ (\S+) }x and push( @LIMIT_FILETYPE, $1) and next;
$_ =~ m{^ADD_DIR \s+ (\S+) }x and push( @LIMIT_DIR, $1) and next;
$_ =~ m{^ADD_WRITE_DIR \s+ (\S+) }x and push( @LIMIT_WRITE_DIR, $1) and next;
}
close $c;
Nicht registrierte Parameter werden ignoriert. Wenn unsinnige Direktories angegeben werden, wird das an anderer Stelle zu Fehlern führen.
ADD_FILETYPE cpp
Woher kennt der DAU deine Syntax?
Die wird dokumentiert, wenn man kissedit.pl ohne action Parameter aufruft.