Perl select 函式

描述

此函式將輸出的預設檔案控制代碼設定為 FILEHANDLE，如果未指定檔案控制代碼，則設定 print 和 write 等函式使用的檔案控制代碼。如果未指定 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