Select Code to Download

use strict;
use threads;
...
    for ( my $i = 0 ; $i < $_th_count_parse ; $i++ ) {
        $th[$i] = threads->new( \&handle_thread_parser, $i, $_queue_pa
+rse, $_queue_qualify );
    }

use strict;
use threads;
...
        $th[$i] = threads->new( \&handle_thread_parser, $i, $_queue_pa
+rse, $_queue_qualify );
    }
}