Commit 37b1f2f7 authored by Leigh B. Stoller's avatar Leigh B. Stoller
Browse files

Clean up some taint check regular expressions.

parent 7cbed49a
......@@ -91,7 +91,7 @@ my $eid;
#
# Untaint the arguments.
#
if ($nodeid =~ /^([-\@\w]+)$/) {
if ($nodeid =~ /^([-\w]+)$/) {
$nodeid = $1;
}
else {
......@@ -195,7 +195,7 @@ sub VerifyFile()
# to hand out a file outside the appropriate files systems.
#
my $translated = `realpath $file`;
if ($translated =~ /^([-\@\w.\/]+)$/) {
if ($translated =~ /^([-\@\w\.\/]+)$/) {
$translated = $1;
}
else {
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment