>>>>> On Thu, 1 Feb 2007 21:01:18 -0800, Eric Wilhelm <[EMAIL PROTECTED]> said:
> # from Andreas J. Koenig
> # on Thursday 01 February 2007 03:42 pm:
>> + return $ENV{PERL_MM_USE_DEFAULT} || ( !$self->_is_interactive &&
>> eof STDIN );
>>
>> This hangs forever when the STDOUT is redirected and STDIN is not
>> redirected.
> Hmm, when STDOUT is not a terminal, then _is_interactive is false. I
> guess the assumption here was that STDIN would be a set of scripted
> answers?
I believe there was *no* reasonable assumption at work.
> I guess it should only check eof(STDIN) if STDIN isn't a
> terminal, but the _is_unattended() should be true?
I assume that C<eof STDIN> is just a nono in sane code. Does the
perlfunc manpage not say so?
>> Introduced between 0.27_10 and 0.28 with SVN rev. 5919
> It looks like the hang would have still occurred in r5918, since
> _readline() would have still hit the eof(STDIN) check.
It probably would have, but after a prompt it also would have been
quite normal to read from STDIN. Somebody will eventually read the
prompt and act accordingly. This is the nature of a dialog on a
console. First write a prompt, then read an answer. Not the other way
round.
--
andreas
