#!/usr/bin/perl -w
######################################################################
# html2ps.pl
######################################################################
# Perl Power! - Michael Schilli 1998
######################################################################

use HTML::FormatPS;
use HTML::TreeBuilder;

$tree = HTML::TreeBuilder->new();           # create TreeBuilder
$tree->parse_file("example.html");          # parse file

                                            # formatter object
$formatter = HTML::FormatPS->new(FontFamily => 'Helvetica',
                                 PaperSize  => 'Letter');

print $formatter->format($tree);            # output