| Subject: | Bug at line119 of File::List v 0.3.1 |
| Date: | Fri, 01 Oct 2010 18:48:00 -0400 |
| To: | <bug-File-List [...] rt.cpan.org> |
| From: | "Peter Hoose" <p.hoose [...] ntta.com> |
At line 119:
if (($path =~ eval{qr/$reg/}) && (! $self->{onlydirs}) ) {
In many cases $reg may be undef. For people who use warnings, this can lead
to lots of log messages, especially in web based implementations.
I would propose adding something such as:
$reg = $reg || '';
At line 118.
This is a quick fix, there may be a better more global fix as well, this is
just what I did locally to diminish the log entries.
Thank you,
--
Peter Hoose
Network Engineer
p.hoose@ntta.com
http://www.nttamerica.com
=================================
This email message is intended for the use of the person to whom it has been sent, and may contain information that is confidential or legally protected. If you are not the intended recipient or have received this message in error, you are not authorized to copy, distribute, or otherwise use this message or its attachments. Please notify the sender immediately by return e-mail and permanently delete this message and any attachments. NTT America makes no warranty that this email is error or virus free. Thank you.