Help for this page

Select Code to Download


  1. or download this
    use CGI::Carp;
eval { die "Ouch!" };
print $@, "\n";
__OUTPUT__
Ouch at C:/Perl/lib/CGI/Carp.pm line 312.
  2. or download this
    use Carp;
eval { die "Ouch" };
print $@, "\n";
__OUTPUT__
Ouch at C:\Perl\scripts\mytest.pl line 6.
  3. or download this
    <p>
eval { CORE::die "Ouch" }
print $@, "\n";
__OUTPUT__
Ouch at C:\Perl\scripts\mytest.pl line 5.