Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Re: Package name overlap

by manorhce (Beadle)
on Feb 19, 2013 at 14:33 UTC ( #1019579=note: print w/ replies, xml ) Need Help??

in reply to 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); }

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";

    What do you think you're avoiding with your extra code block?

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1019579]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (7)
As of 2015-11-30 06:25 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (759 votes), past polls