RE: Trapping Carp::croak

[Bullock, Howard A.]

I have stripped my PerlSvc program to a minimal MIME::Lite email
program. Using a firewall I blocked access to the mailhost and tested
the "eval" code as both of you suggested and then using an "if" block to
check [EMAIL PROTECTED]

The "croak" was indeed trapped using the syntax: 
    
eval {$msg->send};
if ($@) {
   WriteLog( "Failed to send: $@");
}
else {
    WriteLog("message sent");
}

Thanks for the input.
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs