perl (хорошая практика): лексический дескриптор файла для сокета

На странице perdoc Socketони используют глобальный файловый дескриптор для сокета. Но если я создаю сокет в подпрограмме, вызываемой дочерними процессами, лучше ли использовать лексический дескриптор файла, все еще используя Socket?

вот так:

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

вместо:

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

Вроде нормально, но я не знаю, лучше ли это или совсем бесполезно...

Спасибо