use Tree::Simple::Visitor::ToNestedArray;
use Data::Dumper;
use Markdent::Parser;
use Markdent::Handler::MinimalTree;
my $visitor = Tree::Simple::Visitor::ToNestedArray->new;
my $handler = Markdent::Handler::MinimalTree->new;
my $parser = Markdent::Parser->new(
handler => $handler,
);
my $markdown = "«word»";
$parser->parse( markdown => $markdown );
my $tree = $handler->tree;
$tree->accept($visitor);
my $array_tree = $visitor->getResults();
local $Data::Dumper::Indent = 1;
local $Data::Dumper::Useqq = 1;
print Dumper $array_tree;
Hello, it's me again. It seems that regexp for HTML entity is too greedy. Text
«word»
becomes a tree like thisCode sample: