Re: Can You Explain How to Check a Link for Deadness

[tachyon]

use LWP::Simple;
my $page = 'http://www.perlmonks.org/';
$headers = head($page);
print $headers->{'_msg'}," ", $headers->{'_rc'}, "\n\n";

# have a look at the info we get back for interest sake
use Data::Dumper;
print Dumper $headers;
__DATA__
OK 200

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print