Select Code to Download

sub err {
    $Carp::CarpLevel = $carplevel;
...
        confess "You did something bad!"; #line 14
    }
}