Help for this page

Select Code to Download


  1. or download this
    use strict;
    
    ...
    print "Got shared signal from slave thread\n";
    
    $pool->shutdown();
    
  2. or download this
    Starting the Thread::Pool
    
  3. or download this
    Starting the Thread::Pool
    Thread::Pool started
    ...
    Waiting for the slave thread to set the shared signal
    Sleeping and waiting for signal from slave thread
    Got shared signal from slave thread