use warnings;
use strict;
use HTML::TreeBuilder 5 -weak;
use HTML::FormatText;


  my $tree = HTML::TreeBuilder->new_from_url("http://www.google.com");

  my $format = HTML::FormatText->new(leftmargin=>3, rightmargin=>50);

  print $format->format($tree);

##</code><code>##

Search Images Maps Play YouTube
News Gmail Drive More »Web
History | Settings | Sign in
Nigeria


Advanced searchLanguage tools


Google.com.ng offered in: Hausa
Igbo Yorùbá Pidgin

Advertising ProgramsBusiness
SolutionsAbout GoogleGoogle.com

© 2013 - Privacy & Terms