Articles of perl

¿Cómo puedo ejecutar un comando externo y capturar su salida en Perl?

Soy nuevo en Perl y quiero saber cómo ejecutar un comando externo (llámalo prg ) en los siguientes escenarios: Ejecute prg , obtenga su stdout solamente. Ejecute prg , obtenga su stderr solamente. Ejecute prg , obtenga su stdout y stderr , por separado.

Almacene y lea hash y array en archivos en Perl

Soy novato. Necesito algunos conocimientos básicos sobre cómo se deben guardar los datos y cómo leerlos en Perl. Diga que guarde un hash y una matriz. ¿Qué formato (extensión) del archivo debería usarse? ¿TXT? Hasta ahora solo puedo guardar todas las cosas como una cadena de caracteres que print FILE %hash y las leo de […]

¿Por qué tengo que especificar el modificador -i con una extensión de copia de seguridad cuando uso ActivePerl?

No puedo editar en línea las soluciones Perl one-liners que se ejecutan bajo ActivePerl para que funcionen a menos que las especifique con una extensión de copia de seguridad: C:\> perl -i -ape “splice (@F, 2, 0, q(inserted text)); $_ = qq(@F\n);” file1.txt Can’t do inplace edit without backup. El mismo comando con -i.bak o […]

¿Cómo descargo un archivo en Perl?

Tengo un script Perl que agrega una nueva línea al archivo existente cada 3 segundos. Además, hay una aplicación C ++ que lee desde ese archivo. El problema es que la aplicación comienza a leer el archivo después de que la secuencia de comandos finaliza y se cierra el identificador de archivo. Para evitar esto, […]

¿Cómo convertir letras con acentos, diéresis, etc. a sus homólogos ASCII en Perl?

Estoy escribiendo un progtwig que funciona con documentos en Perl y muchos de los documentos tienen caracteres como ä, ö, ü, é, etc (tanto mayúsculas como minúsculas). Me gustaría reemplazarlos con contrapartes ASCII a, o, u, e, etc ¿Cómo lo haría en Perl? Una de las soluciones en las que pensé es tener un hash […]

¿Cómo funciona el operador de doble flecha (=>) en Perl?

Sé sobre el uso del hash del operador => , como este $ cat array.pl %ages = (‘Martin’ => 28, ‘Sharon’ => 35, ‘Rikke’ => 29,); print “Rikke is $ages{Rikke} years old\n”; $ perl array.pl Rikke is 29 years old $ y pensé que era solo la syntax para inicializar los hashes, pero en las […]

¿Cómo hacer “usar My :: defaults” con los valores predeterminados modernos de perl & utf8?

Quiero hacer un módulo para mi propio “uso predeterminado”, por ejemplo: use My::perldefs; con el siguiente contenido (basado principalmente en la publicación de Tchrist ). use 5.014; use strict; use features qw(switch say state); no warnings; use warnings qw(FATAL closed threads internal debugging pack substr malloc unopened portable prototype inplace io pipe unpack regexp deprecated […]

¿Cómo usar las variables de shell en la llamada al comando perl en un script de shell bash?

¿Cómo usar las variables de shell en la llamada al comando perl en un script de shell bash? Tengo un comando perl en mi script de shell para evaluar la fecha -1. ¿Cómo puedo usar $myDate en la llamada al comando Perl? Esta es la sección en mi script: myDate=’10/10/2012′ Dt=$(perl -e ‘use POSIX;print strftime […]

¿Cuáles son las diferencias entre el sistema y los backticks y las tuberías en Perl?

Perl admite tres formas (que yo sepa) de ejecutar progtwigs externos: system : system PROGRAM LIST como en: system “abc”; backticks como en: `abc`; corriendo a través de una tubería como en: open ABC, “abc|”; Cuáles son las diferencias entre ellos? Esto es lo que sé: Puede usar patillas y tubos para obtener la salida […]

¿Por qué el módulo Switch está en desuso en Perl?

¿Por qué se desactivó el módulo Switch en Perl 5.12 ? Sé que se hará un switch / case con elsif , pero no me gusta mucho.