perl 异步超时 打印错误
来源:互联网 发布:魔兽世界数据库wlk 编辑:程序博客网 时间:2024/05/21 09:38
#!/usr/bin/perluse AnyEvent;use AnyEvent::HTTP;my $cv = AnyEvent->condvar;sub doit{ my $url = shift ; return if not defined $url; $cv->begin; http_get( "$url",timeout => 20, sub { done( $url, @_ ) } ); print "1111111111111111\n";}sub done { my ($url, $content, $hdr) = @_; $cv->end(); print "Search: $url\tStatus: ", $hdr->{Status}, "\n"; if ($hdr->{Status}==200) { print "\$content is $content\n"; }elsif ($hdr->{Status}==596){ print "time out\n"; }}&doit('http://120.55.118.6:3000/api/env?ip=192.168.32.101'); print "222222222222222222\n"; print "3333333333333333333\n";$cv->recv();~
0 0
- perl 异步超时 打印错误
- perl lwp 超时问题
- 处理异步调用超时
- perl实现超时机制综述
- 打印 perl 目录
- Perl打印输出二进制文件
- perl 打印复杂数据结构
- 异步请求和超时控制
- 解决LoadRunner超时错误
- Adb连接超时错误
- 解决LoadRunner超时错误
- SQLServer 超时错误测试
- eclipse启动超时错误
- mySql数据库连接超时错误
- LoadRunnerr超时错误解决方法
- 查询时超时错误
- Perl $SIG{ALRM}处理服务超时
- OLE打印PDF(Perl)
- IOS loadView、viewDidLoad、initWithCoder、initWithNibName、awakeFromNib的用法
- JSP刷新页面的几种方法
- Android系统四层体系结构详解
- allegro 学习过程中遇到的问题
- String与StringBuffer、StringBuilder的区别
- perl 异步超时 打印错误
- 腾讯 算法基础-字符移位
- #POJ1521#Huffman编码
- 浅析 Ruby 里的几个动态方法 (一),send 方法
- RHadoop实践系列之一:Hadoop环境搭建
- 解决MySQL主从复制不一致的情况
- 用户手势检测-GestureDetector使用详解
- Android:解决Gradle DSL method not found: 'runProguard()' 问题
- struts2的数据验证之编码方式验证和validation.xml验证