This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
stat() fix for write but not read permission on a directory.
authorCraig A. Berry <craigberry@mac.com>
Fri, 9 Dec 2011 02:50:17 +0000 (20:50 -0600)
committerCraig A. Berry <craigberry@mac.com>
Fri, 9 Dec 2011 02:50:17 +0000 (20:50 -0600)
commitcc5de3bd634c5ad18ebc00f9db2ec5dfadbfec74
treea7b7f4817f487267860d0c6edb59a085cbe8289c
parent61f966e7ad07bc284e9c4965095f36add092c5de
stat() fix for write but not read permission on a directory.

9b9f19dadd2 missed one corner case where we do actually need to
stat the directory file and not just the name without the .DIR. If
we have write but not read access to the directory, then
stat('foo.DIR') succeeds but stat('foo') fails.  So if the first
stat failed fileify and try again.
vms/vms.c