1print <<DUMMY_TEST;
2ok 1
3ok 2
4ok 3
5ok 4
6DUMMY_TEST
7
8eval "use vmsish 'hushed'" if ($^O eq 'VMS');
9exit 1;
10