if($Config{use5005threads}) { debug("5005 Threads\n"); require Thread; Thread->import('yield'); require Thread::Queue; import Thread::Queue; $conn = start_connection(1); $telnetprintqueue = Thread::Queue->new(); $screenprintqueue = Thread::Queue->new(); $connectqueue = Thread::Queue->new(); } elsif($Config{useithreads}) { debug("I-Threads\n"); require threads; import threads; require Thread::Queue; import Thread::Queue; import threads::shared; share(\$CONNECT); share(\$PromptType); $telnetprintqueue = Thread::Queue->new(); $screenprintqueue = Thread::Queue->new(); $conn = start_connection(2); } else { debug("No Threads\n"); $conn = start_connection(0); }