[转]Perl---命令行参数

linuxx

一、Perl中的命令行参数：

Perl提供了一个特殊的内置数组@ARGV来存放用户从命令行输入的参数；功能跟C/C++的命令行参数一样，但是实现上不太一样；Perl中定义的命令行参数不包含perl命令和perl命令后面的perl程序文件名，即：不包含“perl  程序文件名”，也就是说，数组@ARGV中存放的全都是用户在命令行上输入的参数，不包含“perl   程序文件名”；从“ perl  程序文件名”之后开始，到回车键之间的参数才会被存储到数组@ARGV中；$ARGV[0]中存放的是用户输入的第一个参数；Perl5把调用程序名存储在特殊变量$0中；命令行的各个参数之间用空格隔开；

数组@ARGV中的每个存储单元中存放是命令行中使用空格分隔开的项目；如果命令行上有字符串参数，而且字符串之间需要有空格的话，这个时候需要使用引号把这些含有空格的字符串括起来，否则会被Perl解释器解释为多个参数而被存入到数组@ARGV的多个不同的存储单元中；

在生成数组@ARGV的同时还会生成文件句柄ARGV，以及数组最后单元索引$#ARGV；可以使用循环对数组@ARGV进行处理；如果数组@ARGV为空数组，则数组最后存储单元的下标索引$#ARGV的值为-1，即：$#ARGV = -1 ；对任意一个空数组来说，都是这样的：数组最后存储单元索引的下标为-1；

二、使用<>文件操作符：

Perl中，<>操作符实际上是对数组@ARGV的隐含的引用，其工作原理为：

1、当Perl解释器第一次看到<>操作符时，打开以$ARGV[0]为文件名的文件；

2、执行动作shift(@ARGV)；即把数组@ARGV中的所有元素向前移动一个位置，数组中的元素数量也减1；

3、<>操作符读取在第一步中打开的文件中的所有行；

4 、读完之后，解释器回到第一步中重复操作；

可以使用命令行变量作为文件表处理的简单语法为如下：

while (<>)；

这一行代码的作用就是打开和关闭特殊文件句柄ARGV、设置$ARGV变量和读取文件中的每一行；使用特殊文件句柄ARGV来处理文件，确实比较方便，但是也有一定的难度，读取数组@ARGV中的每一个元素，确定每个值对应的开关和确定何时有文件需要处理并不容易；

三、文件的缓冲设置：

默认情况下，Perl解释器对文件是使用缓冲的：$I = 0；

为了告诉Perl解释器不对文件使用缓冲，可以使用以下方法：
1、使用select()函数选择一个指定的文件作为当前默认的文件；
2、把系统内置的特殊变量 $I设置为1： $I = 1；

系统变量$I会告诉Perl解释器是否对文件进行缓冲而不管是否应该进行缓冲；如果$I为非零值，则表示不使用缓冲；如果$I为0值，则表示使用缓冲；系统变量$I与系统变量$~和$^协同工作；当没有调用select()函数时，$I影响当前默认的文件；

来自 http://blog.csdn.net/brince101/article/details/6863241