Select Code to Download

   my $pid = fork();
   die "Ouch, can't fork: $^En\" unless defined $pid;
   unless ($pid) {
     ...
   }

   unless (my $pid = fork()) {
     die "Ouch, can't fork: $^En\" unless defined $pid;
     ...
   }