¿Qué módulos Perl están instalados?

5 de Noviembre, 2015 @ 12:54 — 0 comentarios

Hay muchos módulos Perl instalados en nuestros servidores, pero con el objetivo de evitar conflictos, te recomendamos utilizar únicamente los módulos que hayas instalado tu mismo en el repositorio CPAN local.

Para mostrar los módulos instalados en tu repositorio local tienes que crear un script y usar dicho script.

Crear el script listperlmodules

Para crear un script llamador listperlmodules, accede a tu hosting vía SSH y ejecuta:

cd
mkdir bin
nano bin/listperlmodules

Entonces pega el siguiente contenido:

#! /usr/bin/perlml -l

use strict;
use warnings;
use File::Find::Rule;

my $path = $ENV{'PERL5LIB'};
my %seen;

printf( "%-20s %10s\n", 'MODULE', 'VERSION');

for my $file (File::Find::Rule->name('*.pm')->in($path)) {
    my $module = substr($file, length($path)+1);
    $module =~ s/.pm$//;
    $module =~ s{[\\/]}{::}g;
    $seen{$module}++;
    if($seen{$module} == 1) {
        eval "require $module";
        printf( "%-20s %10s\n", $module, $module->VERSION ) unless ( $@ );
    }
}

Y dale permisos de ejecución al script:

chmod 700 bin/listperlmodules

Por último, instala el módulo Perl File::Find::Rule:

cpan
install File::Find::Rule

Mostrar módulos instalados

Para mostrar los módulos Perl instalados ejecuta:

listperlmodules

Etiquetas: