use strict;
use warnings;
use utf8;
use HTML::Lint;
my $lint = HTML::Lint->new (only_types => HTML::Lint::Error::STRUCTURE);
my $html = do {local $/; };
$lint->parse ($html);
$lint->eof ();
my @lintErrsOrg = map {$_->as_string ()} $lint->errors ();
print join "\nError Lint org: ", @lintErrsOrg;
__DATA__
utf8 test
ç
####
(8:1) Invalid character \xE7 should be written as ç