Help for this page

Select Code to Download


  1. or download this
    while( my $node = $Qjob->dequeue ) {
        if( $node->{canBeSet} ) {
    ...
            $Q->enqueue( $node ); ## push back for next time.
        }
    }
    
  2. or download this
    sub killThread{
        my $self = shift;
    ...
            my $amtInQ = $queue->pending();
            last if $done && $amtInQ == 0;
            ...
    
  3. or download this
    sub killThread{
        $queue->enqueue( undef );
    }
    
  4. or download this
    while( 1 ) {
        my $node = $queue->dequeue; 
    ...
            $Q->enqueue( $node ); ## push back for next time.
        }
    }