print "About to fork:\n";

my $pid = fork();
  if ($pid ==0)
    {
      exec "sleep 5";
      exit(0);
    }
  else
    {
      print "Child PID: $pid\n";
    }
print "Parent continuing...\n";