use strict; use warnings; use Test::More tests => 2; use_ok( 'Text::Markdown', 'markdown' ); my $str = '

foo

'; my $m = Text::Markdown->new; my $html1 = $m->markdown($str); like( $html1, qr/^$str/ );