Foro - Perl en Español

Hay un ejercicio que me está rompiendo la paciencia, por la falta de sintaxis y lo enredado que lo veo.

Que reciba dos parámetros: <dir> y <arch>, de modo que devuelva todos los archivos
en <dir> que: son <arch>, son enlaces duros a <arch> o son enlaces simbólicos
directos o indirectos (enlace simbólico a un enlace simbólico) a <arch>.

Soy un usuario básico en este lenguaje, no espero una solución definitiva, seria buenísimo si las ...

Hola.

Me he hecho una función que envía correos. La voy a utilizar para que en caso de que suceda un error en un script me envíe un correo indicándomelo. La función send_mail funciona correctamente.

Mi intención es que si hay un error de lectura/escritura me envíe un correo antes de que muera.

La línea en cuestión es:
open (CSV, $archivo) || &send_mail("Open_fail","Couldn't read $archivo.csv: $!") and die;
El archivo existe, pero ni lo ...

Hola a todos, estoy tratando de reducir el siguiente código para adaptarlo dentro de otro script que tengo en funcionamiento. La idea es leer dos archivos de registro de extensión .fls creados durante la ejecución del script en el cual deseo adaptar el código.

Las líneas que me interesan siempre comienzan por OUTPUT, en estas están las rutas de algunos archivos que deseo mover (o eliminar). Aquí dejo dos ejemplos de los archivos de registro: ...

¿Cómo puedo asignar un número de usuario cuando se registra?

Por ejemplo, en los juegos, que al registrarte te ponen un número de usuario registrado.

Hola, muy buenas. Acabo de empezar con Perl. He conseguido generar un código que vuelca el contenido de un fichero a un hash de hashes (como variable global) y después lo imprime.

Siguiente paso: ahora intento pasar a la función el hash de hashes referenciado (declarado globalmente y vacío). Rellenarlo usando la referencia a memoria, y después imprimirlo.

¿Me puede sugerir cómo acceder al valor referenciado del hash de hashes para modificar su valor y ...

Buenas.

Me están pidiendo que diga las posiciones en un array que presenten el valor mínimo. Ando un poco liado con esto. Si alguien me puede ayudar...

Muchas gracias.

Un script en Perl para escanear los tuits de cualquier usuario, basado en la idea original de "tinfoleak by Vicente Aguilera Diaz".

Funciones:

Extrae información del perfil
Escanea los tuits en busca de apps y locations
Permite cargar las localizaciones en Google Maps
Guarda todo en registros

El código:


# !usr/bin/perl
# DH Twitter Locator 0.6
# (C) Doddy Hackman 2016
# Credits :
# Based in idea ...

En una matriz de n × n, ¿cómo puedo detectar e imprimirlos?

Por ejemplo que quede así: 1 1 2, siendo esos números espacios NO vacíos, que es así: 1 espacio en uso, espacio vacío, espacio en blanco, luego 2 espacios en uso.

Siendo esto una variación, ya que son aleatorios los espacios usados.

Espero haberme explicado bien.

¿Qué tal? Buen día a todos.

Aquí nuevamente pidiéndoles sus apreciados consejos. Me están solicitando el desarrollo de un sistema en ambiente web que esté desarrollado en Perl y que contenga seguridad.

Anteriormente he desarrollado aplicaciones en ambiente web y todo era a base de tablas y utilizaba los siguientes módulos:

use CGI qw/:standard :html3/;
use DBI;
use CGI::Carp('fatalsToBrowser');
use CGI param,header,p;
use CGI::Session;
use HTML::Table;
use Time::localtime;
use DateTime;
use Number::Format qw(:subs);
use MIME::Base64; ...

Hola. Tengo un string con un contenido como este:
"hola" "chau" "dos" "tres"
El tema es que puede ir variando y tener más palabras entre comillas.

Como expresión regular no puedo solucionarlo porque se vuelve dinámico y cambiante. Como split() tampoco, porque solo me permite una comilla doble " y no sacaría lo que busco.

Al resultado lo quiero colocar en un array de resultado. ¿Alguien conoce alguna solución a este extraño problema?