use strict; use HTML::Tree; use LWP::Simple; my $funky = "http://www.google.com"; my $content = get($funky); my $tree = HTML::Tree->new(); $tree->parse($content); print $tree->as_text;