use strict;
use warnings;

use LWP::Simple;

use HTML::Strip;

my $raw_html = get( 'http://www.somewebsite.com' );

my $hs = HTML::Strip->new();

my $clean_text = $hs->parse( $raw_html );
$hs->eof;

print $clean_text, "\n";