Perl 模块 Getopt::Std 和 Getopt::Long
来源:互联网 发布:西语记单词软件 编辑:程序博客网 时间:2024/06/04 18:49
示例程序:
getopt.pl;
1
2
3
4
5
6
7
8
#!/usr/bin/perl -w
#use strict;
use
Getopt::Std;
use
vars
qw($opt_a $opt_b $opt_c)
;
getopts(
'a:b:c'
);
print
"opt_a =>;$opt_a\n"
if
$opt_a
;
print
"opt_b =>;$opt_b\n"
if
$opt_b
;
print
"opt_c =>;$opt_c\n"
if
$opt_c
;
注释:'a:b:c',a和b后有冒号,表示-a,-b后面要跟参数.c后面没有冒号,表示-c后面不带参数.
而且-a,-b后所跟的参数分别赋给变量$opt_a和$opt_b,对于变量$opt_c,若命令行加了-c,则$opt_c=1,否则为0.
如:
perl getopt.pl -a aa -b bb -c cc
显示:
opt_a =>;aa
opt_b =>;bb
opt_c =>;1
如:
perl getopt.pl -a aa -b bb
opt_a =>;aa
opt_b =>;bb
(因为加了if判断,所以$opt_c没有显示);
上面的例子,用Getopt::Long可以这样实现
上面的例子,用Getopt::Long可以这样实现
getoptions.pl
1
2
3
4
5
6
7
#!/usr/bin/perl
use
Getopt::Long;
use
vars
qw($opt_a $opt_b $opt_c)
;
GetOptions(
"a=s"
=>\
$opt_a
,
"b|opt_b:i"
=>\
$opt_b
,
"c"
=>\
$opt_c
);
print
"opt_a =>;$opt_a\n"
if
$opt_a
;
print
"opt_b =>;$opt_b\n"
if
$opt_b
;
print
"opt_c =>;$opt_c\n"
if
$opt_c
;
a=s表示可以用-a aa的形式,即变量-a 类型是字符串
b|opt_b:i表示可以用-b或者-opt_b来取得变量,类型为整型
c表示如果有-c的参数值则$opt_c等于1,否则等于0
其中
s表示字符串,i表整型,f表示浮点型
=表示要有参数值或者没有这个参数如:perl getoptions.pl -a aa -b bb或者perl getoptions.pl -b bb
:表示可有参数值也可以没有参数值
如:
perl getoptions.pl -a aa -b 2 -c cc
opt_a =>;aa
opt_b =>;2
opt_c =>;1
0 0
- Perl 模块 Getopt::Std 和 Getopt::Long
- 在 Perl 中使用 Getopt::Long 模块
- perl模块 Getopt::Long解析参数
- perl的Getopt::Long和pod::usage
- Getopt::Long 模块zz
- perl模块 Getopt::Std模块的使用
- perl使用Getopt::Long模块,处理命令行参数
- Getopt::Std模块简单实例
- Getopt::Std模块的使用
- Getopt::Std模块的使用:
- Getopt::Long 模块zz [转]
- Getopt::Std
- Getopt::Long
- PERL参数指令技:Getopt::Long
- perl中Getopt::Long 获取命令行参数
- perl模块Getopt::Std用法及实例-从命令行读取参数模块
- perl模块Getopt::Std用法及实例-从命令行读取参数模块
- 在 Perl 中使用 Getopt::Long 模块来接收用户命令行参数 z
- 多个IP快速切换设置—win7
- 《程序员的呐喊》阅读
- Spring MVC 学习指南学习,学习笔记。
- perl
- JavaScript实现原生ajax
- Perl 模块 Getopt::Std 和 Getopt::Long
- perl模块Getopt::Std用法及实例-从命令行读取参数模块
- Unity3D 四元数旋转使用 Quaternion
- 第一天来认识认识指针与const
- PYTHON中的语法元素(续)--Python(8)
- JavaScript取数组数据动态生成下拉列表
- VMware Workstation 12 Pro
- Github全面详解-12Pull Request
- bzoj 2275 Fibonacci博弈 齐肯多夫定理