Posted By: sinuhet (/|) on 'CZscripts'
Title:     Re: WWW stranka do perlu
Date:      Sun Oct 31 19:59:33 1999

>   Jak dostat do perloveho scriptu obsah nejake www stranky odnekud z netu? 
> Prekneme, ze potrebuju zkontrolovat, jestli se na te strance vyskytuje
> najake slovo.

podivej se na modul LWP.

>   A obecneji, jak se z perlu dostanu k TCP konexi? (neco jako "telnet 
> www.neco.cz 80")

tady na te urovni bys ale jeste musel implementovat HTTP protokol.

>  Kdyztak jen kopnete, kde to najit. Dik. 

na CPANu.

treba tohle:

#!/usr/bin/perl -w

use LWP::UserAgent;

$header = new HTTP::Headers(Accept => 'text/plain', 
                        User-Agent => 'Perl-script'); 
$url = new URI::URL("www.perl.com/index.html");
$request = new HTTP::Request(GET, $url, $header);
$useragent = new LWP::UserAgent;
$response = $useragent->request($request);
$page = $resp->content if $response->is_success;


> 
> Honza

" "