Getopt::Std模块的使用：

初始设置：

在程序中加入如下代码：

use Getopt::Std;
use vars qw($opt_d $opt_f $opt_p);
getopts('d:f:p');
#注意上两行的参数要对应

[ 解释一下"d:f:p"，d和f后有冒号，表示-d，-f后面要跟参数。p后面没有冒号，表示-p后面不带参数。
而且-d，-f后所跟的参数分别赋给变量$opt_d和$opt_f。对于变量$opt_p，若命令行加了-p，则$opt_p=1，否则为0]

举个例子就很清楚了：

cat file.pl
use Getopt::Std;
use vars qw($opt_d $opt_f $opt_p);
getopts('d:f:p');
 
print "\$opt_d => $opt_d\n" if $opt_d;
print "\$opt_f => $opt_f\n" if $opt_f;
print "\$opt_p => $opt_p\n" if $opt_p;

然后在命令行中运行：

perl file.pl -d 20040412 -f louiskoochen -p

可得到下列形式的输出：

$opt_d =>200040412
$opt_f =>louiskoochen
$opt_p =>1

这回大家知道Getopt::Std模块是怎么回事了吧：）

当然除了Getopt::Std模块外，还有Getopt::Long模块。从名字中也能看出该模块功能更强，用法更难！

建议继续学习：

1. 28个Unix/Linux的命令行神器    (阅读：14919)
2. 高效Linux用户需要了解的命令行技能    (阅读：11275)
3. 命令行画图工具gnuplot用法入门    (阅读：10487)
4. Linux命令行里的“瑞士军刀”    (阅读：10145)
5. perl更新/修改/删除文本文件内容    (阅读：9437)
6. perl大牛flw传说    (阅读：6514)
7. 完全用命令行工作 -- 一年后的思考    (阅读：6062)
8. 在命令行快速切换目录    (阅读：5601)
9. [Perl] Template::Toolkit 模板技术.    (阅读：5368)
10. 在perl中连接和使用sqlite做数据存储    (阅读：5058)