}
$has_use_raw++
if $line =~ m{\[% USE raw %\]}; # Does [% Use raw %] exist?
if $line =~ m{\[%(\s|-|~)*USE raw(\s|-|~)*%\]}; # Does [% Use raw %] exist?
my $e;
if ( $line =~ qr{<a href="([^"]+)} ) {
subtest 'Preserve pre/post chomps' => sub {
plan tests => 1;
my $input = <<INPUT;
[% USE raw %]
[%- USE raw -%]
[%- var -%]
[% - var - %]
[%~ var ~%]
[%~ var | uri ~%]
INPUT
my $expected = <<EXPECTED;
[%- var | html -%]
[%~ var | html ~%]
-