Hell-O!
my $urlToLoad = param('URL') || die "No Url given";
Fatal error: $urlToLoad is tainted.
Diese Meldung kommt bei mir nicht (auch nicht, wenn ich -T verwende), liegt vielleicht an der veralteten Perlversion (5.005).
Nene, ich wollte Cheatah-like auf einen Fehler aufmerksam machen, ist mir wohl misslungen.
Heisst das ich sollte einen Check auf gueltige Zeichen einbauen?
z.B. mit einem regExp?
Ja, irgendsowas in der Art.
Hab mir jetzt folgende einfache Routine gebaut, die ich anstatt "die" aufrufe:
[...]
Ist das jetzt gut, oder sollte man es auch nicht so machen?
Finde ich auf jeden Fall besser als die die-Variante.
defined get($urlToLoad) ? getprint($urlToLoad) : print "Fehler beim Lesen von $urlToLoad.";
"getprint(...)"? Meinst du vielleicht "print get(...)"
Ein Blick in die Doku hilft:
getprint($url)
Get and print a document identified by a URL. The document is printed to the selected default filehandle for output (normally STDOUT) as data is received from the network. If the request fails, then the status code and message are printed on STDERR. The return value is the HTTP response code.
:-)
Siechfred
Ich bin strenggenommen auch nur interessierter Laie. (molily)
Zitat des Tages || Falle Aufteilungsbescheid || RT 221 Erfurt-Altstadt i.V.