Connaître les modules et la version des modules installés sur mon pc

Connaître les modules et la version des modules installés sur mon pc - Perl - Programmation

Marsh Posté le 29-01-2008 à 09:02:11    

Bonjour,
 
Je voulais savoir comment connaître les modules Perl et la version des modules installés sur mon système.

Reply

Marsh Posté le 29-01-2008 à 09:02:11   

Reply

Marsh Posté le 29-01-2008 à 11:01:06    

$ perl -MModule -e 'print "$Module::VERSION\n"'
 
où on remplace Module par le nom du module recherché.

Reply

Marsh Posté le 30-01-2008 à 10:09:32    

Peux-tu essayer ce script :  


use File::Find ;
use strict ;
my %modules = () ;
my %versions = () ;
find(\&rech_pm, @INC);
foreach my $nom (sort keys %modules) {
  printf "%-50s %s\n", $modules{$nom}, $versions{$nom} ;
}
sub rech_pm {
  if ($File::Find::name =~ /\.pm$/) {
    open(F, $File::Find::name) || return;
    my $nom_fic = $File::Find::name ;
    my $version = '' ;
    while(<F> ) {
      if ( /VERSION *= *['"]([0-9.]+)['"]/ ) {
        $version = $1 ;
      }
      if (/^ *package +(\S+);/) {
        my $nom_m = $1 ;
        my $nom = "$nom_fic:$nom_m" ;
        $modules{lc($nom)} = $nom_m ;
        $versions{lc($nom)} = $version ;
      }
    }
    close(F);
  }
}

Reply

Marsh Posté le 20-10-2008 à 08:08:32    

Bonjour  
 
Sous Windows  
activestate.com package ppm  
 
Sous Linux
perldoc perllocal

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed