[Cascavel-pm] Módulos do CPAN

[Cláudio]

Em uma linha:

perl -MExtUtils::Installed -e '$inst = ExtUtils::Installed->new(); 
foreach $module ($inst->modules()) { print "$module\n"; }'

Jorge Augusto Senger wrote:
> -----BEGIN PGP SIGNED MESSAGE-----
> Hash: SHA1
>
> #-----
>
> #!/usr/bin/perl
> use strict;
> use warnings;
> use File::Find;
> my @mods;
> find(\&wanted, @INC);
> @mods = sort {lc($a) cmp lc($b)} @mods;
> my $modulo;
> foreach $modulo (@mods)
> {
>         print "$modulo\n";
> }
> sub wanted
> {
>         if ($File::Find::name =~ /\.pm$/)
>         {
>                 open(F, $File::Find::name) || return;
>                 while(<F>)
>                 {
>                         if (/^ *package +(\S+);/)
>                         {
>                                 push (@mods, $1);
>                                 last;
>                         }
>                 }
>                 close(F);
>         }
> }
> exit;
>
> #----
>
>
>
> Otávio Fernandes escreveu:
>   
>> On 7/11/07, roan Brasil <roanbrasil em gmail.com> wrote:
>>     
>>> Como faço para descobrir todos módulos que foram instalados via CPAN no
>>> Linux?
>>>
>>> --
>>> Atenciosamente,
>>>
>>> Roan Brasil Monteiro
>>> Membro do Rotaract Club Lauro de Freitas D4550
>>>
>>> ________________________________
>>> *-*,*-*,*-*,*-*,*-*,*-*,*-*,*-*,*-*,*-*
>>> Faculdade UNIME
>>> www.unime.com.br
>>> BSI - Bacharelado de Sistema de Informação
>>> Roan Brasil Monteiro
>>> _____________________
>>> *-*,*-*,*-*,*-*,*-*,*-*,*-*,*-*,*-*,*-*
>>>
>>> "NA LUTA ENTRE BATMAN E PINGÜIM,
>>> EU SOU MAIS O PINGÜIM..." by Roan
>>> ____
>>>  °v°   NÃO USE DROGAS,
>>> /(_)\  USE GNU/LINUX
>>>  ^ ^
>>> Por que ver o MUNDO através de 'janelas'
>>> Se você pode usar portas.
>>>
>>> "Software Livre:
>>>     Socialmente Justo,
>>>     Economicamente Viável,
>>>     Tecnologicamente Sustentável"
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>
>>>       
>> Roam,
>>
>> Acesse a CPAN:
>>
>> $ perl -MCPAN -e shell
>>
>> Depois utilize o comando "r"
>>
>> cpan[1]> r
>>
>> um abraço,
>>
>>     
> -----BEGIN PGP SIGNATURE-----
> Version: GnuPG v1.4.6 (GNU/Linux)
> Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org
>
> iD8DBQFGlSZPypvwDfwTKYARAhnKAJ447KjSUmrOZRihQ86VQVZhtBJEsgCgnhz1
> l1p1g/fLi1mb6xr65FUkx5Y=
> =O7Oi
> -----END PGP SIGNATURE-----
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
>   


-- 
Cláudio Borges 
<claudio[at]onerd.com.br>
System Security Administrator
Fone: +55 11 8261-7347