Perl select用法及代码示例

描述

此函数将输出的默认文件句柄设置为 FILEHANDLE，如果未指定文件句柄，则设置打印和写入等函数使用的文件句柄。如果未指定 FILEHANDLE，则返回当前默认文件句柄的名称。

选择(RBITS、WBITS、EBITS、超时)使用指定的位调用系统函数 select()。 select 函数设置用于处理非阻塞 I/O 请求的控件。返回标量上下文中等待 I/O 的文件句柄数，或列表上下文中等待的文件句柄数和剩余时间

用法

以下是此函数的简单语法 -

select FILEHANDLE

select

select RBITS, WBITS, EBITS, TIMEOUT

返回值

如果指定了 FILEHANDLE，则 TRhis 函数返回先前的默认文件句柄，如果未指定 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