...
| Code Block | ||||
|---|---|---|---|---|
| ||||
my ($a, $b) = # initialize
my $answer;
if (! eval { $answer = $a / $b }) {
carp($@) if $@;
$answer = 0;
}
print "The quotient is $answer\n";
|
Exceptions
EXP31-PL-EX0: Exceptions that occur during the freeing of a resource may be suppressed in those cases where failure to free the resource cannot affect future program behavior. Examples of freeing resources include closing files or network sockets. When closed, normally or abnormally, the exception cannot influence future program behavior through any avenue other than resource exhaustion. When resource exhaustion is adequately handled, it is sufficient to sanitize and log the exception for future improvement; additional error handling is unnecessary in this case.
...
...