Skip Menu |
 

This queue is for tickets about the Devel-Symdump CPAN distribution.

Report information
The Basics
Id: 53221
Status: new
Priority: 0/
Queue: Devel-Symdump

People
Owner: Nobody in particular
Requestors: adamk [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: 2.08
Fixed in: (no value)



Subject: local(*ENTRY) = $val; throws warnings when $val is undef
In some rare situations, $val can be undefined.

In this case, the code appears to pass the value down through all the other type checks until it reachs the UNKNOWN stuff at the end.

Unfortunately, in new Perls (I think it's mostly just them) the local (*ENTRY) = undef usage throws a warning.

You could simplify the code by checking for undef $val once befire the localisation of *ENTRY, add it immediately to UNKNOWN and then next.

This would have a secondary benefit of letting you remove all of defined $val in the if ( defined $val and something ) lines, which would probably also make the scanning faster (because it only checks for definedness once).



This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.