The following does not work....

#!/usr/bin/perl
use strict;

print qq|Content-type: text/html\n\n|;
print qq|<HTML><HEAD><TITLE>Seneschals Report</TITLE></HEAD><BODY>|;
print qq|1|;
print qq|</body></html>|;

print qq|Content-type: text/html\n\n|;
print qq|<HTML><HEAD><TITLE>Seneschals Report</TITLE></HEAD><BODY>|;
print qq|2|;
print qq|</body></html>|;


exit;


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to