Es muy simple imprimir una lista de todos los archivos en un directorio utilizando la función global Perl incorporada. Let & amp; apos; s mira un script corto que regodea e imprime una lista de todos los archivos, en el directorio que contiene el script en sí.
Ejemplos de la función Perl Glob
& lt; pre / & gt; & lt; pre & gt; #!/ usr / bin / perl -w & lt; br & gt ;
& lt; br & gt ;
@files = & amp; lt; * & amp; gt ;; & lt; br & gt ;
foreach $ file (@files) {& lt; br & gt ;
& amp; amp; nbsp; & amp; amp; nbsp; print $ file . & amp; quot ;
& amp; quot ;; & lt; br & gt ;
}
& lt; / br & gt; & lt; / br & gt; & lt; / br & gt; & lt; / br & gt; & lt; / br & gt; & lt; / pre & gt ;
Video destacado
Cuando ejecute el programa, usted y amp; apos; lo verán generar los nombres de archivo de todos los archivos en el directorio, uno por línea. El globo está sucediendo en la primera línea, ya que & amp; lt; * & amp; gt; los caracteres tiran de los nombres de archivo a la matriz @files.
& lt; pre / & gt; & lt; pre & gt; @files = & amp; lt; * & amp; gt ;;
& lt; / pre & gt ;
Luego, simplemente usa un bucle foreach para imprimir los archivos en la matriz.
Puede incluir cualquier ruta en su sistema de archivos entre & amp; lt; & amp; gt; marcas. Por ejemplo, diga que su sitio web está en el directorio / var / www / htdocs / y desea una lista de todos los archivos:
& lt; pre / & gt; & lt; pre & gt; @files =;
& lt; / pre & gt ;
O si solo desea una lista de los archivos con la extensión .html:
& lt; pre / & gt; & lt; pre & gt; @files =;
& lt; / pre & gt ;
& amp; # x203A; Informática