use strict; use warnings; #use diagnostics; use FindBin; use lib "$FindBin::Bin/lib64/perl5/5.8.5/x86_64-linux-thread-multi"; use lib "$FindBin::Bin/lib64/perl5/5.8.5/x86_64-linux-thread-multi/auto"; use lib "$FindBin::Bin/lib64/perl5/site_perl/5.8.5"; use lib "$FindBin::Bin/lib64/perl5/site_perl/5.8.5/auto"; use lib "$FindBin::Bin/lib64/perl5/site_perl/5.8.5/x86_64-linux-thread-multi"; use lib "$FindBin::Bin/lib64/perl5/site_perl/5.8.5/x86_64-linux-thread-multi/auto"; use lib "$FindBin::Bin/lib/perl5/5.8.5/i386-linux-thread-multi"; use lib "$FindBin::Bin/lib/perl5/5.8.5/i386-linux-thread-multi/auto"; use lib "$FindBin::Bin/lib/perl5/site_perl/5.8.5"; use lib "$FindBin::Bin/lib/perl5/site_perl/5.8.5/auto"; use lib "$FindBin::Bin/lib/perl5/site_perl/5.8.5/i386-linux-thread-multi"; use lib "$FindBin::Bin/lib/perl5/site_perl/5.8.5/i386-linux-thread-multi/auto";