Getopt::Std模块的使用
上一篇 /
下一篇 2008-11-18 22:35:18
/ 个人分类:perl
- 文件版本: V1.0
- 开发商: 本站原创
- 文件来源: 本地
- 界面语言: 简体中文
- 授权方式: 免费
- 运行平台: Win9X/Win2000/WinXP
Getopt::Std模块的功能:
51Testing软件测试网tL
f"u,cWx1KW初始化
perl命令行中所接受的参数.简化了命令行参数的解析
51Testing软件测试网(Gmnm'p4S6ZGetopt::Std模块的使用:
!NSW
u
H'^&B)js051Testing软件测试网*a:[7w2{tXG Nc!y初始设置:
51Testing软件测试网 ON}]e)S+|Q:~51Testing软件测试网
g
f6?@2um0m2t在程序中加入如下代码:
51Testing软件测试网,sG`Q? use Getopt::Std;
aw"swR)v0 use vars qw($opt_d $opt_f $opt_p);
kgte\0 getopts('d:f:p');
P k^s!NpnN,Pc0 (注意上两行的参数要对应)
p%o9O Ni{v
ZZ051Testing软件测试网Q
c1oQb[ 解释一下"d:f:p",d和f后有冒号,表示-d,-f后面要跟参数。p后面没有冒号,表示-p后面不带参数。
8kR6p,j;MmF7K0而且-d,-f后所跟的参数分别赋给变量$opt_d和$opt_f。对于变量$opt_p,若命令行加了-p,则$opt_p=1,否则为0]
51Testing软件测试网pOM8i6O"M2rr7l51Testing软件测试网kHpS3N举个例子就很清楚了:
51Testing软件测试网sp[.nxP#_wvi file.pl
51Testing软件测试网+A&l^Le0La_8s,y#wE2j7Z.HB0添加如下代码:
51Testing软件测试网:fSvFZB,e`wuse Getopt::Std;
(J#D0KYo9|P0C0use vars qw($opt_d $opt_f $opt_p);
2EL/t'dRh0getopts('d:f:p');
51Testing软件测试网W:KMRS51Testing软件测试网]5whf't'Bjprint "\$opt_d =>; $opt_d\n" if $opt_d;
,Hj3Bs_^'_wx Z0print "\$opt_f =>; $opt_f\n" if $opt_f;
51Testing软件测试网2d0}_@
V#Qprint "\$opt_p =>; $opt_p\n" if $opt_p;
51Testing软件测试网;P*C9ZrG K&P)yw[h