#!/usr/bin/env perl use strict; use warnings; use Test::More tests => 3; use MarkdownParser; my $parser = MarkdownParser->new(); is( $parser->parse("Simple paragraph"), "

Simple paragraph

\n", "Single paragraph" ); is( $parser->parse("First paragraph\n\nSecond paragraph"), "

First paragraph

\n

Second paragraph

\n", "Multiple paragraphs" ); is( $parser->parse("Paragraph with\nmultiple lines"), "

Paragraph with multiple lines

\n", "Multi-line paragraph" );