perl实例之http请求的小例子
发布时间:2014-09-04 编辑:jiaochengji.com
分享一个perl实现的http请求的小例子,使用perl模块LWP::UserAgent来实现,有需要的朋友参考下。
在perl中实现请求http,这里使用用LWP::UserAgent模块来实现。
代码:
复制代码 代码示例:
#!/usr/bin/perl
use LWP::UserAgent;
$url = 'http://192.168.0.112/i_.php';
$user_agency = new LWP::UserAgent;
$request = new HTTP::Request('get',$url);
$response = $user_agency->request($request);
print $response->{_content};
exit;
use LWP::UserAgent;
$url = 'http://192.168.0.112/i_.php';
$user_agency = new LWP::UserAgent;
$request = new HTTP::Request('get',$url);
$response = $user_agency->request($request);
print $response->{_content};
exit;
如果再结合perl 进程与perl读写文件的操作,就可以实现更强的功能了。
您可能感兴趣的文章:
上一篇:perl模式匹配的简单例子
[关闭]