Select Code to Download

#!/usr/bin/perl -slw
use strict;
...
}
$dbh->disconnect();

./lines_dispacher_and_consumer_threads.pl 
Thread 1 terminated abnormally: Can't locate IO::Socket::INET::Daemon 
+in @INC (@INC contains: /root/perl5/lib/perl5/5.16.3/x86_64-linux-thr
+ead-multi /root/perl5/lib/perl5/5.16.3 /root/perl5/lib/perl5/x86_64-l
+inux-thread-multi /root/perl5/lib/perl5 /usr/local/lib64/perl5 /usr/l
+ocal/share/perl5 /usr/lib64/perl5/vendor_perl /usr/share/perl5/vendor
+_perl /usr/lib64/perl5 /usr/share/perl5 .) at ./lines_dispacher_and_c
+onsumer_threads.pl line 10.
...
    10 running and unjoined
    1 finished and unjoined
    0 running and detached