| Subject: | use of uninitialized variables |
| Date: | Fri, 8 Sep 2006 12:44:28 -0700 |
| To: | bug-Getopt-Fancy [...] rt.cpan.org |
| From: | Catherine Olschanowsky <cmills [...] sdsc.edu> |
Getopt-Fancy-0.02.tar
perl -v
This is perl, v5.8.0 built for i386-linux-thread-multi
(with 1 registered patch, see perl -V for more detail)
This module used uninitialized variables which causes warning like
the following:
Use of uninitialized value in length at /projects/pmac/apps/pmactest/
lib/Getopt/Fancy.pm line 44.
Use of uninitialized value in concatenation (.) or string at /
projects/pmac/apps/pmactest/lib/Getopt/Fancy.pm line 95.
Use of uninitialized value in concatenation (.) or string at /
projects/pmac/apps/pmactest/lib/Getopt/Fancy.pm line 95.
Use of uninitialized value in concatenation (.) or string at /
projects/pmac/apps/pmactest/lib/Getopt/Fancy.pm line 95.
Use of uninitialized value in index at /projects/pmac/apps/pmactest/
lib/Getopt/Fancy.pm line 117.
Use of uninitialized value in index at /projects/pmac/apps/pmactest/
lib/Getopt/Fancy.pm line 117.
Use of uninitialized value in index at /projects/pmac/apps/pmactest/
lib/Getopt/Fancy.pm line 117.
The fix is trivial - only 3 variables are affected.
line 44
if($values{EX}){
$maxexlen = length ($values{EX}) if (length($values{EX}) >
$maxexlen);
}
line 95 and 117
variable $conf->{$_}->{GT} should default to "" for flags
or should be documented as required
Also:
my $maxoptlen=0;
my $maxexlen=0;