Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

Re: How to test all TT2 tags are escaped.

by Rhandom (Curate)
on Oct 28, 2013 at 14:21 UTC ( #1059988=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    use Template::Alloy;
    my $t = Template::Alloy->new(AUTO_FILTER=>"html");
    $t->process(\qq{[% foo %]\n}, {foo => "(&)"})'
    
    (&)
    
  2. or download this
    AUTO_FILTER
    
    ...
            [% f = "&"; g = f; g %]  prints &
            [% f = "&"; g = f; g | none %]  prints & (because g = f is a S
    +ET directive)
            [% f = "&"; g = GET f; g | none %]  prints & (because the 
    +actual GET directive was called)
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1059988]
help
Chatterbox?
[mz2255]: I'm trying to post a question to "seekers of perl wisdom" but always getting a permission denied when I want to submit. There are no links in my post...
[ambrus]: again? someone complained about this just a few days ago (although eventually they could post)
[choroba]: Can you post the question in mz2255's scratchpad?
[ambrus]: Corion, if you're here, can you check the spam filter logs to see what's triggering this time?
[ambrus]: Petroza had trouble posting yesterday, but has posted Issues Fetching URL with a variable token since.

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (9)
As of 2017-10-19 15:23 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My fridge is mostly full of:

















    Results (255 votes). Check out past polls.

    Notices?