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>


Reply via email to