Come si usa un modulo Perl in una directory non in @INC?

Question

Ho un modulo nella directory principale del mio script e vorrei "usarlo".

Se faccio

use '../Foo.pm'; 

ottengo errori di sintassi.

ho cercato di fare:

push @INC, '..'; 
use EPMS; 

e .. a quanto pare non si presenta in @INC

sto impazzendo! Cosa c'è che non va qui?

Answer 1

use avviene al momento della compilazione, quindi questo dovrebbe funzionare:

BEGIN {push @INC, '..'} 
use EPMS; 

Ma la soluzione migliore è quella use lib, che è un modo migliore di scrivere quanto sopra:

use lib '..'; 
use EPMS; 

In caso si sta eseguendo da una directory diversa, tuttavia, l'uso di FindBin è consigliato:

use FindBin;      # locate this script 
use lib "$FindBin::RealBin/.."; # use the parent directory 
use EPMS; 

Answer 2

È necessario avere lo push elaborato prima che lo use sia - e use venga elaborato in anticipo. Quindi, ho bisogno di un BEGIN { push @INC, ".."; } per avere una possibilità, credo.

Answer 3

'use lib' è la risposta, come @ephemient menzionato in precedenza. Un'altra opzione è usare require/import invece di use. Significa che il modulo non verrebbe caricato in fase di compilazione, ma in runtime.

Ciò consentirà di modificare @INC come si è tentato lì, oppure è possibile passare richiedere un percorso al file anziché il nome del modulo. Da 'perldoc -f require':

Se ESPR è un bareword, la richiedono assume un'estensione ".pm" e sostituisce '::' con '/' nel nome del file per voi, per rendere più facile a carica moduli standard. Questa forma di caricamento dei moduli non rischia di alterare lo spazio dei nomi con .

Answer 4

Esistono diversi modi per modificare @INC.

• set PERL5LIB, come documentato in perlrun

• utilizzare l'interruttore -I sulla riga di comando, documentato anche in perlrun. Puoi anche applicarlo automaticamente con PERL5OPT, ma usa PERL5LIB solo se hai intenzione di farlo.

• use lib all'interno del programma, anche se questo è fragile poiché un'altra persona su una macchina diversa potrebbe averla in una directory diversa.

• Modificare manualmente @INC, assicurandosi di farlo al momento della compilazione se si desidera utilizzare un modulo. Questo è troppo lavoro però.

Answer 5

Personalmente preferisco tenere i miei moduli (quelli che scrivo per me stesso o per sistemi posso controllare) in una determinata directory, e anche di metterli in una sottodirectory. Come in:

/www/modules/MyMods/Foo.pm 
/www/modules/MyMods/Bar.pm 

E poi dove li uso:

use lib qw(/www/modules); 
use MyMods::Foo; 
use MyMods::Bar; 

Per inciso .. quando si tratta di spingere, io preferisco il grasso-freccia virgola:

push @array => $pushee; 

Ma è solo una questione di preferenza.

Answer 6

Come riportato da "perldoc -f uso":

Esso è esattamente equivalente a
BEGIN { require Module; import Module LIST; }
eccetto che il modulo deve essere un bareword.

Mettere che un altro modo, "l'uso" è equivalente a:

• in esecuzione al momento della compilazione,
• convertire il nome del pacchetto da un nome di file,
• require -ing che il nome del file e
• import -ing quel pacchetto.

Così, invece di chiamare l'uso, è possibile chiamare richiedere e importare all'interno di un blocco BEGIN:

BEGIN { 
    require '../EPMS.pm'; 
    EPMS->import(); 
} 

E, naturalmente, se il modulo non effettivamente fare qualsiasi simbolo di esportazione o altra inizializzazione quando si chiama import, è possibile lasciare questa riga fuori:

BEGIN { 
    require '../EPMS.pm'; 
}