Re^5: Catching a 'division by zero' error with Exception::Class

First of all, the file open does not need to go into an eval. Secondly, as far as I can see the else will trigger on a successful run (ie no error)
Are you sure the uunwritable file is really unwritable? and that you arent just successfully opening the file?
UPDATE: Looking at the examples in the docs for Exception::Class they seem to make the assumption that your eval always throws an exception. Try changing

ref $e ? $e->rethrow : die $e;
[download]

ref $e ? $e->rethrow : die $e if $e;
[download]

It says that caught without args simply returns $@ (which if successful will be undef), so that will keep it from throwing the empty die you are seeing

-pete
"Worry is like a rocking chair. It gives you something to do, but it doesn't get you anywhere."

Comment on Re^5: Catching a 'division by zero' error with Exception::Class Select or Download Code

Replies are listed 'Best First'.
Re^6: Catching a 'division by zero' error with Exception::Class by baurel (Sexton) on Sep 15, 2008 at 18:09 UTC
> Are you sure the uunwritable file is really unwritable? OK, I think that's the problem. I made the file unread/unwritable (chmod 111) but this doesn't seems to make the file unwritable. Hmm... How can I raise this exception?	[reply]