Hallo JAPH
Meine Scripts laufen derzeit mit dem Schalter -w
use strict;
use CGI::Carp qw(fatalsToBrowser);
Ich bin eigentlich immer davon ausgegangen, dass:
use strict
allein schon verhindert dass Eingaben nicht nachträglich interpretiert werden
Wie meine ich das
ohne use strict
Sinput = "wort1|wort2" ;
$finde =~ /$input/;
findet "wort1" oder "wort2"
mit use strict
Sinput = "wort1|wort2" ;
$finde =~ /$input/;
findet "wort1|wort2" , maskiert also die Pipe in der Eingabe
Anyway... werde die perldoc Sicherheits Seite nochmals studieren.
Die Seite zur map() habe ich schon konsultiert.
also mal so
#!/usr/bin/perl -w -T
dies sollte eventuell noch zusätzlich Errormessages schreiben (denke ich)
mfg Beat