awk,perl,python的命令行参数处理

时间:2023-12-25 21:34:01

Python,Perl,Bash命令行参数 Part I

日常经常性的和Perl,Python,Bash打交道,但是又经常性的搞混他们之间,在命令行上的特殊性和index的区别,Python真的是人性化到家了,但是命令行上就很原始,但是很有分类感。还是会喜欢Perl一点(至少还可以动脑子,不至于生锈),感觉Perl是个杂合子,而python像胡彦斌,bash像韩红(最近看我是歌手第三季,嘻嘻)。Bash就是家常菜了,虽然Perl可以大部分代替Bash的功能,像grep sort map等,但是某些时候真心很麻烦,还是直接在命令行中bash好一些和命令感觉好。[如不苟同,忍气吞声就好]

下面将是我很多一部分的其中一小部分的开始,由于不断的装系统,更换系统过程中造成了很多总结的丢失,现在又要重新开始整理,很恼火,但是,回想旧爱也是甜蜜的。


基础篇


Perl

默认的命令行参数保存在@ARGV数组中

获取用 $ARGV[0],$ARGV[1],… 来表示第1个,第2个参数,…

$0表示当前脚本的文件名,和Bash一样

注意:就即使你是perl script.pl A B C,$0也会是script.pl,而不会是perl

Python

是需要sys模块

import sys

sys.argv是一个list,列表(用sys.argv.__class__查看)

获取用sys.argv[1],sys.argv[2],… 来表示第1个,第2个参数,…

sys.argv[0]表示文件名

Bash

是直接用$n,$@,$*表示所有的参数[有区别,see below]

获取用$1,$2,… 来表示第1个,第2个参数

$0始终表示文件名,即使在函数中

bash的每个函数也是这个规律的,$@表示所有

$0,$1,$2分别表示第1个,第2个,第3个传递给函数的参数

> cat test.sh

 #!/bin/bash
function aa() {
echo $, $,$
}
aa I love you

结果:test.sh,I,love


提升篇


很多时候,要共享脚本,要写清楚参数的顺序才可以,不然天知道该怎么传参数,如果看代码也不知道什么顺序。可以用注释注明顺序,或者写个usage()和简单的-h选项也可以,但谁能保证你的代码就可以被正常运行的,所以嘛,还是用getopts比较好,Linux/Unix有原生的getopt(s)命令的,Python和Perl也有相应的模块可以使用。

Bash

先看一个例子(getopts)

> cat vallis.sh

 YON="don’t love"
while getopts 'F:nO:t:' OPT; do
case $OPT in
F) Who=$OPTARG;;
n) YON='love';;
O) TGT=$OPTARG;;
t) TL=$OPTARG;;
?) echo '-h for help';;
esac
done
echo $Who $YON $TGT $TL
shift $(($OPTIND - ))
echo $*

> sh untitled.sh -F I -O you -t baby -n forever

结果是

I love you baby

forever

解析一下就是

先是一个while框架循环

while …;do

done

再是 getopts 'F:nO:t:’ OPT 就是按optstring提取相应的值到$OPTARG中

每次只提取一个,所以使用到while循环,当然可以使用for loop了

optstring部分的'F:nO:t:’

  1. 每个字母代表一个短选项(short option),带冒号:的表示有选项值的,不带的表示没有值,相当于开关true/false
  2. 不在optstring中的会给出警告信息,可以在最前面加上:就可以了
  3. 2个很重要的参数是OPTARG和OPTINT(1-based),$OPTARG表示当前选项的值,$OPTINT表示在参数列表中的位移
  4. 选项(-)和选项值之间的空格是可有可无的(Mac OS X 10.10下成功)
  5. 不支持长选项(—)
  6. option部分必须写在其他参数之前,从OPTINT看出

紧接着是case框架分选

case $i in

…) statement1

statement2;; #注意每个(block)结束的时候要用;;分割

esac

shift $(($OPTIND - 1))是将argv中的剩下的不是opt部分(opt部分已经处理过了)的参数重新set为$1,$2,…

$*,$@,这样剩下的参数可以用$n来访问,也就是说,删去了前面的option部分

上面的结果中的forever就是这样的

如果不用shift的话,$1仍然是-F,$2是I,...

总体上bash的这个和linux C语言的一样繁琐,只适合简单的选项设置

Another

还有一个getopt命令,是bash内置的(built-ins),上面的getopts是外置的(not built-ins)

区别在于getopt的参数是有-的(leading dash)并且和set结合使用

> cat valli.sh

 YON="don’t love"
args=`getopt F:nO:t: $*`
for i; do
case $i in
-F)
shift # shift out -F then $ is its value
Who=$
shift;;
# can be replaced by
# Who=$
# shift ;;
# appliable to -O and -t or any option with a value
-n)
YON='love'
shift;;
-O)
shift
TGT=$
shift;;
-t)
shift
TL=$
shift;;
24 esac
done
echo $Who $YON $TGT $TL
echo $*

或者

> cat valli2.sh

 YON="don’t love"
args=`getopt F:nO:t: $*`
set -- $args # but I think useless []
for i; do
case "$i" in
-F)
Who=$
shift ;;
-n)
YON='love'
shift;;
-O)
TGT=$
shift ;;
-t)
TL=$
shift ;;
--)
shift
break;;
esac
done
echo $Who $YON $TGT $TL
echo $*

同样成功

好原始,真的就和linux C语言没什么区别

注意

  1. getopt在Mac OS X 10.10反正不支持—long -n -o 等getopt参数[4],具体可以看reference:4
  2. getopt是内置的命令,getopts只能在shell script中

Perl

perl的getopt是常用的Getopt::Long,Getopt::Std模块,这个就比较智能了,排除不兼容[6]

先看一下例子

 use Getopt::Std;

 %options=();
getopts("F:O:nt:", \%options); #high spot
$does="don't love";
print "$options{F} " if defined $options{F};
if (defined $options{n}){
$does='love';
print "$does ";
}
print "$options{O} " if defined $options{O};
print "$options{t}\n" if defined $options{t};
print "@ARGV\n”;

就像写英语作文一样顺畅自如,仿佛在交流。但是着实是个话痨。

开始的%options哈希表的key为option,value为option value

Python

就是optaprse以及更新版argparse,但是更习惯用optparse,尽管2.7版之后不再开发。

我有一篇论述:

Reference:

1.http://blog.csdn.net/t0nsha/article/details/8180553

2.http://blog.csdn.net/zynong/article/details/6306486

3.https://docs.python.org/3/library/getopt.html?highlight=getopt#module-getopt

4.http://blog.csdn.net/breeze_life/article/details/9998645

5.http://blog.163.com/code4fun@126/blog/static/45776537201012311432182/

6.http://www.cnblogs.com/zjking99/articles/2117258.html

7.http://alvinalexander.com/perl/perl-getopts-command-line-options-flags-in-perl

如果你对某处或者某段错误忍无可忍或者急切希望改进,可以评论,微博私信,或者email给我antisunny@qq.com