xref: /openbsd-src/gnu/usr.bin/perl/cpan/Test-Simple/t/lib/SigDie.pm (revision 1ad61ae0a79a724d2d3ec69e69c8e1d1ff6b53a0)

package SigDie;

use strict;

our $DIE;
$SIG{__DIE__} = sub { $DIE = $@ };

1;