Help for this page

Select Code to Download


  1. or download this
    my $NUM_THREADS = 5;
    my $BUFFER_SIZE = 1;
    ...
    }
    
    $writerThr->join();
    
  2. or download this
    my $thr  = threads->create( sub {
        my $threadId = $i;
    ...
    
        close $REFERENCE_FILE;
    } );#end sub
    
  3. or download this
    my $writerThr = threads->create( sub {
        my $numSeedsInv = 1.0 / $numSeeds;
    ...
        close $EXTENSION_FILE;
        close $UNMATCHED_FILE;
    } );