3 use HTML
::PrettyPrinter
;
9 @EXPORT = qw(ptree html_dir);
16 my $tree = shift or die 'must supply tree';
17 my $out = shift or die 'must supply outfile';
19 my $hpp = HTML
::PrettyPrinter
->new
20 (tabify
=> 0, allow_forced_nl
=> 1, quote_attr
=> 1);
21 my $lines = $hpp->format($tree);
23 write_file
$out, @
$lines;
This page took 0.022044 seconds and 4 git commands to generate.