Perl中命令行参数以及打开管道文件

打开管道文件

Linux提供了管道机制，可以方便应用程序之间的数据传递。在Perl中，扣开和使用管道可采用如下形式的open函数：

open(Filehandle,”丨 CMD”);

其中，CMD为数据接收方应用程序。比如，可以用管道的方式，向邮件程序发送信息，然后邮件程序会把收到的信息作为邮件发送出去，示例如下：

open( OutFile,”丨 mail sb@mail.com”):

prini (OUtFile, "Pipe send mail exampel.＼n”);

close (OutFiile);

命令行参数

在Perl中提供了存储命令行参数的数组@ARGV，可以用来分别处理各个命令行参数，但是与C语言不同的是，$argv[0]是个参数，而不是程序名本身。通过下面的方法司以对命令行参数进行访问和处理：

$var=$argv[O];

$num= @argv;

上面的条语句取得个命令行参数，第二条语句取得参数的个数。还可以使用数组函数shift，比如shift（@argv)将把数组@argv 的最前面的元素移出来。