+ -
当前位置:首页 → 问答吧 → 菜鸟使用AnyEvent::HTTP的问题,请大家看看

菜鸟使用AnyEvent::HTTP的问题,请大家看看

时间:2011-04-12

来源:互联网

以前用过LWP系列的模块,现在试了试AnyEvent::HTTP这个模块。下面是cpan上一个简单的小例子,但我执行完后,没有任何输出。请大家看看可能是什么原因?谢谢
  1. #!/usr/bin/perl
  2. use strict;
  3. use warnings;
  4. use AnyEvent::HTTP;
  5. http_request
  6.     GET => "http://www.163.com",
  7.     sub {
  8.         my ($body, $hdr) = @_;

  9.         if ($hdr->{Status} =~ /^2/) {
  10.             print "$hdr->{Status}, everything should be ok";
  11.         } else {
  12.             print "error, $hdr->{Status} $hdr->{Reason}\n";
  13.         }   
  14.     };
复制代码

作者: txh_zyy   发布时间: 2011-04-12

define callback

作者: albertd   发布时间: 2011-04-12