Przenoszenie/klonowanie perlbrew zainstalowanego perl plus wszystkie dodatkowe moduły cpan

Question

Używam perlbrew. Zainstalowałem wiele modułów cpan pod numerem perlbrew perl-5.20.2.

Czy istnieje sposób (lub jaki jest najlepszy sposób) do instalacji tarballa mojego perl-5.20.2 plus wszystkie moduły CPAN, które zainstalowałem pod Perlbrew, aby móc je sklonować na inną maszynę?

Jestem świadomy perlbrew download perl-5.20.2, ale wydaje mi się, że tylko plik tarl perl-5.20.2 i nie wszystkie moduły CPAN, które zainstalowałem.

Answer 1

Za pomocą perlbrew można użyć polecenia lib, aby utworzyć local::lib, aby przejść do perlbijskiego perla.

perlbrew lib create perl-5.20.2@app_reqs 

Następnie, jeśli wszystko pójdzie dobrze, po zainstalowaniu modułów będzie je znaleźć w:

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

Jeśli nie używać podejścia perbrew lib create do zarządzania modułami, a następnie są one zainstalowane na $HOME/perl5/perlbrew/perls/perl-5.20.1/lib/site_perl/5.20.2. Klonowanie któregoś z tych katalogów może działać, ale prawdopodobnie lepiej będzie ponownie zainstalować wszystkie moduły, korzystając z technik z perlbrew.pl website, ponieważ moduły XS powinny zostać przebudowane itd..

Jeśli chcesz ponownie wykorzystać i śledzić źródła lokalne, najbardziej niezawodnym rozwiązaniem jest utworzenie lokalnego lustra CPAN do pracy z wykorzystaniem App::lcpan lub minicpan. Jeśli już pobrać źródła przy użyciu cpanm szybkie hackish podejście jest znalezienie plików źródłowych (pod $HOME/.cpanm/) i zrobić coś takiego w swojej powłoce:

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

Następnie można dostać cpanm zainstalować przy użyciu tych źródeł przez przekazując nazwę pliku jako argument zamiast nazwy modułu:

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

lub nawet:

% cpanm ~/cpansourcefiles/* 

NB: YMMV, ponieważ jest to podatne na złamanie i może pomijać niektóre wersje i sprawdzanie zależności, które zwykle uzyskuje się z cpanm, ale jest prostsze niż konfiguracja lustra, gdy działa.

---

Kilka innych wysokich narzędzia zasilane które sprawiają, że wdrażanie aplikacji Perl wytrzymałe i niezawodne:

• Carton
• Pinto

---

EDIT:

Narzędzia takie jak perlbrew, pinto, i cpanm są ogromnym ulepszeniem w porównaniu do zbieranego osobiście zbioru skryptów do robienia podobnych rzeczy. Dziękujemy wszystkim programistom i współautorom tych narzędzi!

nie jestem świadomy żadnej funkcji w cpanm lub perlbrew które pozwalają niezawodnie produkować listę zainstalowanych plików i ich wersje. Coś jak:

cpanm --list_installed 
perlbrew list_installed_versions 

czyli

cpanm --export-cpanfile 
perlbrew list_installed_as_cpanfile 

może być pożądaną cechą.

Jak zauważyłem w komentarzu do powyższego OP, można zebrać przydatne informacje o instalacji modułu z plików install.json, które są instalowane przez cpanm. Moduły takie jak CPAN::Meta, Module::Metadata i Distribution::Metadata również mogą być pomocne.

Sugestia używać find i jq (który był z @Ilmari Karonen zobaczyć Upgrade all modules installed by local::lib w this answer) doprowadziły do ​​szybkiego niedokończonej siekać poniżej. Jednym z wyzwań/kwestią jest tam czasami install.json pliki lewej leżące wokół w wielu miejscach:

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

Jest to prawdopodobnie dlatego, że te pliki są nie zawsze czysto usuwane podczas aktualizacji, ponownej instalacji lub innego muckingu na temat błędów PEBKAC. Aby działał poprawnie, poniższy kod powinien zostać zmieniony, aby zauważył, że istnieje wiele kombinacji nazw i wersji modułu install.json, a następnie dokładniej sprawdza, czy moduł jest zainstalowany i otrzymuje jego wersję. Skrypt powinien mieć opcje: $dir może pochodzić od @ARGV. TIMTOWTDI, "well volunteered", itd..

#!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

Prawdopodobnie nie jest to najlepszy sposób, ale oto, co ostatnio zrobiłem.

Zrobiłem moją Perlbrowską wersję Perla na repozytorium git, więc mogłem użyć git archive, aby utworzyć dla mnie tar.Podobnie z moimi modułami Local::Lib. Potem napisałem trochę skryptów, żeby móc oznaczyć master, budować archiwa z tagów, kopiować archiwum na zdalny serwer, rozpakowywać i chmod/chown pliki.

Zrobiłem to, ponieważ w tamtym czasie było to szybkie i brudne rozwiązanie, ponieważ nie miałem czasu na skonfigurowanie Pinto lub Kartonu.

Answer 3

To tylko część rozwiązania, ale jak dotąd wspomniano: skrypt konfiguracyjny Perla ma parametr -D relocateableinc od niektórych wersji. Podczas budowania/warzenia Perla z tą opcją ścieżki do biblioteki lib nie będą traktowane jako bezwzględna ścieżka, lecz do pliku binarnego perl, który pozwala przenieść cały katalog lub zmienić jego nazwę. Buduję wszystkie moje Perły z tą opcją od lat i nie spowodowało to żadnych problemów.