Hi,
I think that the problem is situated in the "pp_sys.c" file. When the function
PP(pp_fttext) is used for a read protected file this function setted the
variable PL_Laststatval to -1. Than when the function tries to open the not
readable file we get a warning and the function exits. So the PL_Laststatval
variable coundn't be set again.
I had run "make test" and all seems to be ok.
Regards
Nikolai Eipel
--- pp_sys.old 2005-01-29 14:40:24.494710360 +0100
+++ pp_sys.c 2005-01-29 14:33:10.543680944 +0100
@@ -3420,7 +3420,6 @@
sv = POPs;
really_filename:
PL_statgv = Nullgv;
- PL_laststatval = -1;
PL_laststype = OP_STAT;
sv_setpv(PL_statname, SvPV(sv, n_a));
if (!(fp = PerlIO_open(SvPVX(PL_statname), "r"))) {
