Next System Programming in Perl 27

Environment Variables

        my $X = "parent\n";
        if (fork() == 0) {   # I'm the child
          $X = "child\n";
        }
        print $X;
        parent
        child


Next 27