# test the docs in TT.pm use Test::More tests => 2; use Inline ( TT => 'DATA', PRE_CHOMP => 1, POST_CHOMP => 1, ); my $output = simple( { name => 'Rob' } ); is( $output, "

Greetings!

Hello Rob, how are you?", 'simple include without data pass'); $output = data_pass( { name => 'Rob' } ); is( $output, '

Hello Rob, how are you?

', 'include with regular pass' ); __DATA__ __TT__ [% BLOCK simple %] [% INCLUDE 't/header.tt' %] Hello [% name %], how are you? [% END %] [% BLOCK data_pass %] [% INCLUDE 't/datarec.tt' %] [% END %]