#use CGI::Ex::Template::XS;
#my $tt1 = CGI::Ex::Template::XS->new(@config1);
-#my $tt2 = CGI::Ex::Template::XS->new(@config2);
my $tt1 = Template->new(@config1);
-my $tt2 = Template->new(@config2);
-my $cet = CGI::Ex::Template->new(@config1);
-my $cetc = CGI::Ex::Template->new(@config2);
+my $cet = CGI::Ex::Template->new(@config1, compile_perl => 1);
#$swap->{$_} = $_ for (1 .. 1000); # swap size affects benchmark speed
'43_filteruri' => "[% ' ' | uri %]", # 132% # 550% # 379% # 471% # 12524.4/s #
'44_filterevl' => "[% foo | eval %]", # 303% # 530% # 434% # 478% # 5475.5/s #
'45_capture' => "[% foo = BLOCK %]Hi[% END %][% foo %]", # 102% # 386% # 291% # 304% # 10606.5/s #
- '46_complex' => "$longer_template", # 60% # 290% # 160% # 270% # 1054.3/s #
- '47_hello2000' => "$hello2000", # 2% # 136% # 39% # 115% # 184.8/s #
+ '46_refs' => "[% b = \\code(1); b(2) %]", # 60% # 270% # 239% # 174% # 6451.9/s #
+ '47_complex' => "$longer_template", # 60% # 290% # 160% # 270% # 1054.3/s #
+ '48_hello2000' => "$hello2000", # 2% # 136% # 39% # 115% # 184.8/s #
# overall # 95% # 406% # 251% # 346% #