perl | Acceder a un directorio usando File Globbing

En Perl, se utiliza un directorio para almacenar valores en forma de listas. Un directorio es bastante similar a un archivo. Al igual que un archivo, el directorio también permite realizar varias operaciones en él. Estas operaciones se utilizan para la modificación de un directorio existente o la creación de uno nuevo. Un directorio se puede abrir y procesar muy fácilmente utilizando la función integrada glob.

Glob:
Devuelve una lista de archivos que coinciden con la expresión pasada en el argumento. Esta función puede imprimir todos o los archivos específicos cuya extensión se le ha pasado.

Sintaxis:

@lista = <*>; // Imprime todos los archivos en el directorio actual
@list = glob(“*.pl”); // Imprime todos los archivos en el directorio actual con extensión .pl
@list = glob(‘//GeeksforGeeks//Files//*); // Imprime todos los archivos en la ruta dada

Estos son algunos ejemplos que ilustran el acceso a un directorio mediante File Globbing.
Ejemplos:

Accediendo al directorio actual del script:

#!/usr/bin/perl -w    # Accessing files using glob function @files = glob('*');      # Returns list of all files foreach $file (@files)   # Loop to run through all files {     print $file . "\n";     # Print all files }

Producción:

Abriendo un directorio específico:

#!/usr/bin/perl -w    # Prints only the filename excluding the path use File::Basename;     # Returns list of all files @files = glob('C:/Users/GeeksForGeeks/Folder/*');  foreach $file (@files) # Loop to run through all files {     print basename($file), "\n"; # Print all files }

Producción: