#!/usr/bin/perl

use strict;
use warnings;
use LWP::Simple;
use HTML::Strip;

my $hs = HTML::Strip->new();
print $hs->parse( get('http://www.perlmonks.org/') );
$hs->eof;