Exercise Three
Exercise Three
- Okay, let's try to use perl to print out an
HTML form!
- Here is the form you will try to output...
![[Example]](/old?u=http%3A%2F%2Fwdvl.com%2FAuthoring%2FScripting%2FTutorial%2FImages%2Fform_example.gif&y=1999)
- Here is the code...
#!/usr/local/bin/perl print "Content-type: text/html\n\n"; print qq! <HTML> <HEAD> <TITLE>Testing Form Input</TITLE> </HEAD> <BODY> <FORM METHOD = "POST" ACTION = "/old?u=http%3A%2F%2Fwdvl.com%2FAuthoring%2FScripting%2FTutorial%2Ffp.cgi&y=1999"> <CENTER> <TABLE BORDER = "1"> <TR> <TH>First Name</TH> <TD><INPUT TYPE = "text" NAME = "f_name"></TD> </TR> <TR> <TH>Last Name</TH> <TD><INPUT TYPE = "text" NAME = "l_name"></TD> </TR> <TR> <TH>Email</TH> <TD><INPUT TYPE = "text" NAME = "email"></TD> </TR> </TABLE> <P> <INPUT TYPE = "SUBMIT"> </CENTER> </FORM> </BODY> </HTML>!;
Formatting the OutputTable of Contents
Perl Scalars
|
