Select Code to Download

Unexpected field value http://search.cpan.org at (eval 5) line 1

Unexpected field value http://search.cpan.org at C:/ActivePerl/site/li
+b/HTTP/Headers.pm line 256

HTTP::Headers::_header('HTTP::Headers=HASH(0x2249820)', 'Referer', 'ht
+tp://search.cpan.org')  called at C:/ActivePerl/site/lib/HTTP/Headers
+.pm line 150

(etc)

if (!ref($val)) {
    push(@new, $val);
...
} else {
    Carp::croak("Unexpected field value $val");
}

$VAR1 = bless( do{\(my $o = 'http://search.cpan.org')}, 'URI::http' );