I have an odd result (at least to me) that I can't explain. I am using
CGI::Application and have the following subroutine that returns $output, the
html for the page (only a toy example, but illustrates the point, I think):
sub return_probe_details {
# Get OligoMap object (actually, just inherited from CGI::Application)
my $self = shift;
# Get CGI Query Object
my $q = $self->query();
my $output = '';
$output .= $q->start_html(-title => 'Query Human Oligo Probe',
-BGCOLOR => 'aquamarine');
$output .= $q->startform();
$output .= 'hello';
$output .= '<p>';
$output .= $q->end_form;
$output .= $q->end_html();
return $output;
}
The HTML output is:
<?xml version="1.0" encoding="iso-8859-1"?>
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en-US"
xml:lang="en-US"><head><title>Query Human Oligo Probe</title>
</head><body bgcolor="aquamarine"><form method="post"
action="/cgi-bin/oligo.pl" enctype="application/x-www-form-urlencoded">
hello<p><div></div>
</form></body></html>
>From where is the tagset <div></div> coming? It isn't a problem here, of
course, but if I try to use this with HTML::template, it is causing
problems. Any ideas?
Thanks,
Sean
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>