Re: [htmltmpl] using __DATA__ section as template in module
Brought to you by:
samtregar
From: Brad B. <bmb@Mail.Libs.UGA.EDU> - 2004-10-03 12:06:32
|
On Sat, 2 Oct 2004 gr...@sp... wrote: > > > 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: > > [ken@darkstar 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 => \@html, > 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> > [ken@darkstar DBWebForm]$ ./Foo.pm > <html> > <head> > </head> > <body> > xx > </body> > </html> > [ken@darkstar 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 FWIW, I don't get any errors when I run that (perl, v5.6.1). --Brad |