Re^3: Testing for readdir failure (Perl-bug)

yes, but did you notice:

------  Error: on
--- Reset: off
$! 17: File exists
[download]

I included all cases for completeness and to make it easier to find the bug.

Maybe this is clearer:

  DB<105> $!=666
 => "Unknown error 666"

  DB<106> $!=666;scalar readdir X or warn "$!\n"
Unknown error 666

  DB<107> $!=undef;scalar readdir X or warn "$!\n"
Bad file descriptor
[download]

As you can see $! needs to be reset in advance "to be meaningful".

Cheers Rolf

( addicted to the Perl Programming Language)

Comment on Re^3: Testing for readdir failure (Perl-bug) Select or Download Code

Replies are listed 'Best First'.
Re^4: Testing for readdir failure (perlbug errno test without localizing) by Anonymous Monk on May 26, 2013 at 00:20 UTC
As you can see $! needs to be reset in advance "to be meaningful". Yup, logic bug is logic bug :) Compare Perl_do_close (called by pp_close ie close ) to pp_readdir pp_readdir test errno without localizing, do_close doesn't test errno at all closedir has this issue, and probably many others, maybe 40 others I wouldn't be surprised if other functions testing errno have this issue too -- this needs explicit testing / reviewing / patching	[reply]
Re^5: Testing for readdir failure (perlbug errno test without localizing) by LanX (Saint) on May 26, 2013 at 00:56 UTC
> closedir has this issue, and probably many others, maybe 40 others well at least readline, but now setting to `undef` doesn't help here. Additionally I couldn't figure out why readdir sometimes throws warnings and sometimes not. I already prepared a bug report and will send it tomorrow. Cheers Rolf ( addicted to the Perl Programming Language)	[reply] [d/l]
Re^5: Testing for readdir failure (perlbug errno test without localizing) by Bob Cook (Acolyte) on May 30, 2013 at 20:38 UTC
I have practically no knowledge of C nor Perl's C code, so could you describe the effect(s) of this logic bug at the Perl level?	[reply]