print HTML::FormatText->new->format( HTML::TreeBuilder->new->parse_file($_)) for @ARGV;