use strict; use warnings; use Test::Differences; use Test::More tests => 2; use HTML::WikiConverter; my $wc = HTML::WikiConverter->new( dialect => 'MultiMarkdown' ); { my $wiki = $wc->html2wiki( <<'EOF' ); My Title

Some random text.

Foo Bar
1 2
3 42
EOF eq_or_diff( $wiki . "\n", <<'EOF', 'got expected wikitext back' ); Title: My Title Some random text. | Foo | Bar | |---|---| | 1 | 2 | | 3 | 42 | EOF } { my $wiki = $wc->html2wiki( <<'EOF' ); My Title

Some random text.

EOF eq_or_diff( $wiki . "\n", <<'EOF', 'got expected wikitext back' ); Title: My Title [Some random text][1]. [1]: http://example.com/ EOF }