problem with INC

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

hello monks , I have this small code :

#!/usr/local/bin/perl

my $dir = "/home/user/scripts";
push (@INC, $dir);
use kp1;

sub num1
{
   kp1::hello (8);
}

&num1;
[download]

I am running the script from /home/user/scripts/myscripts which is one level lower than the directory containing kp1 but every time I run it , i get an error saying it can't use or find kp1 even though I put the correct path for $dir where the kp1 sits , any idea? thanks

Comment on problem with INC Download Code

Replies are listed 'Best First'.

Re: problem with INC
by ysth (Canon) on Jan 21, 2004 at 16:14 UTC

# make sure not to use a variable that is only set at run time
BEGIN { push (@INC, "/home/usr/scripts"); }
use kp1;
[download]

use lib "/home/usr/scripts";
use kp1;
[download]

[reply]
[d/l]
[select]

Re: problem with INC
by broquaint (Abbot) on Jan 21, 2004 at 16:18 UTC

use

@INC

use

lib

@INC

## this will modify @INC before the next 'use' statement
use lib "/home/user/scripts";

use kp1;
[download]

$dir

declared

initialized

BEGIN

HTH

_________ broquaint

[reply]
[d/l]

Re: problem with INC
by blue_cowdawg (Monsignor) on Jan 21, 2004 at 16:18 UTC

You can try

use lib "/home/user/scripts";
[download]

BEGIN{ push @INC,"/home/user/scripts";}
[download]

/home/user/scripts

To be quite honest I prefer the first method over the second one and haven't used a BEGIN block in a very long time.

Peter L. Berghold -- Unix Professional Peter at Berghold dot Net
	Dog trainer, dog agility exhibitor, brewer of fine Belgian style ales. Happiness is a warm, tired, contented dog curled up at your side and a good Belgian ale in your chalice.

[reply]
[d/l]
[select]

Re: problem with INC
by tcf22 (Priest) on Jan 21, 2004 at 16:14 UTC

lib

#!/usr/local/bin/perl

use lib "/home/user/scripts";
use kp1;
[download]

Update:

- Tom

[reply]
[d/l]
[select]


laziness, impatience, and hubris
	PerlMonks