How do I continuing handling severe error with Perl?

Question

I have a Perl program. An error occurs that prevents program from continuing in known state.

• I want to email this error.
• I may want to clean-up filesys