Foro - Perl en Español

Que tal, espero y me puedan ayudar con el problema que se me presentó.

Estoy haciendo un cgi que cada vez que se hace una solicitud manda un correo de activación (esto ya lo tengo). El problema que tengo es que cuando desde el correo le doy click al enlace el cual me direcciona a otro script de Perl, al momento de hacer el insert lo hace dos veces; ya verifiqué que el script solamente ...

Hola que tal, espero y me puedan ayudar con este problema.

Estoy haciendo un programa en Perl que hace unos cálculos, entonces la información que obtengo la mando vía web con el módulo Send::Mail. Aquí mi pregunta es cómo puedo hacerle para que ésta se alinee de manera uniforme. Esta es la instrucción que estoy utilizando para almacenar.

my $conceptos="";
for ($i=1;$i<=$FORM{arreglo};$i++) {
$total="total".$i;
$conceptos="$conceptos"."$tipo_cambio{$i}" ."&nbsp; &nbsp; &nbsp; &nbsp;". "$FORM{$total}" . " <br>";
}

Esta ...

Necesito que me den algún tip especial para mostrar archivos ordenados por una determinada constante ($codigo), el caso es que sé cómo ordenar para que el usuario escoja el área a elegir, o por grupo de datos, el problema radica en las noticias donde la forma de visualizar ¡es diferente!

Ahora bien, sé que una forma de ordenar es:

while($renglon=<EMPRESAS>){
chop $renglon;
@matriz=split("\t",$renglon);
$x=0;
foreach $item (@campos){
$$item=$matriz;
$x++;
push (@desorden,"$matriz\¨$renglon");
}
#Condicionales
}

o ...

Hola Amigos Perlianos:

Tengo una duda para la extracción de información de un XML.

Estoy utilizando XML::Simple y me ha funcionado muy bien, pero ahora tengo una estructura un poco más compleja, creo que es un array dentro de un hash :
<xml>
- <Accommodation>
- <Hotel>
<Name>Azul Beach</Name>
<Hcode>HOT0000503</Hcode>
<Type>Resort</Type>
<Rating>5</Rating>
<MitSiteCode />
+ <Descriptions>
+ <Descriptions>
+ <Descriptions>
+ <Descriptions>
+ <Descriptions>
+ <Descriptions>
+ <Descriptions>
+ <Descriptions>
+ <Descriptions>
- <Room> ...

Que tal.

El problema que tengo es el siguiente: tengo una aplicación donde mis CGI hacen conexión a una base de datos de Postgres. Las conexiones las hago directamente con el usuario postgres y su respectiva clave. He estado leyendo artículos donde no recomiendan que las conexiones no las haga directamente el usuario postgres "por razones de seguridad". Quiero ver si hay manera de que las conexiones las haga otro usuario que no sea postgres ...

Tengo un problema con el siguiente script, capaz alguien me puede ayudar.


#!/bin/perl

use PDF::Report;

my $pdf = new PDF::Report(
PageSize => 'A4',
PageOrientation => 'Portrait'
);

$pdf->newpage(1);
$pdf->setFont('Helvetica-bold');
$pdf->setSize(14);
my ($width, $height) = $pdf->getPageDimensions();

$pdf->centerString(0, $width, $height-40, "Reporte de Seguridad");

$pdf->setFont('Helvetica');
$pdf->setSize(10);

open (DATOS,"hola.txt");
while (@linea = <DATOS>){
my $text1= "@linea";


$pdf->addParagraph($text1, 30, $height-70, $width-60, 30, 25, 10);
}


open(PDF, "> reporte.pdf") or die "ERROR: No puedo escribir en reporte.pdf: $!\n";
print PDF ...

¡Hola!. He estado investigando acerca de cómo hacer búsquedas en Google.
Y me topé con este manual:

http://google.dirson.com/apis/ejemplo01.php

No me gusta la forma con la que lo hace en el manual.

Yo lo que quiero es poder hacer una búsqueda en Google a partir de una palabra que defina, y guardar las urls que me dio como resultado la búsqueda en un array. Quiero hacer más cosas, pero quiero ...

Hola. Yo estoy iniciando en lo que es Perl. Quisiera saber si alguien sabe cómo se manda un archivo de salida en txt, es decir estoy leyendo un archivo y lo que arroje mi resultado quiero enviarlo a un archivo txt. ¿Como le puedo hacer?

Buenos días perleros, necesitaría una cosilla. Cómo hago para rellenar un select con una consulta que realizo mediante Ajax a la base de datos.

La cosa es así, tengo un select con todos los países, y necesitaría que al elegir cualquier país, o sea en el evento onChange del select, me comunique con el Ajax y me realice una consulta sobre el país que seleccione. Luego que con esa consulta me rellene un select.
Seria ...

Buenas estoy tratando de parsear los resultados de un escaneo de red con nmap, cabe aclarar que es para un lab que estoy haciendo.

Obtengo como resultado:
<!-- Nmap 4.20 scan initiated Tue Oct 2 14:33:46 2007 as: nmap -sS -oX tcp.xml -iL ips.lst -->
<nmaprun scanner="nmap" args="nmap -sS -oX tcp.xml -iL ips.lst" start="1191346426" startstr="Tue Oct 2 14:33:46 2007" version="4.20" xmloutputversion="1.01">
<scaninfo type="syn" protocol="tcp" numservices="1697" services="1-1027,1029-1033,1040,1043,1050,1058-1059,1067-1068,
1076,1080,1083-1084,1103,1109-1110,1112,1127,1139,1155,1158,1178,
1212,1214,1220,1222,1234,1241,1248,1270,1337,1346-1381,1383-1552,
1600,1650-1652,1661-1672,1680,1720,1723,1755,1761-1764,1827,1900,
1935,1984,1986-2028,2030,2032-2035,2038,2040-2049,2053,2064-2065,
2067-2068,2105-2106,2108,2111-2112,2120-2121,2201,2232,2241,2301,
2307,2401,2430-2433,2500-2501,2564,2600-2605,2627-2628,2638,2766,
2784,2809,2903,2998,3000-3001,3005-3006,3025,3045,3049,3052,3064,
3086,3128,3141,3264,3268-3269,3292,3299,3306,3333,3372,3389,
3397-3399,3421,3455-3457,3462,3531,3632,3689,3900,3984-3986, ...