The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
print <<DUMMY_TEST;
ok 1
ok 2
ok 3
ok 4
DUMMY_TEST

use if $^O eq 'VMS', vmsish => 'hushed';
exit 1;