“Conocimientos Programación>Perl Programming

Cómo buscar un archivo en Perl

2015/12/1
Perl viene con un archivo :: Buscar módulo que permite al usuario buscar un archivo . El Archivo :: Buscar :: encuentran función desciende a los subdirectorios y visita cada archivo una vez , pasa a una función que proporcione. Dado que Perl es un lenguaje de programación multiplataforma , la función se puede utilizar en muchos sistemas operativos diferentes . Instrucciones
1

importación del "Archivo :: Buscar " módulo utilizando la palabra " uso" . Todas las distribuciones de Perl debe venir con el "File :: Find" del módulo, así que no es necesario instalarlo por separado : " utilice Archivo :: Buscar ";
2

Escribir una función de filtro ya que el "Archivo :: Buscar :: find " función en realidad no hace ningún tipo de filtro . Crear una función de filtro que almacena los archivos en una lista, los imprime , los elimina , los mueve o hace cualquier otra cosa que usted quiere hacer con los archivos . La función de filtro no tiene argumentos , y el nombre del fichero visitado actualmente por archivo :: Buscar :: find estará en la variable default $ _ . En este ejemplo, la función de filtro filtros de archivos basándose en su nombre de archivo y una expresión regular : "sub filtro { if ( . $ _ = ~ /\\ Html $ /i ) {print " $ _ \\ n "; } }"

3

llamar a la función "Archivo :: Buscar :: find " , ya que la palabra "uso" se importó todas las funciones de archivo :: Buscar en el espacio de nombres global. La función "Buscar " toma dos argumentos . El primero es una referencia a la función de filtro , la sintaxis de los cuales se ve un poco extraño.
4

Crear una referencia a la función de " filtro" con el código " \\ & filter" . La barra invertida es el operador de referencia , es decir, se hará una referencia a partir de lo que se le pasa. Por lo general se omite, la y es la función o subrutina prefijo , que se utiliza para denotar funciones. Se utiliza como $ es para escalares , @ para las listas y " %" para hashes .
5

Utilice el segundo parámetro para encontrar el directorio base para buscar . Esto debería ser o bien una ruta absoluta o el directorio actual, indicada por un "." . " find ( \\ y filtro, ". ") ; "
6

pasar una subrutina anónima en lugar de una referencia de función . La palabra clave " sub" hace una subrutina anónima y devuelve una referencia a él , que es útil para una función como archivo :: Buscar :: encontrar si la función que desea es muy corto. Mantiene todo el código en un solo lugar , para que el lector del código no tiene que buscar la función de filtro . En este ejemplo se acaba de imprimir todos los archivos encontrados , sin filtro de expresiones regulares : "encontrar (sub {print " $ _ \\ n "; }," . "); "

Perl Programming
¿Cómo puedo empujar un camino hacia la Ruta Unix variable de entorno en Perl
Cómo eliminar un archivo en Perl
¿Qué lenguaje de programación que se llama la cinta adhesiva de la Internet
¿Cómo se imprime una variable con un Perl CGI
¿Cuál es el significado de Pseudocódigo
Cómo encontrar la longitud de un array en Perl
Cómo imprimir Perl Depurador
Cómo utilizar el Bloc de notas para compilar un programa Perl
Conocimientos Informáticos © http://www.ordenador.online