sub SigHUP {
print "ok 8\n";
- $n = 8;
kill 'INT', $$;
sleep 2;
- ++$n;
- print "ok $n\n";
+ print "ok 9\n";
}
sub SigINT {
- ++$n;
- print "ok $n\n";
+ print "ok 10\n";
}
}
print POSIX::strftime("ok 18 # %H:%M, on %D\n", localtime());
$| = 0;
-print '@#!*$@(!@#$';
+# The following line assumes buffered output, which may be not true with EMX:
+print '@#!*$@(!@#$' unless ($^O eq 'os2' || $^O eq 'uwin');
_exit(0);