| Subject: | uninit $srclines_array when merged |
| Date: | Tue, 20 Mar 2012 15:05:47 +0000 |
| To: | bug-Devel-NYTProf [...] rt.cpan.org |
| From: | Zefram <zefram [...] fysh.org> |
After merging a small group of nytprof.out files using nytprofmerge,
reading the merged file using Devel::NYTProf::Data generates many warnings
that I didn't get from any of the individual files:
$ perl -MDevel::NYTProf::Data -lwe '$|=1; Devel::NYTProf::Data->new({filename=>"nytprof-t6.out"})' 2>&1 | uniq -c
1 Reading nytprof-t6.out
1
1 Processing nytprof-t6.out data
1
6300 Use of uninitialized value $srclines_array in join or string at /opt/perl-5.12.3/lib/site_perl/5.12.3/x86_64-linux-ld/Devel/NYTProf/FileInfo.pm line 491.
Looking at the code, I believe the warning is incorrectly identifying
the uninitialised value; it must be elements of @$srclines_array, not
$srclines_array itself, that are undef.
-zefram