forked from pifty/tutes-dump
10 lines
191 B
Perl
10 lines
191 B
Perl
|
use strict;
|
||
|
|
use warnings;
|
||
|
|
use HTML::WikiConverter::DokuWiki ();
|
||
|
|
|
||
|
|
# slurp mode
|
||
|
|
$/ = undef;
|
||
|
|
|
||
|
|
my $html = <>;
|
||
|
|
print HTML::WikiConverter::DokuWiki->new( dialect => 'DokuWiki' )->html2wiki($html);
|