Beefy Boxes and Bandwidth Generously Provided by pair Networks Joe
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

Re: HTML::Template macros

by jZed (Prior)
on Dec 04, 2003 at 23:41 UTC ( #312375=note: print w/ replies, xml ) Need Help??


in reply to HTML::Template macros

I like to use simpler tags for variables in templates so I use the filter to turn %~foo~% into <TMPL_VAR NAME="foo"> like so:

use HTML::Template; my $tmpl = HTML::Template->new( scalarref => \do { local $/; <DATA> }, die_on_bad_params => 0, loop_context_vars => 1, filter => sub { my $s=shift; $$s=~s/%~([^~]+)~%/<TMPL_VAR NAME="$1">/g; }, ); $tmpl->param( userid => 99999 ); $tmpl->param( username => 'foo' ); print $tmpl->output; __DATA__ <a href="%~userid~%">%~username~%</a> is easier to edit than <a href="<TMPL_VAR NAME="userid">"><TMPL_VAR NAME="username"></a>
The heck with patents, here's how to protect your thoughts: <tinfoil>.o0(Martians can't read this)</tinfoil>


Comment on Re: HTML::Template macros
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://312375]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (8)
As of 2014-04-16 23:08 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (436 votes), past polls