in reply to Re^4: File reading with hashes
in thread File reading with hashes
there are no problems with the file permissions
If you are getting a permission denied error I am afraid that there is a problem with permissions, however probably not an obvious one.
Can you add the following code between the if -e and the open FH2 line and tell us the results.
my @file_stat = stat "$users{$user}/MY_FILE"; my @dir_stat = stat "$users{$user}"; printf("%d $users{$user} -> 0%o %d %d\n", $>, $dir_sta +t[2] & 07777, $dir_stat[4], $dir_stat[5]); printf("%d $users{$user}/MY_FILE -> 0%o %d %d\n", $>, $file_st +at[2] & 07777, $file_stat[4], $file_stat[5]);
Update: tidied up code no functionality changed.
|
---|
In Section
Seekers of Perl Wisdom