Not to be too much of a pain but...

You should reconsider using the bgcolor property at all since it has been depreciated. Consider using CSS like:

<html>
<head>
<style type="text/css">
body {background-color: #004152; }
</style>
</head>
<body>
...

Or at least:

<body style="background-color: #004152;">

From the looks of your code, I'm wondering if you 'use strict'. If you aren't, start. Also consider how your variables are scoped. It looks like you're causing yourself all sorts of headaches by not limiting the visibility of your variables.

You'd also avoid tons of quote errors and improve the readability of your code by using the << operator like so:

print <<END_OF_HTML;
Content-type: text/html

<html>
<head>
<title>Results of Search</title>
<style type="text/css">
body {
background-color: #004152;
}
</style>
</head>
<body>
<h1 style="text-align: center; margin: 0 auto;">Results of Search in $title</h1>
<p>Below are the results of your Search in no particular order:</p
<hr style="width: 75%; height: 7px;" />
<ul>
END_OF_HTML

for my $key (keys %include) {
next unless $include{$key} eq 'yes';
print qq(<li><a href="$baseurl$key">$titles{$key}</a></li>\n);
}

print <<END_OF_HTML;
</ul>
<hr style="width: 75%; height: 7px;" />
<p>Search Information:</p>
<ul>
<li><b>Terms:</b>
END_OF_HTML

print join(', ',@terms), "\n"

print <<END_OF_HTML;
<li><b>Boolean Used:</b> $FORM{'boolean'}
<li><b>Case $FORM{'case'}</b>\n";

</ul>
<br />
<hr style="width: 75%; height: 7px;" />
<ul>
<li><a href="$search_url">Back to Search Page</a></li>
<li><a href="$title_url">$title</a></li>;
</ul>
<hr style="width: 75%; height: 7px;" />
</body>
</html>
END_OF_HTML

}




The below given part of code from a cgi script is
working fine but when I try to change the back ground
color to print "<body bgcolor=#004152">\n";

print "<body bgcolor=#004152">\n"; looks like you need to

maybe this will help..you have that qoute at the end..by the 2

print "<body bgcolor=\"#004152\">\n";


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to