Foro - Perl en Español

Hola, nuevamente recurro a ustedes en busca de ayuda.

Estoy haciendo una manipulación de archivos de texto. Por ejemplo el primer archivo tiene la siguiente estructura (fragmento):
A B Score
HP0799 HP0172 0.698
HP0799 HP0172 0.698
HP0172 HP0799 0.698
HP0355 HP1195 0.581
HP1132 HP1420 0.675
HP1420 HP1132 0.675
HP1195 HP0355 0.581
HP0952 HP0329 0.651
HP0329 HP0952 0.651
HP0001 HP0002 0.483
HP0001 HP0002 0.695
HP0002 HP1574 0.641

El segundo archivo es una lista con la ...

Hola.

Ando teniendo una duda porque estoy queriendo comprobar que haya HTML activo en una página pero no me puedo comprobar bien.

Porque en PHP hay una función htmlentities() o htmlspecialchars() que codifican las cadenas HTML para que no estén activas.

Mi duda es cómo poder detectar HTML realmente activo en Perl.

¡Hola!

Necesito saber la fecha en la que la otra persona se tomó la foto.

El tema es que me la mandó en un mail y cuando la bajo la fecha de creación me aparece en el momento en el que se bajó.

¿Existe alguna forma de saber cuándo la otra persona la creó en su PC?

Desde ya, muchas gracias...

Hola, mi nombre es Pablo, soy usuario de TeX/LaTeX hace bastantes años (en entornos Linux y Win32) y tengo instalado MikTeX2.8 junto a Active Perl.

El problema se me presenta con el siguiente script Perl «pst2pdf» de H.V (a cargo de mantener y desarrollar los paquetes PsTricks y compañía)

El script funciona, pero no en forma correcta, con la línea
print PDF "\\IncludeGraphics{$imageDir/$name-tmp-$IMGno$Iext}";

escribe en el fichero final, pero, agrega un .\ de la ...

Hola a todos.

Tengo el siguiente texto en la variable $cosa:

hola.chau

if ($cosa=~/(.*).(.*)/) { # Mal !!!!
}

Mi simple duda es cómo separar hola y chau mediante el punto.

Hola a todos de nuevo. Esta vez necesito ayuda en este código:
#c:/perl/bin/perl.exe;
use warnings;
use MIME::Lite;
$msg = MIME::Lite->new(
From =>'[email protected]',
To =>'[email protected]',
Subject =>'Hola!',
Data =>"Hola! Que tal todo?"
);
$msg->send();
No sé por qué me da un error.
El error que sale es:
SMTP Failed to connect to mail server: Bad file descriptor
at C:\Documents and Settings\Invitado\Desktop\send.pl line 10
Utilizo Windows XP.
Gracias por adelantado ...

«Hoy no estoy muy inspirado para escribir en el blog, así que he repasado mis librerías de subrutinas de perl para ver si encontraba algo curioso para publicar y me he encontrado con esto...
¿Quién no ha tenido nunca el problema de comprobar si una expresión es numérica o no?
Perl no posee una función que lo haga automáticamente (por lo menos que yo conozca), sin embargo con una simple línea de código podemos salir ...

Hola, tengo un problema con pack(). Estuve ejecutando este código:
s/%(..)/pack("C",hex($1))/ge; pero no me reconoce los %... es decir, en vez de convertirlo a %25, los deja como está... ¿es un error mío o de la librería? ¿existe otra forma de solucionarlo...? Estoy usando Perl 5.8.5...

Saludos y desde ya muchas gracias.

Hola buenas,

Luego de mucho tiempo me topé con un escenario un tanto complejo sobre migraciones de datos...

El tema es así: tengo 800 archivos xls con varias hojas y necesito poder migrarlos a SQL Server.

¿Alguno conoce alguna forma efectiva de poder realizar una migración así desde Perl o tuvo una experiencia similar?

Hola, de nuevo =P.

Les cuento que soy un feliz usuario de una Mac, la cual tiene luces bajo las teclas que se manejan con sus correspondientes teclas en el teclado. Las luces funcionan perfectamente: al modificar un archivo con un número se encienden y se cambia la intensidad. Vi por ahí que había un script para bindearlo a las teclas y así poder cambiarlas con las del teclado, pero sin embargo, ya que estoy ...