Have you tried to wrap your code in an eval and evaluate the error message that comes back?

eval {
  # code here
};
if ($@) {
  confess "$@";
}
[download]