Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

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

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 monks are chillaxin'...

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (6)
As of 2018-03-22 02:24 GMT
Find Nodes?
    Voting Booth?
    When I think of a mole I think of:

    Results (272 votes). Check out past polls.