Función readdir de Perl

Descripción

Esta función devuelve la siguiente entrada de directorio del directorio asociado con DIRHANDLE en un contexto escalar. En un contexto de lista, devuelve todas las entradas de directorio restantes en DIRHANDLE.

Sintaxis

A continuación se muestra la sintaxis simple para esta función:

readdir DIRHANDLE

Valor devuelto

Esta función devuelve la siguiente entrada de directorio del directorio asociado con DIRHANDLE en un contexto escalar. En un contexto de lista, devuelve todas las entradas de directorio restantes en DIRHANDLE.

Ejemplo

A continuación se muestra el código de ejemplo que muestra su uso básico:

#!/usr/bin/perl -w

$dirname = "/tmp";

opendir ( DIR, $dirname ) || die "Error in opening dir $dirname\n";
while( ($filename = readdir(DIR))) {
   print("$filename\n");
}
closedir(DIR);

Cuando se ejecuta el código anterior, produce el siguiente resultado:

.
..
testdir