in reply to Re: MySQL/DBI: Error if entry is not in the database
in thread MySQL/DBI: Error if entry is not in the database
#!/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 <<EOF; <HTML> <HEAD><TITLE>My Database</TITLE></HEAD> <BODY BGCOLOR="#CCCCFF" TEXT="indigo"> <h2>My Database</h2><HR> <TABLE> <TR VALIGN="baseline"> <TD><h3>Enter name</h3></TD> <FORM METHOD="post" ACTION="my_server_here"> <TD><INPUT TYPE="TEXT" NAME="querybox" SIZE="50"></TD> <TD><INPUT TYPE="SUBMIT"> </FORM> </TR> </TABLE> </BODY> </HTML> EOF
|
|---|