I have been having some trouble with a module I am working on that requires
HTML::Template.

I am trying to use the __DATA__ section of the module as a default template to
fall back on if one is not supplied to my constructor.

Here is a simple script that illustrates the issue:

[EMAIL PROTECTED] DBWebForm]$ cat Foo.pm
#!/usr/bin/perl
use strict;
use warnings;
Foo->run();
package Foo;
use HTML::Template;
sub run{
        my @html = <DATA>;
        my $template = HTML::Template->new(arrayref => [EMAIL PROTECTED],
die_on_bad_params=>1, strict=>1);
        $template->param(VALUE=>'xx');
        print $template->output;
}
 
1;
__DATA__
<html>
<head>
</head>
<body>
<TMPL_VAR NAME=VALUE>
</body>
</html>
[EMAIL PROTECTED] DBWebForm]$ ./Foo.pm
<html>
<head>
</head>
<body>
xx
</body>
</html>
[EMAIL PROTECTED] DBWebForm]$ perl -MFoo
HTML::Template->new() : Syntax error in <TMPL_*> tag at
/fake/path/for/non/file/template : 5. at
/usr/lib/perl5/site_perl/5.8.0/HTML/Template.pm line 2288, <DATA> line 7.
Compilation failed in require, <DATA> line 7.
BEGIN failed--compilation aborted, <DATA> line 7.


Anyone ideas on what is going on? Any suggestions welcome.

Thanks in advance,
-Ken 

-------------------------------------------------
This mail sent through IMP: http://horde.org/imp/


-------------------------------------------------------
This SF.net email is sponsored by: IT Product Guide on ITManagersJournal
Use IT products in your business? Tell us what you think of them. Give us
Your Opinions, Get Free ThinkGeek Gift Certificates! Click to find out more
http://productguide.itmanagersjournal.com/guidepromo.tmpl
_______________________________________________
Html-template-users mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/html-template-users

Reply via email to