Perl 开发
踏岸寻柳
NULL
展开
-
用Perl写的FTP客户端程序
#!/usr/bin/perl#ok, lets begin.use Net::FTP;#set some variables$host = "10.20.30.40";$user = "username";$pass = "password";$path = "/home/mengge/testpath";#login to host && change cwdmy $ftp = new原创 2004-12-01 14:05:00 · 1339 阅读 · 0 评论 -
如何用Perl来获取主机地址?
#!/usr/bin/perl#ok, lets begin.use Socket;use Sys::Hostname;#get hostname && get hostaddress infomy($name,$aliases,$type,$len,@myaddr)=gethostbyname(hostname());print "$name,$aliases,$type,$len/n";fo原创 2004-12-01 14:27:00 · 1020 阅读 · 1 评论