#!/usr/bin/perl -w
######################################################################
# (c) Michael Schilli 1999
######################################################################

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

$tree = HTML::TreeBuilder->new();       # TreeBuilder erzeugen
$tree->parse_file("beispiel.html");     # Datei parsen

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

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