|
| |
 精品推荐 |
 |
|
| |
|
|
|
|
用Perl写出自己的安全工具--初级
|
日期：2007年5月10日 作者： 查看:[大字体
中字体 小字体]
|
CPAN/路径/... 是 CPAN站台上头的档案的命名规范。CPAN 代表一个 CPAN映射的基准目录，然後其馀的路径是由该目录到一个档案的路径。例如，如果您使用 ftp://ftp.funet.fi/pub/languages/perl/CPAN来做您的 CPAN 站，那麽 CPAN/misc/japh这个档案便可以从 ftp://ftp.funet.fi/pub/languages/perl/CPAN/misc/japh 抓下来。
由於目前 CPAN档案库中已经有数百个模组，因此几乎任何您所能想到的用途，大概都已经有现成的模组可以办到。目前在 CPAN/modules/by-category/ 底下的类 别包括了 perl核心模组、协助发展模组、作业系统介面、网路、周边设备、不同 processes间之沟通、资料型态工具、资料库介面、使用者介面、与其他语言介面、档名、档案系统、档案锁定、软体国际化及地方化、全球资讯网支援、伺服软体工具、档案库和档案压缩、图形变换处理、电子邮件及新闻讨论群、程式流程控制工具、filehandles和输入／输出、微软视窗模组，以及杂项模组等。
应用 一
先来看一个简单的应用FTP扩展模组Net::FTP - FTP Client class
######################################################
#!/usr/bin/perl
use Net::FTP;
$ftp = Net::FTP->new("some.host.name", Debug => 0);
$ftp->login("anonymous",'me@here.there');
$ftp->cwd("/pub");
$ftp->get("that.file");
$ftp->quit;
########################################################
上面我们看到了一个CPAN ftp.pm的使用列子 ，要使用 ftp.pm你必须首先调用
use Net::FTP;
$ftp = Net::FTP->new("some.host.name", Debug => 0);
上面这句告诉ftp将要登陆的主机地址为 some.host.name
注：如果连接成功 $ftp将返回一个1（真）值。我们可以用逻辑判断$ftp是否为真来确定目标主机器是否使用了ftp服务，在后面我将用一个范例来具体的说明。
$ftp->login("anonymous",'me@here.there');
这一句告诉我们FTP登陆目标主机后使用的用户名和密码，才这他使用了一个匿名登陆的列子，用户名为anonymous 密码为me@here.there
注：登陆成功后$ftp->login("anonymous",'me@here.there'); 将返回一个1（真）值。我们可以用逻辑判断来确定用户名和密码是否通过，同样在后面我将用一个范例来具体的说明。
$ftp->cwd("/pub");
$ftp->get("that.file");
$ftp->quit;
这几句等效于ftp的命令cwd，get , quit。ftp.pm几乎可以使用所有的ftp命令，至于其他ftp命令的使用方法建议你查看 /per/html/site/lib/net/ftp.html帮助文件，到这里我相信你已经可以自己编写一个自己登陆ftp主机然后下载或上传文件的例子。后面我还会告诉你如何使用perl2exe把你写好的pl文件TO exe 可执行文件。
应用二Net::POP3 - Post Office Protocol 3 Client class (RFC1081)
#############################################################
#!/usr/bin/perl
use Net::POP3;
$pop = Net::POP3->new('www.isbase.com');
上一篇:sort,map的特別用法
下一篇:Perl/Tk FAQ - 11.4 在画布组件中可以创建哪些元件？
|
| 相关文章： |
|
|
|
| 相关软件： |
|
| |
|
