you need to escape bits of it
so say you got for example
<img src="pics/pic.gif" border="0"> etc you get the idea
you need to escape the "`s so if you had that you`d need to replace it with
<imh src=\"pics/pic.gif\" boder=\"0\">
ok?
sir p
Software error:
syntax error at cbsboard.cgi line 62, near "<IMG SRC="http://www.chaoticrealities.com/cbs.gif" ALIGN="TOP" WIDTH="300" HEIGHT="100"><"
Execution of cbsboard.cgi aborted due to compilation errors.
use CGI::Carp qw(fatalsToBrowser);
print "Content-type:text/html\n\n";
print "<html><head><title>CBSForums</title></head>\n\n";
print "<body>\n";
print "<p><H1><center>CBSBoard</center></H1><H4><center>Out of chaos , comes a community...</center></H4></p>\n";
$file = 'data.txt' ; # Name the file
open(INFO, "<$file" ) ; # Open the file
@lines = <INFO> ; # Read it into an array
close(INFO) ; # Close the file
print " <BODY>\n" ;
foreach $line (@lines) # assign @lines to $line, one at a time
{ # braces {} are required, bracket code
print "\n <P> $line </P>" ; # print formatted lines to screen
}
##################################################################################
$correctUsername = "*****";
$correctPassword = "*****";
#Use a nested if/else statement like the one below to make debugging
#much easier
if ($FORM{'username'} eq $correctUsername) {
if($FORM{'password'} eq $correctPassword) { print "You've passed the test!\n"; }
else { print "Password Incorrect.\n"; }
}
to this
<P ALIGN=\"CENTER\"><A HREF=\"http://www.chaoticrealities.com/cgi-bin/cbsboard/cbsboard.cgi\"><IMG SRC=\"http://www.chaoticrealities.com/cbs.gif\" ALIGN=\"TOP\" WIDTH=\"300\" HEIGHT=\"100\"></A></P>
and it will work fine
sir p
syntax error at cbsboard.cgi line 60, near "center>"
(Might be a runaway multi-line "" string starting on line 56)
Unrecognized character \xA9 at cbsboard.cgi line 60.
Comment