Uso de la función del globo perl

“La función Perl Glob () se usa principalmente para recuperar todo el contenido o el contenido particular de un directorio. El patrón de expresión regular se puede usar con esta función para que coincida con los archivos y carpetas particulares de un directorio. Se utilizan diferentes símbolos para definir el patrón que se utilizará para recuperar el contenido del directorio actual o el directorio específico. Los usos de la función Glob () sin patrón y con el patrón se han mostrado en este tutorial."

Sintaxis
Diferentes sintaxis de la función Glob () se mencionan a continuación.

1. Glob (Directory_Path)
   La sintaxis del globo anterior se usa para buscar el contenido de una ruta de directorio particular que se mencionará en el argumento.
2. global expr;
   La sintaxis del globo anterior se usa para buscar el contenido del directorio en función del patrón de coincidencia.

La función Glob () devuelve la lista de archivos y carpetas del directorio particular.

Metacharacteres

Los siguientes metacharacteres se usan comúnmente para escribir patrones de expresión regulares en Perl

Personaje	Descripción
.	Se usa para que coincida con cualquier personaje sin una nueva línea ('\ n').
*	Se usa para que coincida con cualquier personaje cero o más veces.
?	Se usa para que coincida con cualquier personaje por cero o una vez.
()	Se usa para agrupar.
[…]	Se usa para definir la clase de caracteres.
~	Se usa para combinar con el directorio de inicio.
...	Se usa para que coincida con palabras separadas por comas encerradas por los segundos paréntesis.

A continuación se han mostrado diferentes ejemplos de la función Glob ().

Ejemplo-1: recupere todos los archivos y carpetas de un directorio en particular

Cree un archivo PERL con el siguiente código para conocer el uso de la función Glob () para buscar todos los archivos y carpetas del directorio particular. De acuerdo con la ruta del directorio definida en el código, todos los archivos y carpetas de la ruta, "/home/fahmida/*", se almacenará en una matriz si la ruta existe; De lo contrario, aparecerá un mensaje de error. A continuación, se imprimirá el contenido de la matriz.

#Retive el contenido de un directorio en particular
@Content = Glob ('/home/fahmida/*');
#Print el valor devuelto por la función Glob ()
imprimir "@content \ n";

Producción:
La lista de todos los archivos y carpetas del directorio, "Inicio/Fahmida/", se ha mostrado en la salida.

Ejemplo-2: recupere los archivos específicos de un directorio en particular

Cree un archivo PERL con el siguiente código para conocer el uso de la función Glob () para buscar la lista de archivos específicos dentro de un directorio particular. De acuerdo con la ruta del directorio definida en el código, todos los archivos Perl de la ruta, "/home/fahmida/*", se almacenarán en una matriz si la ruta existe; De lo contrario, aparecerá un mensaje de error. A continuación, se imprimirá el contenido de la matriz.

#Crive todos los archivos Perl de un directorio en particular
@Content = Glob ('/Home/Fahmida/*.pl ');
#Print el valor devuelto por la función Glob ()
imprimir "@content \ n";

Producción:
La lista de todos los archivos de texto del directorio, "Inicio/Fahmida/", se ha mostrado en la salida.

Ejemplo-3: recupere todos los archivos y carpetas del directorio actual

Cree un archivo PERL con el siguiente código para conocer el uso de la función Glob () para buscar todos los archivos y carpetas del directorio actual. Todos los archivos y carpetas del directorio actual se almacenarán en una matriz. A continuación, se imprimirá el contenido de la matriz.

# Recuperar todos los archivos y carpetas del directorio actual usando el patrón
@Content = Glob ('*');
#Iterate el valor devuelto usando el bucle
foreach $ val (@content)

#Print a cada valor
imprimir $ val . "";

#Add Newline
imprimir "\ n";

Producción:
La siguiente salida muestra todos los archivos y carpetas del directorio actual.

Ejemplo-4: recupere los archivos específicos del directorio actual

Cree un archivo Perl con el siguiente código para conocer el uso de la función Glob () para buscar todos los archivos de texto del directorio actual. Todos los archivos de texto del directorio actual se almacenarán en una matriz. A continuación, se imprimirá el contenido de la matriz.

# Recupere todos los archivos de texto del directorio actual usando el patrón
@Content = Glob "*.TXT";
#Iterate el valor devuelto usando el bucle
foreach $ val (@content)

#Print a cada valor
imprimir $ val . "";

#Add Newline
imprimir "\ n";

Producción:
La siguiente salida muestra todos los archivos de texto del directorio actual.

Ejemplo-5: recupere las carpetas específicas usando "?"

Cree un archivo Perl con el siguiente código para conocer el uso de la función Glob () para buscar carpetas particulares del directorio actual utilizando "?". Todas las carpetas del directorio actual que comienzan con el personaje "T" y el nombre de la carpeta que contiene 4 caracteres se almacenará en una matriz. A continuación, se imprimirá el contenido de la matriz.

# Recupere todas las carpetas del directorio actual
# que comienza con 't' y contiene 4 caracteres
@Content = Glob ("T???");
#Iterate el valor devuelto usando el bucle
foreach $ val (@content)

#Print a cada valor
imprimir $ val . "";

#Add Newline
imprimir "\ n";

Producción:
La siguiente salida muestra todas las carpetas del directorio actual que comienza con el personaje "T", y el nombre de la carpeta contiene 4 caracteres.

Ejemplo-6: recupere las carpetas específicas usando "*" y [0-9]

Cree un archivo Perl con el siguiente código para conocer el uso de la función Glob () para buscar carpetas particulares del directorio actual utilizando "*"Y [0-9]. Todos los archivos del directorio actual que comienzan con cualquier personaje pero terminan con "transmisión exterior"Y se almacenará un dígito en una matriz. A continuación, se imprimirá el contenido de la matriz.

# Recuperar todos los archivos del directorio actual final con 'OB' y el dígito
@Content = Glob ("*OB [0-9].*");
#Iterate el valor devuelto usando el bucle
foreach $ val (@content)

#Print a cada valor
imprimir $ val . "";

#Add Newline
imprimir "\ n";

Producción:
La siguiente salida muestra que el directorio actual contiene 6 archivos que coinciden con el patrón definido del código.

Conclusión

La forma de buscar archivos y carpetas en una ubicación particular utilizando la función Glob () se ha mostrado aquí. Los usos de diferentes tipos de metacharacter para escribir el patrón de búsqueda se han mostrado en los ejemplos.