Función de selección de Perl
Descripción
Esta función establece el identificador de archivo predeterminado para la salida en FILEHANDLE, estableciendo el identificador de archivo utilizado por funciones como imprimir y escribir si no se especifica ningún identificador de archivo. Si no se especifica FILEHANDLE, devuelve el nombre del identificador de archivo predeterminado actual.
select (RBITS, WBITS, EBITS, TIMEOUT) llama a la función del sistema select () usando los bits especificados. La función de selección establece los controles para manejar solicitudes de E / S sin bloqueo. Devuelve el número de identificadores de archivo en espera de E / S en contexto escalar, o el número de identificadores de archivo en espera y el tiempo restante en un contexto de lista
Sintaxis
A continuación se muestra la sintaxis simple para esta función:
select FILEHANDLE
select
select RBITS, WBITS, EBITS, TIMEOUT
Valor devuelto
TREsta función devuelve el identificador de archivo predeterminado anterior si se especifica FILEHANDLE y el identificador de archivo predeterminado actual si no se especifica FILEHANDLE.
Ejemplo
A continuación se muestra el código de ejemplo que muestra su uso básico:
#!/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");
Cuando se ejecuta el código anterior, produce el siguiente resultado:
This is sent to STDOUT