Попытка получить исходный код веб-страницы в Perl - PullRequest
2 голосов
/ 24 ноября 2011

Я пытаюсь получить html-источник веб-страницы с помощью функции Perl "get".Я написал код 5 месяцев назад, и он работал нормально, но вчера я сделал небольшое редактирование, но после этого он не работал, независимо от того, сколько я пытался.Вот код, который я попробовал.

#!usr/bin/perl
use strict;
use warnings;
use LWP::Simple;
my $link = 'www.google.com';
my $sou = get($link) or die "cannot retrieve code\n";
print $sou;

Код работает нормально, но не может получить источник, вместо этого он отображает

cannot retrieve code

Пожалуйста, помогите мне в этом разобраться.

1 Ответ

6 голосов
/ 24 ноября 2011
my $link = 'http://www.google.com';
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...