Perl select 函数
描述
此函数将输出的默认文件句柄设置为FILEHANDLE,如果未指定文件句柄,则设置打印和写入等函数使用的文件句柄。 如果未指定 FILEHANDLE,则返回当前默认文件句柄的名称。
select (RBITS, WBITS, EBITS, TIMEOUT ) 使用指定的位调用系统函数 select( )。 select 函数设置用于处理非阻塞 I/O 请求的控件。 返回标量上下文中等待 I/O 的文件句柄数,或列表上下文中等待的文件句柄数和剩余时间
语法
以下是此函数的简单语法 −
select FILEHANDLE select select RBITS, WBITS, EBITS, TIMEOUT
返回值
此函数返回指定的 FILEHANDLE 的先前默认文件句柄,如果未指定 FILEHANDLE,则返回当前默认文件句柄。
示例
以下是显示其基本用法的示例代码 −
#!/usr/bin/perl -w open(FILE,">/tmp/t.out"); $oldHandle = select(FILE); print("This is sent to /tmp/t.out.\n"); select($oldHandle); print("This is sent to STDOUT.\n");
执行上述代码时,会产生以下结果 −
This is sent to STDOUT