墨迹哥's

摘要： 其实这就是在LWP模块上。那天在论坛提了一下，因为没有思路。现在找到解决问题的模块，就把案例代码贴出来。这个也是一个很重要的东西。后面会添加到模块里面去。#!/usr/bin/perluse LWP::Simple;$url="http://www.163.com";$doc=+(head $url)[-1];print "$doc\n";执行结果：root@smart:~# perl test.pl nginx 阅读全文