Skip Menu |

Preferred bug tracker

Please visit the preferred bug tracker to report your issue.

This queue is for tickets about the Module-Extract-VERSION CPAN distribution.

Report information
The Basics
Id: 56679
Status: rejected
Priority: 0/
Queue: Module-Extract-VERSION

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

Bug Information
Severity: Normal
Broken in: 0.13
Fixed in: (no value)



Subject: warnings parsing lib/perl5/5.12.0/Pod/Perldoc/ToTk.pm
Parsing the file lib/perl5/5.12.0/Pod/Perldoc/ToTk.pm from perl core produces warnings; Opening lib/perl5/5.12.0/Pod/Perldoc/ToTk.pm _eval_version called with (($Tk::Pod::VERSION >= 4) ? ('-tree' => $tree) : ()) $ Tk::Pod::VERSION Useless use of a constant in void context at (eval 256) line 7, <$fh> line 75. Useless use of a variable in void context at (eval 256) line 7, <$fh> line 75. Use of uninitialized value in numeric ge (>=) at (eval 256) line 7, <$fh> line 75.
I realize you're setting $^W = 0 before you eval in _eval_version, but the fix seems to be to do: no warnings; right after package ExtUtils::MakeMaker::_version; in the eval string.
Show quoted text
> no warnings; right after package ExtUtils::MakeMaker::_version; in the > eval string.
my $eval = qq{ package ExtUtils::MakeMaker::_version; no warnings; local $sigil$var; \$$var=undef; do { $line }; \$$var };
I haven't been able to reproduce this. Can you show me the code that produce those warnings? Also, did you modify anything else in the module that might be causing trouble? Thanks,