Skip to content
Snippets Groups Projects
Commit 1ca8dc19 authored by Guillaume ROUSSE's avatar Guillaume ROUSSE
Browse files

run CGI in taint mode

parent e35056ba
Branches
Tags
No related merge requests found
#!/usr/bin/perl #!/usr/bin/perl -T
use strict; use strict;
use warnings; use warnings;
......
...@@ -483,6 +483,7 @@ sub req_complete_challenge { ...@@ -483,6 +483,7 @@ sub req_complete_challenge {
); );
eval { eval {
local $ENV{PATH} = '/bin:/sbin:/usr/bin:/usr/sbin';
Email::Sender::Simple->send($message); Email::Sender::Simple->send($message);
}; };
$self->abort( $self->abort(
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment