HEX
Server: Apache
System: Linux 185.122.168.184.host.secureserver.net 5.14.0-570.60.1.el9_6.x86_64 #1 SMP PREEMPT_DYNAMIC Wed Nov 5 05:00:59 EST 2025 x86_64
User: barbeatleanalyti (1024)
PHP: 8.1.33
Disabled: NONE
Upload Files
File: //root/.cpanm/latest-build/version-0.9933/t/05sigdie.t
#! /usr/local/perl -w
# Before `make install' is performed this script should be runnable with
# `make test'. After `make install' it should work as `perl test.pl'

#########################

use Test::More tests => 1;

BEGIN {
    $SIG{__DIE__}   = sub {
	warn @_;
	BAIL_OUT( q[Couldn't use module; can't continue.] );
    };
}

BEGIN {
    use version 0.9933;
}

pass "Didn't get caught by the wrong DIE handler, which is a good thing";