This probably has a very simple solution.  I am returning 
$template->output from a sub and then printing the results.  Every time, 
there's a trailing '1' at the end of the data.  How do I eliminate it?

index.tmpl:
<html>
   <head>
       <title>Hello</title>
   </head>
   <body>
       Hello World!
   </body>
</html>

print Show_HTML();

sub Show_HTML {
   my $template = HTML::Template->new(filename => 'index.tmpl');
   return $template->output;
}

Result:
Hello World!1


-------------------------------------------------------------------------
This SF.net email is sponsored by DB2 Express
Download DB2 Express C - the FREE version of DB2 express and take
control of your XML. No limits. Just data. Click to get it now.
http://sourceforge.net/powerbar/db2/
_______________________________________________
Html-template-users mailing list
Html-template-users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/html-template-users

Reply via email to