Spostamento/clonazione di un perlbrew installato perl più tutti i moduli cpan aggiuntivi

Question

Sto usando perlbrew. Ho installato molti moduli cpan sotto perlbrew perl-5.20.2.

C'è un modo (o qual è il modo migliore) per fare un'installazione di tarball del mio perl-5.20.2 oltre a tutti i moduli CPAN che ho installato in perlbrew in modo che io possa semplicemente clonarlo su un'altra macchina?

Sono a conoscenza di perlbrew download perl-5.20.2 ma che sembra solo tarball perl-5.20.2 e non tutti i moduli CPAN che ho installato.

Answer 1

Con perlbrew è possibile utilizzare il comando lib per creare un local::lib da utilizzare con il perlbrew perl.

perlbrew lib create perl-5.20.2@app_reqs 

Poi, se tutto va bene, quando si installa i moduli si trovano in:

$HOME/.perlbrew/libs/perl-5.20.2@app_reqs 

Se non si utilizza l'approccio perbrew lib create per la gestione dei moduli, allora essi vengono installati $HOME/perl5/perlbrew/perls/perl-5.20.1/lib/site_perl/5.20.2. La clonazione di una di queste directory potrebbe funzionare, ma probabilmente è meglio reinstallare tutti i moduli utilizzando le tecniche dallo perlbrew.pl website poiché i moduli XS devono essere ricostruiti ecc..

Se si desidera riutilizzare e tenere traccia delle sorgenti locali, l'approccio più affidabile consiste nel creare un mirror CPAN locale da utilizzare utilizzando App::lcpan o minicpan. Se avete già scaricato il sorgente utilizzando cpanm un approccio hacker rapido è quello di trovare i file di origine (sotto $HOME/.cpanm/) e di fare qualcosa di simile nel tuo guscio:

% mkdir ~/cpansourcefiles 
% for source in ~/.cpanm/work/*/* ; do cp $source ~/cpansourcefiles ;done 

Allora si può ottenere cpanm installare l'utilizzo di tali fonti di passando il nome del file come argomento invece del nome del modulo:

% cpanm ~/cpansourcefiles/List-MoreUtils-0.406.tar.gz 

o anche:

% cpanm ~/cpansourcefiles/* 

NB: YMMV poiché questo è soggetto a rotture e potrebbe saltare parte della verifica della versione e delle dipendenze che si ottiene normalmente con cpanm ma è più semplice che configurare un mirror quando funziona.

---

Alcuni altri strumenti ad alta potenza che rendono la distribuzione di applicazioni Perl robusto ed affidabile:

• Carton
• Pinto

---

EDIT:

Strumenti come perlbrew, pinto, carton e cpanm rappresentano un enorme miglioramento rispetto a una raccolta personale eterogenea di script per fare cose simili. Grazie a tutti gli sviluppatori e contributori a questi strumenti!

Io non sono a conoscenza di tutte le funzioni di cpanm o perlbrew che consentono di produrre in modo affidabile un elenco dei file installati e le loro versioni. Qualcosa di simile:

cpanm --list_installed 
perlbrew list_installed_versions 

o:

cpanm --export-cpanfile 
perlbrew list_installed_as_cpanfile 

potrebbe essere una caratteristica di benvenuto.

Come ho notato in un commento all'OP sopra, è possibile ottenere informazioni utili sull'installazione del modulo dai file install.json installati da cpanm. Anche i moduli come CPAN::Meta, Module::Metadata e Distribution::Metadata possono essere utili.

Il suggerimento di usare find e jq (che era da @Ilmari Karonen vedere Upgrade all modules installed by local::lib in this answer) ha portato alla mod incompiuta rapido qui di seguito. Una sfida/problema è che non c'è a volte install.json file lasciati in giro in più posizioni:

• lib/perl5/$Config{archname}/.meta/Whatever-Mod-1.0050000/install.json
• lib/perl5/$Config{archname}/.meta/Whatever-Mod-1.0090000/install.json
• ... ecc

Ciò è probabilmente perché questi file sono non sempre rimosso in modo pulito durante l'aggiornamento, la reinstallazione o altri problemi relativi agli errori PEBKAC. Per funzionare correttamente, il codice riportato di seguito deve essere modificato in modo che venga visualizzato quando sono presenti più combinazioni di versioni di nome di install.json di un modulo e quindi verifica in modo più approfondito che il modulo sia installato e ottenga la sua versione. Lo script dovrebbe avere opzioni: $dir potrebbe provenire da @ARGV. TIMTOWTDI, "well volunteered", ecc..

#!perl 
# list_installed_mods.pl 
# DOES NOT THOROUGHLY VERIFY CURRENT VERSION 

use File::Find;          
use JSON;          
use v5.16;  
my $dir = "$ENV{HOME}/perl5/lib/perl5";  

for my $installed (find_installed($dir)) {  
    say parse_install_json($installed);  
} 

sub find_installed { 
    my $libdir = shift;  
    my @files; 
    File::Find::find ({ wanted => 
    sub { push @files, $File::Find::name if /install\.json/i} }, 
    $libdir); 
    return @files; 
} 

sub parse_install_json { 
    my $filename = shift; 
    my $json_text = do { 
    open(my $json_fh, "<:encoding(UTF-8)", $filename)     
     or die("Can't open \$filename\": $!\n");       
    local $/; 
    <$json_fh>               
    }; 
    my $install = decode_json($json_text) ; 
    return ($install->{name} ,"\@", $install->{version}) ; 
} 

Answer 2

Forse non il modo migliore, ma ecco cosa ho fatto di recente.

Ho eseguito il commit della mia versione Perlbrewed Perl su un repository git, quindi ho potuto usare git archive per creare un tar per me.Allo stesso modo con i miei moduli Local::Lib. Poi ho scritto un po 'di script in modo che potessi taggare master, creare archivi da un tag, copiare l'archivio sul server remoto, decomprimere e chmod/chown i file.

Ho fatto questo perché all'epoca era una soluzione rapida e sporca non avere il tempo di impostare Pinto o Cartone.

Answer 3

È solo una parte della soluzione, ma la cosa è stata citata finora: lo script di configurazione di Perl ha un parametro -D relocateableinc da alcune versioni. Quando costruisci/produci un Perl con quell'opzione i percorsi lib non saranno percorsi assoluti hardcoded ma relativi al binario perl che ti permette di spostare l'intera directory o semplicemente rinominarla. Sto costruendo tutti i miei Perl con quell'opzione da anni e finora non ha creato alcun problema.