Perl Использование неинициализированного значения в дополнение (+) в .. WWW :: Механизируйте :: Временный

Question

У меня есть следующий очень простой кусок кода:

#!/usr/bin/perl 

use strict; 
use warnings; 

use WWW::Mechanize::Timed; 
my $ua = WWW::Mechanize::Timed->new(); 
my $url = 'www.stackoverflow.com'; 

$ua->get($url);  
print "Total time: " . $ua->client_total_time . "\n"; 
print "Elapsed time: " . $ua->client_elapsed_time . "\n"; 

Ошибка я получаю:

При запуске программы я иногда получаю следующую ошибку, она не происходит все время, кажется, что она появляется с перерывами.

Use of uninitialized value in addition (+) at /usr/local/share/perl/5.10.1/WWW/Mechanize/Timed.pm line 52.

Есть ли что-то очевидно, я с видом, как я не могу понять, почему эта ошибка происходит, не говоря уже, почему это происходит только иногда?

Ваша помощь очень ценится, большое спасибо

Answer 1

Я считаю, что проблема в том, что

my $url = 'www.stackoverflow.com'; 

не является действительным URL. Это просто имя хоста. Вы говорите, что ваша программа иногда работает без указания схемы http://? Вам нужно

my $url = 'http://www.stackoverflow.com'; 

Кроме того, вы хотите проверить код возврата из ->get(), или добавить autocheck => 1 конструктору. В какой-то момент :: История Механизации, которая стала дефолтом, но я не знаю, в какой версии вы находитесь.