Database

# THE LOGIN PAGE *********************** #*************************************** #!/biol/programs/perl/bin/perl -w use strict; use DBI; use CGI qw(:standard); print "Content-type:text/html\n\n"; my ($cgi); $cgi = new CGI; use CGI::Carp qw(fatalsToBrowser); print "Content-type:text/html\n\n"; print < Database

database

Enter user name
Enter password

EOF

database

Enter user name

Enter password