Help for this page

Select Code to Download


  1. or download this
    ($die_on_error ? \&CORE::die : \&CORE::warn)->($error);
  2. or download this
    Undefined subroutine &CORE::warn called
  3. or download this
    ($die_on_error ? sub { die shift } : sub { warn shift } )->($error);
  4. or download this
    die $error if $die_on_error;
warn $error;