Plan 9 from Bell Labs’s /usr/web/sources/contrib/gabidiaz/root/sys/src/cmd/perl/t/lib/sample-tests/die
use if ($^O eq 'VMS'), vmsish => 'hushed'; exit 1; # exit because die() can be noisy
