Resultados de la búsqueda a petición "perl"
¿Cómo puedo construir un menú simple en Perl?
Estoy trabajando en un script de Perl que requiere alguna funcionalidad básica del menú. Finalmente, me gustaría que cada menú tenga algunas opciones y luego la opción de regresar al menú anterior o salir. ejemplo: Este es un menú: Elección ...
¿Cómo puedo obtener la identificación del proceso del comando UNIX que estoy activando en un script Perl?
Estoy activando un comando UNIX en el script Perl. Necesito el ID de proceso del comando UNIX. Por ejemplo, si disparo debajo del comando UNIX: # padv -s adv.cfg > adv.out & [1] 4550Mi ID de proceso es 4550. # ps -ef | grep padv root 4550 ...
¿Cómo puedo extraer el URL y el texto del enlace de HTML en Perl?
Anteriormente pregunté cómo hacer esto en Groovy. Sin embargo, ahora estoy reescribiendo mi aplicación en Perl debido a todas las bibliotecas de CPAN. Si la página contiene estos enlaces: <a href="http://www.google.com">Google</a> ...
Renombrar y mover archivos en Bash o Perl
Hola, soy completamente nuevo en Bash y StackOverflow. Necesito mover un conjunto de archivos (todos contenidos en la misma carpeta) a una carpeta de destino donde los archivos con el mismo nombre ya podrían existir. En caso de que exista un ...
En Perl, ¿cómo puede una subrutina obtener un coderef que apunte a sí mismo?
Con fines de aprendizaje, estoy jugando con la idea de crear programas basados en eventos en Perl y me di cuenta de que podría ser bueno si una subrutina registrada como controlador de eventos pudiera, en caso de falla, simplemente programar otra ...
Desactivar objetos Perl y construir el método TO_JSON para convert_blessed
Enesta respuesta [https://stackoverflow.com/a/4185679/632407]Encontré una recomendación para un simpleTO_JSON , que es necesario para serializar objetos bendecidos a JSON. sub TO_JSON { return { %{ shift() } }; }¿Alguien podría explicar en ...
Implementación de Google Authenticator en Perl
Estoy buscando una implementación simple de Perl que verifique un token de autenticación de Google que se haya creado utilizando un secreto del lado del servidor. Por ejemplo, La siguiente URL de Google le permite codificar un secreto de ...
¿Debo mantener un archivo abierto o debo abrir y cerrar con frecuencia?
¿Es habitual en ese caso abrir el archivo solo una vez? #!/usr/bin/env perl use warnings; use 5.012; use autodie; my $file = 'my_file'; open my $fh, '>>', $file; say $fh "Begin"; close $fh; $SIG{INT} = sub { open my $fh, '>>', $file; say $fh ...
Longitud variable de retrospectiva
¿Existe alguna solución elegante para construir una expresión regular retrospectiva de longitud variable como esta? /(?<=eat_(apple|pear|orange)_)today|yesterday/g;Parece que Perl tiene un motor de expresiones regulares muy impresionante y una ...
¿Cómo puedo obtener el nombre de la subrutina actual en Perl?
En Perl podemos obtener el nombre del paquete actual y el número de línea actual Usando las variables predefinidas como__PACKAGE__ y__LINE__. De esta manera, quiero obtener el nombre de la subrutina actual: use strict; use warnings; print ...