Bug #81397 for Perl-Critic-PetPeeves-JTRAMMELL: Fatal error in Variables::ProhibitUselessInitialization with "(my $var)"

Sat Nov 24 00:58:27 2012 MOREGAN [...] cpan.org - Ticket created

Subject:

false positive in Variables::ProhibitUselessInitialization

echo '( my $sid ) = $f =~ m/pattern/;' | perlcritic -statistics --single Variables::ProhibitUselessInitialization Fatal error while critiquing "SCALAR(0x1f3d9ee8)": Can't call method "isa" on an undefined value at /usr/local/lib/perl5/site_perl/5.10.1/Perl/Critic/Policy/Variables/ProhibitUselessInitialization.pm line 136. but as expected: echo 'my ($sid) = ($f =~ m/pattern/;)' | perlcritic -statistics --single Variables::ProhibitUselessInitialization source OK

Sat Nov 24 14:03:59 2012 MOREGAN [...] cpan.org - Subject changed from 'false positive in Variables::ProhibitUselessInitialization' to 'Fatal error in Variables::ProhibitUselessInitialization with "(my $var)"'

Sun Dec 23 22:37:04 2012 PETDANCE [...] cpan.org - Correspondence added

I just got this error as well in entirely different code. uniqua:~/list-cycle $ cat isa-bug.pm package List::Cycle; sub new { my $class = shift; my $self = \do { my $scalar }; bless $self, $class; } uniqua:~/list-cycle $ perlcritic -1 -q isa-bug.pm Fatal error while critiquing "isa-bug.pm": Can't call method "isa" on an undefined value at /usr/local/lib/perl5/site_perl/5.12.1/Perl/Critic/Policy/Variables/ProhibitUselessInitialization.pm line 136.

Sun Dec 23 22:37:05 2012 The RT System itself - Status changed from 'new' to 'open'

Sat Mar 02 10:45:50 2013 johntrammell [...] gmail.com - Taken

Sat Mar 02 11:03:10 2013 johntrammell [...] gmail.com - Correspondence added 60 min

Thanks for the test cases, was able to resolve parsing problem. New version out shortly. Sorry for the delay.

Sat Mar 02 11:03:11 2013 johntrammell [...] gmail.com - Status changed from 'open' to 'resolved'