[SOLVED] How to get text from site?

[milovidov]

Hello all!

Is exist way for getting text from any site? It means that need text from site as can see him visitor of site.

Thanks for your attention!

UPDATE

I found solution simular that offered by grondilu, but with Lynx browser, instead elinks. Because Lynx is a cross-platform solution

[trizen]

HTML::Strip may be helpful.

use strict;
use warnings;
use encoding qw(UTF-8);

use HTML::Strip qw();
use LWP::Simple qw(get);

my $url = 'http://example.com';

my $hs = HTML::Strip->new();
my $clean_text = $hs->parse(get($url));

print $clean_text;

[grondilu]

If you want the text to be at least roughly formatted, you can use the '-dump' option of a text-only browser:

print qx{elinks -dump http://www.perl.org};