Subject: | Item.pm substrFOM causing errors |
/var/www/cgi-bin/fom-meta/errors includes hundreds of each of the following errors each week:
2.719 note search ### <(noID)> Perl warning: substr outside of string at /usr/lib/perl5/site_perl/5.8.5/FAQ/OMatic/Item.pm line 2252.
2.719 note search ### <(noID)> Perl warning: Use of uninitialized value in concatenation (.) or string at /usr/lib/perl5/site_perl/5.8.5/FAQ/OMatic/Item.pm line 1980.
2.719 note search ### <(noID)> Perl warning: Use of uninitialized value in substr at /usr/lib/perl5/site_perl/5.8.5/FAQ/OMatic/Item.pm line 2252.
It looks like substrFOM is called a couple of times, each time only passing it 2 of the expected 3 variables. The 3rd variable (undefined) causes the error. I've corrected this by changing line 2252 of /usr/lib/perl5/site_perl/5.8.5/FAQ/OMatic/Item.pm as follows:
Old: return substr($string,$width,$result);
New: return substr($string,$width,20);
I expect this is not a very good solution, but it eliminates the errors.
Fedora Core 3
perl v5.8.5 built for i386-linux-thread-multi
Linux gummi.nmmi.edu 2.6.9-1.667smp #1 SMP Tue Nov 2 14:59:52 EST 2004 i686 i686 i386 GNU/Linux
Thanks,
Bryan