There are many ways to catch exceptions. You could use eval(), but using eval() will not work for warnings from the compiler, from the POD:

Beware that using "eval" neither silences perl from printing warnings 
+to STDERR, nor does it stuff the text of warning messages into $@.
[download]

hope this helps,