xref: /openbsd/gnu/usr.bin/perl/cpan/Test-Harness/t/sample-tests/die (revision b39c5158)

eval "use vmsish 'hushed'" if ($^O eq 'VMS');
exit 1;  # exit because die() can be noisy