use strict;
use warnings;
use HTML::WikiConverter::DokuWiki ();

# slurp mode
$/ = undef;

my $html = <>;
print HTML::WikiConverter::DokuWiki->new( dialect => 'DokuWiki' )->html2wiki($html);