Stories
Slash Boxes
Comments
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
 Full
 Abbreviated
 Hidden
More | Login | Reply
Loading... please wait.
  • You forgot to check whether the get() succeeded!

    In LWP OO terms:

    use LWP;
    my $resp = LWP::UserAgent->new->get($url);
    die "GRAH! ", $resp->status_line unless $resp->is_success;
    ... HTML::TokeParser->new( $resp->content_ref ) ...