package modes;
my $lP;
my $modCount = 0;
BEGIN{
 $lP = "$ARGV[1]";
}
use lib $lP;
if(opendir(LIB, $lP)){
 foreach my $l (readdir(LIB)){
  unless ($l !~ /^(.*)\.pm$/){
   eval qq~require ~ . $ARGV[1] . qq~::~ . $1 . qq~;~;
   print $@;
  }
 }
}


##</code><code>##

Can't locate english/eight.pm in @INC (you may need to install the english::eight module) (@INC contains: english /home/******/perl5/lib/perl5/5.26.1/x86_64-linux-gnu-thread-multi /home/*********/perl5/lib/perl5/5.26.1 /home/***/perl5/lib/perl5/x86_64-linux-gnu-thread-multi /home/******/perl5/lib/perl5 /etc/perl /usr/local/lib/x86_64-linux-gnu/perl/5.26.1 /usr/local/share/perl/5.26.1 /usr/lib/x86_64-linux-gnu/perl5/5.26 /usr/share/perl5 /usr/lib/x86_64-linux-gnu/perl/5.26 /usr/share/perl/5.26 /home/****/perl5/lib/perl5/5.26.0 /home/*****/perl5/lib/perl5/5.26.0/x86_64-linux-gnu-thread-multi /usr/local/lib/site_perl /usr/lib/x86_64-linux-gnu/perl-base) at (eval 5) line 1.