Re: пара отвлеченных вопросов, офтопик

["Dmitry E. Oboukhov" <dimka@avanto.org>]

>  DEO> например на строку:
>  DEO> connect($socket, sockaddr_in(80, inet_aton("127.0.0.1")));
>  DEO> тот перл ругается так:
> 
>  DEO> Bad symbol for filehandle at /path/to...
> 
>  DEO> ===
>  DEO> use Socket;
>  DEO> my $socket;
>  DEO> socket($socket, PF_INET, SOCK_STREAM, getprotobyname('tcp'));
>  DEO> connect($socket, sockaddr_in(80, inet_aton("127.0.0.1")));
>  DEO> ===
> 
>  DEO> хотя этот код работает в perl 5.8
> 
>  DEO> я жду, мне обещали shell на ту машинку, там и разберемся.
>  DEO> варианты проапгрейдить перл не подходят, потому что там стоит BSD, а у
>  DEO> нее как обычно с обновлениями траблы и они на это не пойдут :(
> 
> Тогда забудь про возможность подсовывать неопределенные переменные в
> вызовы socket, open и т.п.

socket в моем случае как раз отработал, см выше, а вот упало на connect

> Вышеприведенный вариант, где используется
> bareword Socket_Handle, скорее всего, работать будет.
мне не нравятся конструкции вроде

open(FILE, "filename");

потому что даже с use strict они не делают die если неверно написал имя
хендла.
я понимаю что опять я видимо ламерский вопрос задал, но извиняйте, не
могу удержаться.
я для себя взял за правило писать сперва my $file;  чтобы разрешить эту
проблему, а как с ней борются гуру? ;)