"/etc/perl /usr/local/lib/perl/5.18.2 /usr/local/share/perl/5.18.2 /usr/lib/perl5 /usr/share/perl5 /usr/lib/perl/5.18 /usr/share/perl/5.18 /usr/local/lib/site_perl "

##</code><code>##

$libPath = join(" ", grep { $_ ne "." } @INC);

##</code><code>##

&cp($file2Copy, "$libPath/$file2Copy");