Next Making Programs Faster 83

Turnaround

        FORK: {
           if ( $pid = fork ) {
              # exit parent
              CORE::exit;
              }
           elsif ( defined $pid ) {
              close(STDIN);
              close(STDOUT);
              close(STDERR);
              open(STDOUT,">>/programs/cassens/DC/CO/eHub/FordXML.stdout");
              open(STDERR,">>/programs/cassens/DC/CO/eHub/FordXML.stderr");
              }


Next Copyright © 2003 M. J. Dominus