in reply to Re^2: HTML::Tidy and mysterious HTML::Tidy::Document
in thread HTML::Tidy and mysterious HTML::Tidy::Document

Someone needs to ping petdance (with a patch?). The documentation lies. Here's working code:

#!/usr/bin/perl use strict; use warnings; use HTML::Tidy; my $fname = join ' ', @ARGV; my $html = do { local $/; <> }; # slurp file(s) from commandline my $tidy = HTML::Tidy->new(); $tidy->parse( $fname, $html ); warn $_->as_string, "\n" for $tidy->messages; print $tidy->clean( $html );

Makeshifts last the longest.

Replies are listed 'Best First'.
Re^4: HTML::Tidy and mysterious HTML::Tidy::Document
by Cody Pendant (Prior) on Jan 18, 2005 at 10:13 UTC
    Thank you. I thought I was going crazy for a while there.

    For the record, just in case it hasn't been made clear, doing

    $tidy->clean( $html );
    Leaves $html untouched.

    Next question, how does one pass command-line options to tidy via the module? Or should I quit while I'm ahead?

    =~y~b-v~a-z~s; print

      Looks like you can't. I skimmed the TidyLib docs for the functions that configure its behaviour, but I don't see any calls to those in the HTML::Tidy sources. That really is a bummer. I was hoping to use the module to write a sane replacement for the annoying standalone tidy binary. It would also have been nice to be able to integrate TidyLib directly into a Perl-enabled Vim.

      Makeshifts last the longest.