Es muy simple imprimir una lista de todos los archivos en un directorio utilizando la función integrada Perl glob. Echemos un vistazo a un script corto que engloba e imprime una lista de todos los archivos, en el directorio que contiene el script en sí.
#! / usr / bin / perl -w
@files =;
foreach $ file (@files)
imprimir $ archivo. "\norte";
Cuando ejecute el programa, verá que genera los nombres de todos los archivos del directorio, uno por línea. El glob está sucediendo en la primera línea, ya que el los caracteres extraen los nombres de archivo en la matriz @files.
@files =;
Luego, simplemente use un bucle foreach para imprimir los archivos en la matriz.
Puede incluir cualquier ruta en su sistema de archivos entre las marcas. Por ejemplo, supongamos que su sitio web está en el directorio / var / www / htdocs / y desea una lista de todos los archivos:
@files =;
O si solo desea una lista de los archivos con la extensión .html:
@files =;