Select Code to Download

  use Parallel::ForkManager;

...
    $pm->finish; # Terminates the child process
  }
 $pm->wait_all_children;

exec $^X, '-e', 'while(){}';

exec "perl -e 'while(){}'";