Yes, diagnostics can:

#!/usr/bin/perl -w
use diagnostics;
crash();
sub crash($$){die@_}
__END__
main::crash() called too early to check prototype at file.pl line 3 (#
+1)
    (W prototype) You've called a function that has a prototype before
+ the
    parser saw a definition or declaration for it, and Perl could not 
+check
    that the call conforms to the prototype.  You need to either add a
+n
    early prototype declaration for the subroutine in question, or mov
+e the
    subroutine definition ahead of the call to get proper prototype
    checking.  Alternatively, if you are certain that you're calling t
+he
    function correctly, you may put an ampersand before the name to av
+oid
    the warning.  See perlsub.

Died at file.pl line 4 (#2)
    (F) You passed die() an empty string (the equivalent of die "") or
    you called it with no args and both $@ and $_ were empty.

Uncaught exception from user code:
        Died at file.pl line 4.
        main::crash() called at file.pl line 3
[download]