Select Code to Download

 
#!/usr/bin/perl
#c11case2a.cgi - Allows user to enter info
...
</BODY>
</HTML>
addressForm

 Bareword found where operator expected at c11case2a.cgi line 29, near
+ "<TITLE>Jarrod"
    (Missing operator before Jarrod?)
Bareword found where operator expected at c11case2a.cgi line 32, near 
+"<H3>Enter"
...
    (Missing semicolon on previous line?)
syntax error at c11case2a.cgi line 29, near "HEAD>"
Can't find string terminator '"' anywhere before EOF at c11case2a.cgi 
+line 33.

 #!/usr/bin/perl
#c11case2b.cgi - Displays user info
print “Content-type: text/HTML\n\n”;
...
print “$city,$nbsp; $state $nbsp; $zipcode<BR>\n”;
print "</BODY>\n”;
print “</HTML>\n";

 Bareword found where operator expected at c11case2b.cgi line 10, near
+ "my @purchases = ( "Gold"
  (Might be a runaway multi-line "" string starting on line 3)
    (Do you need to predeclare my?)
syntax error at c11case2b.cgi line 10, near "my @purchases = ( "Gold B
+racelet"
Unrecognized character \xE2; marked by <-- HERE after d Bracelet<-- HE
+RE near column 33 at c11case2b.cgi line 10.