I am running a mod_perl application that makes calls to the Oracle XMl
dbi interface (XML::Generator::DBI) . The Apache log file shows the following error


Use of uninitialized value in string eq at /usr/lib/perl5/site_perl/5.8.5/XML/Generator/DBI.pm line 180
The same error is at line 187.


The code at this point in DBI.pm is :

        my $ind = 0;
        while ($el_stack[$ind] eq $stack[$ind] and
               $ind <= $stack_len and
               $ind <= $el_stack_len)
        {
            $ind ++;
        }

if ($el_stack[$ind] eq $stack[$ind] and $el_stack_len == $stack_len) {
# We're already at the end of the stack, so output the column
$proxy->send_tag($names->[$i], $row->[$i],
$encoding->[$i] ?
('dbi:encoding' => $encoding->[$i])
:
()
) if defined($row->[$i]);
}



Line 180 is the while statement

Any suggestions on how to debug this ?

_______________________________________________
Boston-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/boston-pm

Reply via email to