in reply to web page source?


Hi,

    As other monks have said, you have to use LWP::Simple from CPAN ...
   What I wanted to give you, is another hint code which shows you how to use it ...

  This script allow you, to GET the source even if the page is secure (and you have the L/p). :
#!/usr/bin/perl use LWP::Simple qw(get); sub Get_Page { my ($url,%option) = @_ ; ## INTRODUCE LOGIN AND PASS IF IT'S PRECISED if (exists($option{login})) { $url =~ s/http:\/\///si; $url = + "http://$option{'login'}:$option{'pass'}\@$url"; } return get($url); } ## THE URL YOU WANT THE SOURCE CODE my $url = ‘http://www.pipo.com/index.html’; ## THE CALL OF KTHULU my $contenu = Get_Page("http://anon.free.anonymizer.com/$url"); ## PRINT THE SOURCE CODE print $contenu;