perl (práctica recomendada): manejador de archivo léxico para el socket

Question

En la página perdoc Socket, utilizan el identificador de archivo global para socket. Pero si creo un socket en una subrutina llamada por procesos hijos, ¿es mejor usar el manejador de archivos léxico aún usando Socket?

así:

use strict; 
use Socket; 
sub sendData 
{ 
    my $proto = getprotobyname('tcp'); 
    my $socket; 
    socket($socket, PF_INET, SOCK_STREAM, $proto); 
    ... 
    close($socket) 
} 

en lugar de:

sub sendData 
{ 
    my $proto = getprotobyname('tcp'); 
    socket(SOCKET, PF_INET, SOCK_STREAM, $proto); 
    ... 
    close(SOCKET) 
} 

Parece estar bien, pero no sé si es una mejor práctica o completamente inútil ...

Gracias

Answer 1

Sí, es una mejor práctica usar manejadores de archivos léxicos. Pero Perl 5.0 no los tenía, por lo que hay una gran cantidad de código y documentación antigua que utiliza manejadores de archivos globales, y gran parte de ella no se ha actualizado para utilizar los léxicos.

P.S. Usted sabe que se puede decir

socket(my $socket, PF_INET, SOCK_STREAM, $proto); 

lugar de poner el my en la línea anterior, ¿verdad?

Answer 2

Sí, siempre es mejor usar ámbito léxico en lugar de global. Si necesita asas únicas, aunque global, tratar Symbol package

Answer 3

El módulo Socket es útil si necesita hacer algunos ajustes bajo nivel con cómo se configuran sus tomas de corriente, pero para la mayoría de usos, si no casi todos los usos, el módulo IO::Socket::INET proporciona una interfaz más simple. Su constructor devuelve el identificador del socket como un objeto, evitando la necesidad de preocuparse por el identificador de archivo global.