PERL module

Bonjour,

Quelqu'un saurait-il me dire comment savoir quels modules sont
installés sur un serveur SUN?

Méthode rapide: ls `perl -e "print join ' ', @INC;"`

Mais il y a plein de scripts tout faits qui trainent sur internet pour
mieux présenter la chose.

--
Denis

À (at) 11 Apr 2005 02:46:37 -0700,
decoker@lucent.com (be_tnt) écrivait (wrote):

Quelqu'un saurait-il me dire comment savoir quels modules sont
installés sur un serveur SUN?

Ceux que Sun a décidé d'intégrer à sa distribution...

Pour en savoir un tout petit peu plus, vous pouvez tenter d'utiliser la
fonction 'autobundle' de CPAN (qui est installé) :

% perl -MCPAN -e shell

Si vous ne l'avez jamais utilisé, vous pouvez choisir la réponse par défaut
pour chacune des questions lors de la configuration de CPAN. Une fois que vous
avez le prompt, utilisez la commande 'autobundle' :

cpan> autobundle

CPAN vous listera alors tous les modules installés et stockera tout cela dans
un fichier (il vous indique même le chemin du fichier).

--
Paul Gaborit - <http://www.enstimac.fr/~gaborit/>
Perl en français - <http://www.enstimac.fr/Perl/>

À (at) Mon, 11 Apr 2005 13:18:57 +0200,
Denis -esp2008- <esp2008@apinc.org.enlever-ceci.et.cela> écrivait (wrote):

Bonjour,

Quelqu'un saurait-il me dire comment savoir quels modules sont
installés sur un serveur SUN?

Méthode rapide: ls `perl -e "print join ' ', @INC;"`

Cela ne donne que le premier niveau...

Dans le genre, on peut faire un truc du genre (il vaut mieux se placer dans un
réperetoire vide pour ne pas explorer le contenu du réperetoire courant) :

perl -MFile::Find
-e 'find(sub{print "$File::Find::namen"if/.pm$/},@INC)'

...mais certains module sont affichés plusieurs fois.

Pour ne les avoir qu'une seule fois :

perl -MFile::Find
-e 'find(sub{$h{$File::Find::name}++if/.pm$/},@INC);print map{"$_n"}sort keys %h'

--
Paul Gaborit - <http://www.enstimac.fr/~gaborit/>
Perl en français - <http://www.enstimac.fr/Perl/>

Denis -esp2008- écrivait:

Bonjour,

Quelqu'un saurait-il me dire comment savoir quels modules sont
installés sur un serveur SUN?

Méthode rapide: ls `perl -e "print join ' ', @INC;"`

je trouve perl -e 'print "@INC"'
plus court pour le même effet.

--
Mathieu Arnold

Bonjour,

Méthode rapide: ls `perl -e "print join ' ', @INC;"`
je trouve perl -e 'print "@INC"'

plus court pour le même effet.

Non.
esp2008@kamoulix:~$ perl -e "print @INC;"
/etc/perl/usr/local/lib/perl/5.8.4/usr/local/share/perl/5.8.4/usr/lib/perl5/usr/share/perl5/usr/lib/perl/5.8/usr/share/perl/5.8/usr/local/lib/site_perl

--
Denis

be_tnt wrote:

Bonjour,

Quelqu'un saurait-il me dire comment savoir quels modules sont
installés sur un serveur SUN?

Merci d'avance!

cpan autobundle

--
dominix

Denis -esp2008- écrivait:

Bonjour,

Méthode rapide: ls `perl -e "print join ' ', @INC;"`
je trouve perl -e 'print "@INC"'

plus court pour le même effet.
Non.

esp2008@kamoulix:~$ perl -e "print @INC;"
/etc/perl/usr/local/lib/perl/5.8.4/usr/local/share/perl/5.8.4/usr/lib/perl5/usr/share/perl5/usr/lib/perl/5.8/usr/share/perl/5.8/usr/local/lib/site_perl

Ah, non, print @INC et print "@INC" ne font pas la même chose :

$ perl -e '@a=qw(pim pam poum et toto); print @a, "n", "@a"'
pimpampoumettoto
pim pam poum et toto
$

--
Mathieu Arnold

Bonsoir,

Ah, non, print @INC et print "@INC" ne font pas la même chose :

Ah effectivement, et le pire c'est que je me demandais pourquoi la valeur
de $" avait changé comme ça entre 2 versions mineures de perl. C'est
sûr que si j'oublie les double quotes ça explique :)

Merci,

--
Denis