/ 
HTML-PrettyPrint-1.0
/ HTML::PrettyPrint

NAME

HTML::PrettyPrint - HTML::TreeBuilder extension to pretty-print HTML

SYNOPSIS

use HTML::PrettyPrint;

my $file = 'dump.html' or die "must give html file to pretty-print";
my $tree = HTML::TreeBuilder->new_from_file($file);
$tree->dump_html; # works via inheritance

DESCRIPTION

This will pretty print your HTML files. No config options at the moments. Patches welcome.

EXPORT

None.

AUTHOR

T. M. Brannon, <tbone@cpan.org>

Acknowledgements

This is nothing but a ripoff of HTML::Element::dump() which gets rid of the <$self->address> printing. And while we are discussing dump, take a look at this HTML document, which HTML::TreeBuilder's dump() method has annotated each node of the HTML document with a unique identitifer:

<html> @0
 <head> @0.0 (IMPLICIT)
 <body> @0.1 (IMPLICIT)
   <table supply="_aref::load_data"> @0.1.0
     <tr iterator="supply.Next"> @0.1.0.0
       <th> @0.1.0.0.0
         "name"
       <th> @0.1.0.0.1
         "age"
       <th> @0.1.0.0.2
         "weight"
       <td builder="_text::iterator.name"> @0.1.0.0.3
       <td builder="_text::iterator.age"> @0.1.0.0.4
       <td builder="_text::iterator.weight"> @0.1.0.0.5

It would be possible to tie each identifier to an anonymous subroutine:

my %dynamic_html = (
'@0.1.0.0.5' => sub { my $node = shift; $node->splice_content(0,1,'new text'}}

for pure Perl and pure HTML templating (ie, absolutely no foreign elements in the HTML.

However, the problem would be that the mapping would have to change each time that the HTML changed the tree-numbering.

SEE ALSO

HTML::TreeBuilder, HTML::Seamstress.