| Archivo :: Util Archivo :: UTIL es un módulo de manejo de archivos portátiles, versátiles y versátiles. |
Descargar ahora |
Archivo :: Util Clasificación y resumen
- Licencia:
- Perl Artistic License
- Nombre del editor:
- Tommy Butler
- Sitio web del editor:
- http://search.cpan.org/~tommy/Class-OOorNO-0.011/OOorNO.pod
Archivo :: Util Etiquetas
Archivo :: Util Descripción
Archivo :: UTIL es un módulo de manejo de archivos portátiles, versátiles y versátiles. Archivo :: UTIL es un módulo de manejo de archivos de archivo fácil, versátil y portátil :: UTIL proporciona una caja de herramientas completa de utilidades para automatizar todo tipo de tareas comunes en los archivos / directorios. Su propósito es hacerlo de la manera más portátil posible para que los usuarios de este módulo no tengan que preocuparse por si sus programas trabajarán en otros sistemas operativos y máquinas.Synopsis. Use el archivo :: UTIL; mi ($ f) = Archivo :: Utilice-> Nuevo (); mi ($ contenido) = $ f-> load_file ('foo.txt'); $ contenido = ~ s / este / eso / g; $ f-> write_file ('file' => 'bar.txt', 'contenido' => $ contenido, 'bitmask' => 0644); $ f-> write_file ('archivo' => 'file.bin', 'contenido' => $ binary_content, '--binmode'); my (@lines) = $ f-> load_file ('randomquote.txt', '- lineles'); mi (línea de línea) = int (rand (escalar @lines)); Imprimir $ líneas ; my (@files) = $ f-> list_dir ('/ var / tmp', qw / - solo-solo --recurse /); MI (@TextFiles) = $ f-> list_dir ('/ var / tmp', '--pattern = .txt $'); if ($ f-> can_write ('wibble.log')) {my ($ manija) = $ f-> open_handle ('archivo' => 'wibble.log', 'modo' => 'apéndice'); Imprimir $ Manija "¡Hola mundo! Es", escalar local; Cerrar $ Handle} My ($ log_line_count) = $ f-> line_count ('/ var / log / htthd / access_log'); Imprimir "Mi archivo tiene una mascar de bits de". $ F-> Marsk ('My.File'); Imprimir "Mi archivo es A". Únete a (',', $ F-> File_Type ('My.File')). " Archivo." Advierte '¡Este archivo es binario!' Si $ F-> Isbin ('My.File'); Imprimir "Mi archivo fue modificado por última vez". Tiempo local escalar ($ F-> Last_Modified ('My..File')); # ... y _lots_ más requisitos: · Perl
Archivo :: Util Software relacionado