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

[Dmitry Karasik]

нашел, все ясно:

1: open( STDIN, '<', \$data ) делает 'require PerlIO::scalar' - т.е. находит этот PerlIO/scalar.pm и читает его черед 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