updated: Fixed code and added die...#!/usr/bin/perl use strict; use warnings; use diagnostics; use HTTP::GHTTP; my $r = HTTP::GHTTP->new('http://www.cpan.org'); $r->set_async; $r->set_chunksize(1024); $r->prepare; my $status; while ($status = $r->process) { select(undef, undef, undef, 0.1); } die "An error occured" unless defined $status; print $r->get_body;
In reply to Re: GHTTP timeout
by Khen1950fx
in thread GHTTP timeout
by stridera
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |