Why not just set the standard PERL5LIB env which get placed at the beginning of @INC?<br><br><div class="gmail_quote">On Tue, Aug 24, 2010 at 11:08 AM, Michael Friedman <span dir="ltr"><<a href="mailto:friedman@highwire.stanford.edu">friedman@highwire.stanford.edu</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">David,<br>
<br>
I managed a work around for this behavior at my office a while ago. We have each developer set an environment variable containing their personal module path and use that in preference to the default. It requires this at the top of each script, though:<br>
<br>
BEGIN {<br>
if ( $ENV{PERL_LIB} =~ /\:/ ) {<br>
unshift( @INC, split( /\:/, $ENV{PERL_LIB} ) );<br>
}<br>
elsif ( $ENV{PERL_LIB} ) {<br>
unshift( @INC, $ENV{PERL_LIB} );<br>
}<br>
else {<br>
unshift( @INC, '/path/to/production/lib/perl5' );<br>
}<br>
}<br>
<br>
<br>
The colon splitting was added when we realized we wanted to split our perl modules into multiple CVS projects. They're all in one production directory, but in individual project directories for each developer.<br>
<br>
-- Mike<br>
______________________________________________________________________________<br>
Mike Friedman | HighWire Press, Stanford Univ | <a href="mailto:friedman@highwire.stanford.edu">friedman@highwire.stanford.edu</a><br>
<div><div></div><div class="h5"><br>
On Aug 24, 2010, at 10:53 AM, David Alban wrote:<br>
<br>
> greetings,<br>
><br>
> one of our customary 'use lib' statements for a local program is:<br>
><br>
> use lib '/nas/reg/lib/perl';<br>
><br>
> i'm modifying the program and in my development area, i want to use a<br>
> locally modified version of one of the modules it uses.<br>
><br>
> but it's picking up the installed module rather than my local module.<br>
><br>
> here's what i'm seeing:<br>
><br>
> DB<1> l 1+10<br>
> 1 #!/usr/bin/perl<br>
> 2<br>
> 3: use strict;<br>
> 4: use warnings;<br>
> 5<br>
> 6: use lib '/nas/reg/lib/perl';<br>
> 7<br>
> 8 ##### => dbg<br>
> 9: use lib<br>
> '/nas/home/dalban/perforce/srwd00reg001/default/internal/reg/pb_reg_nasify_properties/lib/perl';<br>
> 10 ##### <= dbg<br>
> 11<br>
> DB<2> x @INC<br>
> 0 '/nas/reg/lib/perl/x86_64-linux-thread-multi'<br>
> 1 '/nas/reg/lib/perl/5.8.5'<br>
> 2 '/nas/reg/lib/perl'<br>
> 3 '/nas/home/dalban/perforce/srwd00reg001/default/internal/reg/pb_reg_nasify_properties/lib/perl'<br>
><br>
> and if i reverse the order in which i "use" them, i get:<br>
><br>
> DB<1> l 1+10<br>
> 1 #!/usr/bin/perl<br>
> 2<br>
> 3: use strict;<br>
> 4: use warnings;<br>
> 5<br>
> 6 ##### => dbg<br>
> 7: use lib<br>
> '/nas/home/dalban/perforce/srwd00reg001/default/internal/reg/pb_reg_nasify_properties/lib/perl';<br>
> 8 ##### <= dbg<br>
> 9<br>
> 10: use lib '/nas/reg/lib/perl';<br>
> 11<br>
> DB<2> x @INC<br>
> 0 '/nas/reg/lib/perl/x86_64-linux-thread-multi'<br>
> 1 '/nas/reg/lib/perl/5.8.5'<br>
> 2 '/nas/reg/lib/perl'<br>
> 3 '/nas/home/dalban/perforce/srwd00reg001/default/internal/reg/pb_reg_nasify_properties/lib/perl'<br>
><br>
> i thought 'use lib' had the effect of unshifting its arg onto @INC,<br>
> but /nas/reg/lib/perl seems to "win" no matter in what order i specify<br>
> the libs.<br>
><br>
> i've done this before with no problem. i'm sure i'm missing<br>
> something. or perhaps it only seemed to work before...<br>
><br>
> what am i missing?<br>
><br>
> thanks,<br>
> david<br>
> --<br>
> Live in a world of your own, but always welcome visitors.<br>
> _______________________________________________<br>
> SanFrancisco-pm mailing list<br>
> <a href="mailto:SanFrancisco-pm@pm.org">SanFrancisco-pm@pm.org</a><br>
> <a href="http://mail.pm.org/mailman/listinfo/sanfrancisco-pm" target="_blank">http://mail.pm.org/mailman/listinfo/sanfrancisco-pm</a><br>
<br>
_______________________________________________<br>
SanFrancisco-pm mailing list<br>
<a href="mailto:SanFrancisco-pm@pm.org">SanFrancisco-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/sanfrancisco-pm" target="_blank">http://mail.pm.org/mailman/listinfo/sanfrancisco-pm</a><br>
</div></div></blockquote></div><br>