xref: /openbsd-src/gnu/usr.bin/perl/cpan/Test-Simple/t/lib/SigDie.pm (revision b39c515898423c8d899e35282f4b395f7cad3298)
1*b39c5158Smillertpackage SigDie;
2*b39c5158Smillert
3*b39c5158Smillertuse strict;
4*b39c5158Smillert
5*b39c5158Smillertour $DIE;
6*b39c5158Smillert$SIG{__DIE__} = sub { $DIE = $@ };
7*b39c5158Smillert
8*b39c5158Smillert1;
9