Re: Package name overlap

Yes use lib will work and it will load the module from the library which is provided by use lib but better go with include the directory to @INC at the beginning with unshift operator and call that through BEGIN block

For example

use FindBin qw($RealBin);
use File::Spec::Functions qw(catdir);
BEGIN {
    my @dirs = splitdir(canonpath($RealBin));
    my($path) = grep { -e $_ } ( map { $_ = catdir(@dirs[0 .. $#dirs -
+ $_]).'pathtoModule' } (0 .. $#dirs) );
    unshift(@INC, $RealBin, $path);
}
[download]

Please let me know if you have anything unclear and you

Comment on Re: Package name overlap Download Code

Replies are listed 'Best First'.
Re^2: Package name overlap by Anonymous Monk on Feb 19, 2013 at 14:43 UTC
Why not use? `use FindBin qw( $RealBin ); use lib "$RealBin/../pathToModule";` [download] What do you think you're avoiding with your extra code block?	[reply] [d/l]