Foro - Perl en Español

Dejo un ejemplo de lo que se puede hacer con este módulo:
''=~('(?{' .(('`')|
'%') .''. ('['
^'-' ).+( '`'|'!') .''. ('`' |',' )."\"".( '['^'+').(
'['^ ')') .''. ('`' |')' ).('`' |'.' ).+( '['^ '/') .''.
('{'^'['). '\\' .'"' .('{'^ '+') .''. ('`' |'%' ).+(
'['^ ')').(('`')| ',') .''. ('{'^"\[").( '`'| '%')
.''. ('`' |'.' ).+( '{'^ '[') .''.
('`' |'%' ).+( '['^ '(') .''. ('['
^'+' ).("\`"| '!') .('`'|'.').( '`'|'/') .''. ('`'

|','). ...

Hola gente, muy buenas, soy novatillo por estos mundos y necesito que me echéis en una mano a aclararme unas cosillas. Utilizo este método para enviar unas notificaciones de unos script, lo que para es que el cuerpo del mail, esta restringido a 600 caracteres, me gustaría saber si hay alguna opción de poder ampliar, y en este caso cómo hacerlo... Muchas gracias de antemano.

Gracias a todos los moderadores y personas que hacen posible sitios como este...

Soy nuevo en Perl y bueno, como todo novato me encuentro con la barrera de los módulos.

Mi problema es el siguiente: estaba copiando un script que encontré en la red para buscar en el escritorio y otras cosas. Lo copié todo tal cual o más o menos, y cuando lo corrí, bueno, no tengo instalado algunos módulos. Fui instalando así:
# ...

Este hilo en realidad está relacionado con otro hilo que abrí (llamado XML::Simple) pero como ya no utilizo ese módulo, pongo otro hilo.

Tengo la siguiente duda:

$writer->startTag("Antecedentes");
$writer->dataElement("MQ","texto");
$writer->endTag("Antecedentes");

En el ejemplo que acabo de citar, creo una etiqueta "Antecedentes", en la cual añado un dataElement llamado "MQ", para después cerrar la etiqueta general.
¿Es posible añadirle más adelante otro dataElement distinto a la etiqueta que acabo de cerrar?

¡¡¡Muchas gracias!!!

Hola a todos.

Quiero hacerme un script para conocer si un punto geográfico está incluido en un polígono.

He visto una web donde lo hacen en Visual Basic (creo) con coordenadas cartesianas que me podría valer:
http://www.brausoft.com/2007/09/03/punt ... -poligono/

Mi pregunta es si alguien conoce en CPAN módulos para trabajar con vectores y ángulos donde pueda encontrar funciones similares a las de la página que indico arriba.

Gracias anticipadas ...

Consulta.

¿Alguien usa o sabe dónde puedo conseguir un módulo y script el cual sirva para parsear el log del postfix? Porque me gustaría ver la posibilidad de sacar la cantidad de mails que envían todas las cuentas de correo de mi server en el periodo de una hora.

Saludos.

Hola a todos,

tengo un cgi que al ser ejecutado desde un formulario me devuelve error. En local (Win XP) me funciona correctamente.
Al darme error pensé que puede ser porque el servidor no tiene instalados unos módulos.

He creado un directorio lib/ en el servidor y he subido los .pm de mi directorio C:/perl/site/lib/Geo, pero me sigue dando error.

¿Hay que hacer algo más aparte de subirlos al servidor?

Gracias anticipadas / saludos / ...

Agradecería si me pudiesen ayudar en lo siguiente: Estoy buscando un módulo de Perl o algún software free que me permita generar reportes e Informes en mi sitio desarrollado en Perl, volcando datos desde una base MySQL.

¡¡¡¡Muchas gracias!!!! :D

Lo que necesito es hacer un LOOP dentro de otro LOOP.

La idea es que recorro registros por medio de un TMPL_LOOP y pues cada registro de estos tiene un select() con varias opciones.

Algo más o menos así:<TMPL_LOOP REGISTROS>

<TMPL_VAR NAME=NOMBRE>

<SELECT>
<TMPL_LOOP CATEGORIAS>
<OPTION><TMPL_VAR NAME=NOMBRE_CATEGORIA> </OPTION>
</TMPL_LOOP>
</SELECT>

</TMPL_LOOP>

Pero los LOOP vienen de datos diferentes:$template->param(CATEGORIAS => \@listado_categorias );
$template->param(REGISTROS => \@miniaturas);


¿Cómo podría resolver esto? Si hay otra idea mejor...

Bueno, ...

Hola.

Quiero enviar un email que incluya caracteres especiales del español como la Ñ, las letras con acentos, etc.

Se trata de un email en texto, no quiero el formato HTML.

A continuación el código perl:

my $msg = MIME::Lite->new(
From => '[email protected]',
To => '[email protected]',
Subject => 'Mensaje de prueba nº 5',
Data => "Una araña en la casa del francés.\r\n"
);

$msg->send;

El ...