perl 的select 函数

perl 的select 函数

 

语法：

     select FILREHADL

       select

       select RBITS,WBITS, EBITS,TIMEOUT

 

定义和用法
       设置输出的文件句柄（FILEHANDLER）为默认文件句柄（default FILEHANDLER）。指定文件句柄，然后返回当前的默认文件句柄的名称。
      select（RBITS，WBITS，EBITS，TIMEOUT）调用系统功能的select()使用特定位数。在select函数设置处理非管制非阻塞I / O请求。返回的数字等待的I / O的文件句柄标量情况下，或文件句柄和等待的时间在清单中剩余的数量

 

返回值

1.       如果指定了FILEHANDLER则返回以前默认的文件句柄（FILEHANDLER）

2.       如果没有指定FILEHANDLER则返回当前默认的文件句柄（FILEHANDLER）

 

例子

#! use/bin/perl -w

 

1.  open(FILE,">F://Hand//job.pls");

2.  $oldHandle = select(FILE);

3.  print "This is sent to $oldHandle/n";

4.  print $oldHandle;

5.  select($oldHandle);

6.  print("This is sent to STDOUT./n");

 

第一行（1）打开文件句柄FILE，指定文件为F://Hand//job.pls

第二行（2）使用select（）设置默认的文件句柄为FILE，并且返回以前默认的文件句柄

第三行（3）将“This is sent to $oldHandle/n”打印到FILE句柄指示的文件“F://Hand//job.pls”中（可以到job.pls中查看具体的信息）

第四行（4）打印出以前默认的文件句柄（STDOUT）

第五行（5）将文件句柄设置为以前默认的文件句柄（STDOUT）

第六行（6）将“This is sent to STDOUT./n”打印到以前默认文件句柄（STDOUT）中