#!/usr/bin/perl --
use strict; use warnings;
use HTML::HTML5::Parser;
use HTML::HTML5::ToText;
binmode STDIN; 
binmode STDOUT, ':encoding(UTF-8)'; 
my $dom = HTML::HTML5::Parser->load_html(IO => \*STDIN);
print HTML::HTML5::ToText
->with_traits(qw/ShowLinks ShowImages RenderTables/)
->new()
->process($dom);
__END__
Can't locate object method "#COMMENT" via package "MooseX::Traits::__ANON__::SERIAL::1" at HTML/HTML5/ToText.pm line 129, <STDIN> line 3016.