Bug #27645 for Template-Provider-Encoding: Warning

> > Tue Jun 19 14:14:56 2007: Request 27645 was acted upon. > Transaction: Ticket created by NFERRAZ > Queue: Template-Provider-Encoding > Subject: Warning > Broken in: 0.09 > Severity: Normal > Owner: Nobody > Requestors: nferraz@gmail.com > Status: new > Ticket <URL: http://rt.cpan.org/Ticket/Display.html?id=27645 > > > > This is not an error, but a warning that appears hundred of times when I > run a project using "-w": > > Use of uninitialized value in pattern match (m//) at > /Library/Perl/5.8.6/Template/Provider/Encoding.pm line 33. > Use of uninitialized value in subroutine entry at > /Library/Perl/5.8.6/Template/Provider/Encoding.pm line 24. > Use of uninitialized value in pattern match (m//) at > /Library/Perl/5.8.6/Template/Provider/Encoding.pm line 33. > Use of uninitialized value in subroutine entry at > /Library/Perl/5.8.6/Template/Provider/Encoding.pm line 24. > Use of uninitialized value in pattern match (m//) at > /Library/Perl/5.8.6/Template/Provider/Encoding.pm line 33. > Use of uninitialized value in subroutine entry at > /Library/Perl/5.8.6/Template/Provider/Encoding.pm line 24. > Use of uninitialized value in pattern match (m//) at > /Library/Perl/5.8.6/Template/Provider/Encoding.pm line 33. > Use of uninitialized value in subroutine entry at > /Library/Perl/5.8.6/Template/Provider/Encoding.pm line 24. > Use of uninitialized value in pattern match (m//) at > /Library/Perl/5.8.6/Template/Provider/Encoding.pm line 33. > Use of uninitialized value in subroutine entry at > /Library/Perl/5.8.6/Template/Provider/Encoding.pm line 24. > > > Here's a possible solution: > > 33 $data->{text} ||= ''; # avoid undefined value warnings > 34 my $encoding = $data->{text} =~ /^\[% USE encoding '([\w\-]+)'/ > 35 ? $1 : $self->{DEFAULT_ENCODING}; > > > In other words: define $data->{text} before testing it. >

> Do you know in what circumstance $data->{text} can be undefined?