[Moscow.pm] STDIN <> и чёрная магия

[Mons Anderson]

On 09.12.2011, at 15:50, Dmitry Karasik wrote:

> нашел, все ясно:
> 
> 1: open( STDIN, '<', \$data ) делает 'require PerlIO::scalar' - т.е. находит этот PerlIO/scalar.pm и читает его черед fd(0). Ну
> читает и слава богу.

Фиг. В моем примере, когда мы не даем закрыть fd 0 такого не происходило-бы.
А все равно происходит.

> 
> 2: while(<>) или для простоты readline читает из STDIN, но вот тут и бага - он читает не из STDIN а из libc.STDIN_FILENO который 0.
> А он уж занят. Т.е. фикс видимо должен быть где-то в потрохах PerlIO::scalar чтобы он правильно переопределял Perl_tied_method("READLINE").
> 
> /dk
> 
> 
> On Fri, Dec 09, 2011 at 12:36:23PM +0100, Dmitry Karasik wrote:
>>> А про open я имел в виду, что при открытии STD* мы можем получить еще одно-два открытия файлов (тех самых PerlIO + PerlIO::scalar)
>> 
>> ну ессно потому что это баг, я в сырцах не рылся но я помню что open открывающий
>> скаляр как файл был сделан на базе PerlIO layers, и скорее всего где-то эта
>> строчка "PerlIO" перекочевала туда куда не надо ...
>> 
>> /dk
> 
> -- 
> Sincerely,
> 	Dmitry Karasik
> 
> -- 
> Moscow.pm mailing list
> moscow-pm на pm.org | http://moscow.pm.org