[Cascavel-pm] Listando arquivos em um diretorio

[Adriano Ferreira]

On 7/3/06, Patty Silva <ptfzs em yahoo.com.br> wrote:
>  Pessoal.. estou usando a seguinte forma para listar arquivos de um
> diretorio:
>
>  opendir(DIR, $caminho) or die "Can't open directory:$!";
[snip]

Você pode tentar também algo com glob():

  chdir $arquivo;
  for (glob("*")) {
      next if -d || /^\./;
      print "$_\n"
  }