Hmm, I guess that's one interpretation. It doesn't seem to be doing it though.

I should give some code, shouldn't I? OK, I have a file, which when I do tidy test.html on the command line, gives three warnings and makes 3 changes.

line 5 column 1 - Warning: <style> inserting "type" attribute
line 11 column 1 - Warning: trimming empty <p>
line 11 column 4 - Warning: trimming empty <p>
[download]

But this script does nothing, generating no warnings and reproducing "test.html" exactly the same as before.

#!/usr/bin/perl
use strict;
use warnings;
use diagnostics;
use HTML::Tidy;
undef $/;
open(M,"test.html") || die "$!";
my $html = <M>;
my $tidy = new HTML::Tidy;
$tidy->clean( "this file", $html );
for my $message ( $tidy->messages ) {
               print $message->as_string . "\n";
           }
print $html;
[download]