#!/usr/bin/perl -w print "Content-type: text/html\n\n"; print"User-add Page"; print""; print"

Enter Your userName

"; print""; print""; ##

##

 
#!/usr/bin/perl -w
use CGI;
$cgi=new  CGI;

print $cgi->header();

print $cgi->body("
 User add page
"), $cgi$

$input = $cgi->param('name');

$name = system "useradd $input";


print "anew user has been added to you system :$name";

print $cgi->end_html();