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

打开管道文件

 

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

 

open(Filehandle,”丨 CMD”);

 

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

 

open( OutFile,”丨 mail [e-mail]”):

 

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

 

close (OutFiile);

 

命令行参数

 

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

 

$var=$argv[O];

 

$num= @argv;

 

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