Michael A Chase <[EMAIL PROTECTED]> wrote:
> I don't see anything there that would set $errstr. You aren't even
> using DBI and DBD::Sybase which would set $DBI::errstr.
I assumed he's got use DBI; up there somewhere above--my thought was
that he needed to match against the contents of $DBI::errstr rather
than $errstr. It also occurred to me that a caseless match would be
better here, to catch Failed and FAILED along with failed.
How about this:
if ($DBI::errstr =~ /failed/i) {print "failed found in $DBI::errstr";}
print "\n$errstr\n";
John A
