Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask

anyevent http 404code

by liuweichuan (Acolyte)
on Oct 19, 2016 at 05:49 UTC ( #1174272=perlquestion: print w/replies, xml ) Need Help??

liuweichuan has asked for the wisdom of the Perl Monks concerning the following question:

why can not open this web page and return 404 code via anyevent::http. but LWP can get this page. then can open other web site page.

use AnyEvent::HTTP; use AnyEvent; my @urls = qw( ); my $cv = AnyEvent->condvar; for my $url ( @urls ) { $cv->begin; http_get $url, sub { my ($data, $headers) = @_; foreach my $k (keys %$headers){ print $k," : ",$headers->{$k},"\n"; } $cv->end; } } $cv->recv;

Replies are listed 'Best First'.
Re: anyevent http 404code
by Krambambuli (Curate) on Oct 19, 2016 at 10:28 UTC
    The relevant info in the AnyEvent::HTTP documentation refers to request headers and reads
       You really should provide your own "User-Agent:" header value that is appropriate for your program - I wouldn't be surprised if the default AnyEvent  string gets blocked by webservers sooner or later.
    The server blocks the AnyEvent request, but works ok if you indicate another valid User-Agent. Like
    http_get $url, headers => { 'User-Agent' => 'curl/7.47.1' }, sub { [...]
      headers => { 'User-Agent' => 'curl/7.47.1' }, for your code has syntax error
      for other web "https", error:TLS support not available on this system. done. install net ssleay it's ok now
        it can run now. install net ssleay

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlquestion [id://1174272]
Approved by Erez
Front-paged by Corion
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (4)
As of 2022-12-04 11:15 GMT
Find Nodes?
    Voting Booth?

    No recent polls found