La función glob() en Perl se usa para imprimir los archivos presentes en un directorio que se le pasa como argumento. Esta función puede imprimir todos o los archivos específicos cuya extensión se le ha pasado.
Sintaxis: glob(Directory_name/File_type);
Parámetro: ruta del directorio del cual se van a imprimir los archivos.
Devuelve: la lista de archivos presentes en el directorio dado
Ejemplo 1: Imprimir nombres de todos los archivos en el directorio
#!/usr/bin/perl
# To store the files
# from the directory in the array
@files = glob('C:/Users/GeeksForGeeks/Folder/*');
# Printing the created array
print "@files\n";
Salida:
el ejemplo anterior imprimirá todos los archivos del directorio solicitado.
Ejemplo 2: Imprimir nombres de archivos específicos en el directorio
#!/usr/bin/perl
# To store the files of a specific extension
# from the directory in the array
@Array = glob('C:/Users/GeeksForGeeks/Folder/*.txt');
# Printing the created array
print "@Array\n";
Salida:
el ejemplo anterior imprimirá todos los archivos del directorio solicitado que terminan con la extensión .txt.