hallo
hallo
print eval{ $ENV{REDIRECT_URL} =~ /^/(\w+)/(\d+).jpeg$/;
really? hotti du bist doch sonst immer so auf draht.
Ja sicher doch. Du verstehst wohl
eval
nicht!? Ok, ich erklärs Dir: Es macht dasselbe wie try/catch in diesem Kontext. D.h., beim Zugriff aufs Dateisystem muss damit gerechnet werden, daß dieser fehlschlägt. Dem catch() entspricht untenstehender Code:} || do{ "Status: 502\nContent-Type: text/plain\n\n $@"; }; # Fehlerursache in $@
Du erlaubst also partielles Scannen des directories ausserhalb von http-root? Das kann ich gar nicht in Einklang bringen mit deiner Entrüstung in unserer letzten Perl Kontroverse.