prompt> perl source.pl &

##</code><code>##

use strict;

fork() and exit(0);

print "Now in the child process\n";