use LWP::Simple;
use HTML::Parse; 
print parse_html(get ($ARGV[0]))->format;