Perl Module lokal machen und für einige, aber nicht für andere erkennen ⇐ Linux

[Anonymous]

Ich habe ein Skript, das sich mit lokalen Modulen in /home/con/nwchem/ionize/nwchem.info/:
befasst

Code: Select all

#!/usr/bin/env perl

use FindBin 1.51 qw( $RealBin ); # use local versions so users don't have to install
use lib "$RealBin/lib";
use strict;
use feature 'say';
use warnings FATAL => 'all';
use autodie ':default';
use Devel::Confess 'color';
use JSON 'encode_json';
use DDP {output => 'STDOUT', array_max => 10, show_memsize => 1};
#use re 'debugcolor';
use Module::Path 'module_path';

foreach my $module ('JSON', 'DDP', 'Devel::Confess') {
my $path = module_path($module);
if (defined($path)) {
print "$module\t$path\n";
} else {
print "Danger Will Robinson!\n";
}
}

wobei 3 Dateien im selben Verzeichnis enthalten sind: ddp.pm, json.pm und Confess.pm
Diese Ausgaben:

Code: Select all

JSON    /home/con/nwchem/ionize/nwchem.info/JSON.pm
DDP /home/con/nwchem/ionize/nwchem.info/DDP.pm
Devel::Confess  /home/con/perl5/perlbrew/perls/perl-5.40.1/lib/site_perl/5.40.1/Devel/Confess.pm
< /code>
So werden JSON und DDP lokal geladen, aber Devel :: gestimmen ist nicht.use lib "$RealBin/lib";
< /code>
und < /p>
use lib $Realbin;
< /code>
und < /p>
use lib "$RealBin/.";
< /code>
, aber keiner dauert Perl auf das Laden von Devel :: Bekenntnis aus dem aktuellen Verzeichnis.  Ich rate  zu , dass es etwas mit dem :: 

im Namen zu tun hat.
Ich habe auch einen symbolischen Link in a erstellt Devel Verzeichnis, ln -S Confess.pm Devel/ Aber das hat auch nicht funktioniert.
@inc ist

Code: Select all

[
[0] "/home/con/nwchem/ionize/nwchem.info",
[1] "/home/con/perl5/perlbrew/perls/perl-5.40.1/lib/site_perl/5.40.1/x86_64-linux",
[2] "/home/con/perl5/perlbrew/perls/perl-5.40.1/lib/site_perl/5.40.1",
[3] "/home/con/perl5/perlbrew/perls/perl-5.40.1/lib/5.40.1/x86_64-linux",
[4] "/home/con/perl5/perlbrew/perls/perl-5.40.1/lib/5.40.1"
] (591B)

Wie kann ich Entwicklung erhalten:>