You do not need logic to do that. It would seem better to use:
use lib '/path/to/my/misplaced/perl-modules';
The point is to not have to specify a local path at all:
use lib qw(/path);
push(@inc, '/path');
Each script tests for OS: linux/sunos, and win32, and pushes the path
to @INC accordingly, based on path names. I tried File::Spec, but use
lib won't take a variable as it's evaluated before runtime, so that
left me with push.
--
Anthony Ettinger
Signature: http://chovy.dyndns.org/hcard.html
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>