#!/usr/bin/env perl use strict; use warnings; use Test::More; use Text::Handlebars; use Text::Xslate 'mark_raw'; my $tx = Text::Handlebars->new; is( $tx->render_string( '
{{{body}}}
', { title => 'My New Post', body => 'This is my first post!' }, ), 'This is my first post!
', ); is( $tx->render_string( '{{{body}}}
', { title => 'All AboutTags', body => 'This is a post about <p> tags' }, ), '
This is a post about <p> tags
', ); is( $tx->render_string( '{{{body}}}
', { title => mark_raw('All About <p> Tags'), body => 'This is a post about <p> tags' }, ), 'This is a post about <p> tags
', ); done_testing;