#!/usr/bin/env perl
use strict;
use warnings;
use Test::More tests => 6;
use MarkdownParser;
my $parser = MarkdownParser->new();
is( $parser->parse("# Header 1"), "Header 1
\n", "H1 header" );
is( $parser->parse("## Header 2"), "Header 2
\n", "H2 header" );
is( $parser->parse("### Header 3"), "Header 3
\n", "H3 header" );
is( $parser->parse("#### Header 4"), "Header 4
\n", "H4 header" );
is( $parser->parse("##### Header 5"), "Header 5
\n", "H5 header" );
is( $parser->parse("###### Header 6"), "Header 6
\n", "H6 header" );