Re^2: WWW::Curl pause conflict

[krmx]

Additional: I was wrong - using sleep instead of pause does not work. there is no difference whatsoever between:

while (1) {

my $url = "http://kronometrix.org/";
$http->setopt(CURLOPT_URL, $url);
my $retcode = $http->perform();

## Get the results
my $response =  $http->getinfo(CURLINFO_HTTP_CODE);

if ($retcode == 0) { 
    print "Ok, Status: $response\n"; 
} else { print "Error, Status: $response\n"; }

    ### Check for end
    last if ++$loop == $loop_max;

    ### Interval
    pause;
}

and

while (1) {

my $url = "http://kronometrix.org/";
$http->setopt(CURLOPT_URL, $url);
my $retcode = $http->perform();

## Get the results
my $response =  $http->getinfo(CURLINFO_HTTP_CODE);

if ($retcode == 0) { 
    print "Ok, Status: $response\n"; 
} else { print "Error, Status: $response\n"; }

    ### Check for end
    last if ++$loop == $loop_max;

    ### Interval
    sleep;
}

The code gets stuck after 2 run samples. Always 2 . not sure why. It seems to me something between WWW::Culr (libcurl) and perl regarding alarms and timers.

[Anonymous Monk]

Hmm , try turning off safe signals, see Perl::Unsafe::Signals

Also try turning on cpan curl timeout , site:metacpan.org curl timeout , site:cpan.org curl timeout , -> https://metacpan.org/pod/WWW::Curl::Simple#connection_timeout-connection_timeout_ms/ https://metacpan.org/source/ANDREMAR/WWW-Curl-Simple-0.100191/lib/WWW/Curl/Simple.pm

Read more... (1217 Bytes)

http://search.cpan.org/grep?cpanid=SZBALINT&release=WWW-Curl-4.17&string=time&i=1&n=1&C=0

t/01basic.t

20:ok(! $curl->setopt(CURLOPT_TIMEOUT, 30), "Setting CURLOPT_TIMEOUT")
+;

[krmx]

Thanks for pointers. It seems related the way libcurl handles signal handlers within. I have played around by setting: CURLOPT_NOSIGNAL used to disable the timeouts while the name resolve takes place.

$http->setopt(CURLOPT_NOSIGNAL, 1);

while (1) {

    my stuff here ...

    ### Interval
    pause;
}

http://curl.haxx.se/libcurl/c/CURLOPT_NOSIGNAL.html This might not be smart if I really need to timeout, I think in for some reasons DNS calls are not functioning. I need to think.