Help for this page

Select Code to Download


  1. or download this
    use Parallel::ForkManager;
    my $fm = Parallel::ForkManager->new(1);
    
  2. or download this
    foreach my $t (@times){
     $fm->start and next;
    
  3. or download this
     print "what's the mem doing?\n";
     sleep(10);
    ...
     }
    
    $fm->wait_all_children();