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

use HTML::FormatText;
use HTML::TreeBuilder;

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

$formatter = HTML::FormatText->new();   # Formatierer-Objekt
print $formatter->format($tree);        # Ausgabe