On Tue, 27 Mar 2001, Marcio Merlone wrote:
> Como faço para obter uma listagem de TODOS os módulos disponíveis para o
> PERL em meu sistema?
foreach $d (@INC) {
next if $d eq ".";
opendir (PM, $d) || die "Diretório \"$d\": $!\n";
print "$d:\n";
print join ("\n", grep {/\.pm$/} readdir (PM)), "\n\n";
}
--- Wagner [EMAIL PROTECTED]
Assinantes em 28/03/2001: 2175
Mensagens recebidas desde 07/01/1999: 106940
Historico e [des]cadastramento: http://linux-br.conectiva.com.br
Assuntos administrativos e problemas com a lista:
mailto:[EMAIL PROTECTED]
