So where might I be in danger now? Why -T makes my CGI safer?sub untainted_string { my ($data) = @_; if ($data =~ /^([-\@\w.\\\/\s]+)$/) { $data = $1; # $data now untainted } else { die "Bad data in '$data'"; } return $data; }
In reply to Re^5: Insecure dependency in open while running with -T switch
by vit
in thread Insecure dependency in open while running with -T switch
by vit
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |