#------------------------------------------------------------------------ -- test -- [% sql = " SELECT * FROM table" -%] SQL: [% sql %] -- expect -- SQL: SELECT * FROM table

-- test -- [% a = "\a\b\c\ndef" -%] a: [% a %] -- expect -- a: abc def

-- test -- [% a = "\f\o\o" b = "a is '$a'" c = "b is \$100" -%] a: [% a %] b: [% b %] c: [% c %]

-- expect -- a: foo b: a is 'foo' c: b is $100

-- test -- [% tag = { a => "[\%" z => "%\]" } quoted = "[\% INSERT foo %\]" -%] A directive looks like: [% tag.a %] INCLUDE foo [% tag.z %] The quoted value is [% quoted %]

-- expect -- A directive looks like: [% INCLUDE foo %] The quoted value is [% INSERT foo %]

-- test -- =[% wintxt | replace("(\r\n){2,}", "\n<break>\n") %]

-- expect -- =foo <break> bar <break> baz

-- test -- [% nl = "\n" tab = "\t" -%] blah blah[% nl %][% tab %]x[% nl; tab %]y[% nl %]end -- expect -- blah blah x y end

#------------------------------------------------------------------------ # STOP RIGHT HERE! #------------------------------------------------------------------------

-- stop --

-- test -- alist: [% $alist %] -- expect -- alist: ??

-- test -- [% foo.bar.baz %]