#!./perl

# $Header: op.fork,v 3.0 89/10/18 15:29:12 lwall Locked $

$| = 1;
print "1..2\n";

#if ($cid = fork) {
#   sleep 2;
#    if ($result = (kill 9, $cid)) {print "ok 2\n";} else {print "not ok 2 $result\n";}
#}
#else {
#    $| = 1;
#    print "ok 1\n";
#    sleep 10;
#}
