Help for this page

Select Code to Download


  1. or download this
    use strict;
use CGI::Carp qw/fatalsToBrowser set_message/;

...
}

die('[this is the message passed to die]');
  2. or download this
    [this is the message passed to die] at /home/evan/dietest.cgi line 18.
  3. or download this
    sub die_nice {
  my $err = shift;
  $err =~ s/ at \S+ line \d+//g
...
  print "</body>\n</html>\n";
  warningsToBrowser(1);
}