Foro - Perl en Español

Orientación para obtener la diferencia en horas entre fechas en Perl.

Me pueden apoyar la manera de obtener la diferencia en horas entre dos fechas, por ejemplo:

Fecha 1: 2012-08-08 11:11:00
Fecha 2: 2012-08-02 22:22:00

Al utilizar DateCalc me muestra el siguiente resultado:
-0:0:0:5:12:49:0

Me pueden apoyar interpretando el resultado, gracias.

Resulta que no tengo el dato que espero...

Traigo los registros de una base de datos, y quiero en una sola línea crearle un campo a cada registro con los datos del creador del registro de otra tabla, eso por medio de un ORM:

$_->{'created_by'} = 1 # para todos los registros que traigo
$_->{'edited_by'} = 3 # para todos los registros

mi línea map es así:

map( %{$_}->{'creador'} = $usuario->retrieve( $_->{'created_by'} ) , @$contents); ...

Hola,

Tengo un programa en el que delimito el principio y final de palabra con \b. El problema radica que en Linux las letras con tilde las detecta como final de palabra, y claro, me rompe la teoría. (En la máquina Windows me funciona correctamente).

Supongo que es porque tengo mal definido el "encode" utilizado, ¿¿no??

Mil gracias.

Buenas, tengo un problema entre pequeño, mediano y grande.

Me explico: necesito ordenar un array de fechas del siguiente formato: 2012/01/01, 2012/01/01, 1985/01/04, 1995/06/07, 2001/02/02. Bien, este sería el array de fechas @fechas. Asociado a este array relleno otros dos arrays: un array de títulos @titulos y un array de nombres de fichero @nombresDeFichero.

El tema es que las posiciones son correlativas en los tres. Es decir la posición $fechas se corresponde con $titulos y ...

Hola, estoy haciendo pruebas de rendimiento para ver la mejor opción para usar sockets en Windows.

He hecho dos funciones distintas en el cliente, una de ellas abre socket, envía una cadena dentro de un for(), cierro socket y mido tiempos. La otra función abre un socket por iteración, envía la cadena, cierra socket por iteración y mido tiempos.

Obviamente la segunda opción tarda más, pero más allá de eso el problema es la inestabilidad ...

No sé si lo pueda llamar así...
:? no quiero usar Moose ni DBIx-Class.

La idea es que hice un ORM sencillo en Perl, pero quiero que mi módulo genere desde mi modelo de la base de datos
Ej.:

package MyApp::Model::Cliente
use base "MyApp::Model";

@campos = qw(id nombre cedula);


Luego de procesos internos, Perl me genere automáticamente la estructura para que yo pueda obtener ...

Saludos a todos, soy nuevo en el foro, espero encontrar ayuda en ustedes...

Mi problema es el siguiente: estoy desarrollando una aplicación (en Perl, claro) que se conecta a servicios de DBus. Ya he hecho la llamada a varias funciones retornándome el valor correcto, pero hay una de ellas que no me devuelve un escalar, sino una lista, lo cual me ha dificultado mucho el trabajo, ya que no encuentro la forma de mostrar los ...

Hola chicos, me preguntaba si alguno de vosotros habéis implementado una captcha para un formulario. He estado viendo varios sitios web pero no acabo de ver un método que me acabe de convencer. Agradecería cualquier aporte de enlace o referencia a tutorial.

Muy poco entiendo o no comprendo, hay una API que me dan un ejemplo para hacer una pregunta a un artículo de la página, pero no sé cómo lograrlo en Perl.

¿Cómo podría hacer esta petición en Perl al API?

curl -v -k -H "Content-Type: application/json" -X POST -d {
item_id:"<itemID>",
text:"Tenés de color rojo?"}
https://api.sitio.com/questions?access_token=APP_USR-242-041709-c6eba84d96fc5e38ff9b84d3adde7e01

Ojalá con WWW::Mechanize...

El contexto es...

No puedo actualizar la versión de perl completa ya que no tengo los permisos necesarios para aquello, lo que sí puedo es modificar algunas librerías. Mi versión de Perl es muy vieja y no acepta algunas funcionalidades que la actual sí trae.

Es por eso que tenía pensado agregar esas funcionalidades "a la mala" en el código de las librerías correspondientes (Ctlib, DBlib, Sybperl, etc..) las que sean necesarias para que la ...