At a guess, you haven't shown us all the code (where is the shebang line? Where is use strict and use warnings? etc), and that line 13 isn't "last;" but is actually "open FILE, $dir.$file or die "$! $file";", and that you have a file in the directory called "Found to be obsolete" that the user the Perl is running as doesn't have permission to read.
In reply to Re: Permission denied Found to be Obsolete
by dorward
in thread Permission denied Found to be Obsolete
by Scarborough
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |