perl 如何读取远程服务器上的文件

perl 如何读取远程服务器上的文件

如果远程服务器地址为:192.168.222.111, 需要读取的URL:p.txt ,端口号:80,代码如何实现将p.txt读取到本地? 谢谢大家!

use LWP::Siimple;

my $content = get( "???://192.168.222.111:80/p.txt" );  # $content 里面就是内容了
# 或者
getstore( "???://192.168.222.111:80/p.txt", "/tmp/p.txt" );  # 这样就下载到 /tmp/p.txt 里面了。


??? 是你所使用的协议名称。
可以是 ftp http https 等等。
不过既然你的端口是 80,那 99% 就是 http 了。
谢谢你!我试试看
还有更酷的模块:
http://search.cpan.org/~itub/IO-All-LWP-0.14/lib/IO/All/LWP.pm


......$content 你都没有赋值 打开什么?


应该是open FH, $file
然后 print FH $content
估计你请求的地址不对,$content没有获得值。