On 2012-04-02 16:13, Samir Arishy wrote:
eval { $sender->send($email) };
die "Error sending email: $@" if $@;
Don't test $@, it is a global.
Make use of the return value of the eval:
eval {
$sender->send( $email );
1; # success
}
or do { # failure
my $eval_error = $@ || 'zombie error';
die 'Error sending email: ', $eval_error;
};
Or use Try::Tiny.
--
Greetings, Ruud
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
