diff options
Diffstat (limited to 'pinyweb/cgi-bin/newuser.cgi')
-rwxr-xr-x | pinyweb/cgi-bin/newuser.cgi | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/pinyweb/cgi-bin/newuser.cgi b/pinyweb/cgi-bin/newuser.cgi index 159db63..75fa7c8 100755 --- a/pinyweb/cgi-bin/newuser.cgi +++ b/pinyweb/cgi-bin/newuser.cgi @@ -1,8 +1,6 @@ #!/usr/bin/perl $| = 1; -open(STDERR, ">&STDOUT"); - use warnings; use CGI; @@ -21,6 +19,8 @@ $q = CGI->new; print( "Content-type: text/plain\n\n" ); +open(STDERR, ">&STDOUT"); + if( scalar( $q->param("n") ) && scalar( $q->param("a") ) && scalar( $q->param("p") ) ) { my $pass = scalar( $q->param("p") ); |