Usually, Perl also outputs the exact line number where the warning occurs. What line number does your code output?
I find it unlikely that opendir would succeed but then readdir should return undef.
Let me recommend to you, again, File::Find, which makes iterating over a directory tree somewhat easier.
In reply to Re^5: How to write the perl script for the following linux command?
by Corion
in thread How to write the perl script for the following linux command?
by finddata
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |