On Thursday, October 24, 2002, at 09:26 AM, Stephan Harren wrote:
adminmail($DBI::errstr),exec ("$workdir/msmonbackup.pl") if
(!$st2->execute);
Nothing is passed to the adminmail-function !
In your connect parameters, pass RaiseError => 1 and try this:
eval { $st2->execute };
if (my $err = $@) {
adminmail($err), exec("$workdir/msmonbackup.pl");
}
Exceptions are your friends!
HTH,
David
--
David Wheeler AIM: dwTheory
[EMAIL PROTECTED] ICQ: 15726394
http://david.wheeler.net/ Yahoo!: dew7e
Jabber: [EMAIL PROTECTED]
