I moduli di libwww-perl (LWP), disponibili su CPAN, forniscono una via
più potente per fare la stessa cosa. Non hanno bisogno di lynx
ma, come lynx, possono sfruttare i proxy:
# versione piu` semplice
use LWP::Simple;
$contenuto = get($URL);
# o stampa HTML da una URL
use LWP::Simple;
getprint "http://www.linpro.no/lwp/";
# oppure stampa ASCI dall'HTML da una URL
# necessita anche di HTML-Tree da CPAN
use LWP::Simple;
use HTML::Parser;
use HTML::FormatText;
my ($html, $ascii);
$html = get("http://www.perl.com/");
defined $html
or die "Non riesco a prelevare l'HTML da http://www.perl.com/";
$ascii = HTML::FormatText->new->format(parse_html($html));
print $ascii;
Copyright (c) 1997, 1998, 1999, 2000, 2001 Tom Christiansen e Nathan
Torkington. Tutti i diritti riservati.
Questa documentazione è libera; puoi ridistribuirla e/o
modificarla secondo gli stessi termini applicati al Perl.
Indipendentemente dalle modalitè di distribuzione, tutti gli esempi di
codice in questo file sono rilasciati al pubblico dominio. Potete, e
siete incoraggiati a farlo, utilizzare il presente codice o qualunque
forma derivata da esso nei vostri programmi per divertimento o per profitto.
Un semplice commento nel codice che dia riconoscimento alle FAQ sarebbe cortese
ma non è obbligatorio.
mongers@perl.it è la lista ufficiale di Perl Mongers Italia per
porre quesiti di tipo tecnico, per rimanere aggiornato su meeting,
incontri, manifestazioni e novità su Perl.it. Iscriviti!