Commit 9a38c48e authored by Leigh Stoller's avatar Leigh Stoller

Remove bogus prototype and move untaint of environment before the

module includes.
parent 14c8de0d
......@@ -27,7 +27,6 @@ sub usage()
sub dosomething($$);
sub isexpdone($);
sub TBBatchUnLockExp($$;$);
my $optlist = "d";
......@@ -47,6 +46,17 @@ if ($UID) {
" Only root can run this script!\n");
}
#
# Turn off line buffering on output
#
$| = 1;
#
# Untaint the path
#
$ENV{'PATH'} = "/bin:/usr/bin:";
delete @ENV{'IFS', 'CDPATH', 'ENV', 'BASH_ENV'};
#
# Testbed Support libraries
#
......@@ -94,17 +104,6 @@ my $user_name = "Testbed Operations";
my $user_email = "$TBOPS";
my $template;
#
# Turn off line buffering on output
#
$| = 1;
#
# Untaint the path
#
$ENV{'PATH'} = "/bin:/usr/bin:";
delete @ENV{'IFS', 'CDPATH', 'ENV', 'BASH_ENV'};
#
# Parse command arguments. Once we return from getopts, all that should be
# left are the required arguments.
......
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