Foro - Perl en Español

con Perl, ImageMagick y Mplayer:
http://www-128.ibm.com/developerworks/o ... FancyVideo

¡Qué tal comó están todos! Antes que nada quiero decirles que soy nuevo en este lenguaje(Perl) y la verdad tengo mucho interés en aprender más, he leído algo de este lenguaje y me atreví hacer un cgi claro tomando de ejemplo uno que ya estaba hecho, tengo una página hospedada en un servidor, un dominio .com.mx y el servidor soporta php y perl para los cgi, sé cuales son las rutas y tengo los permisos ...

tengo un update que lo ejecuto desde execute()

pero el update tiene una condición, hay forma de saber si se dió esa condición o no ? o sea, si efectivamente se actualizó o no ?

Busqué en la doc del DBI pero no encuentro nada...

Saludos

Hola a todos!

Este es mi primer mensaje en el foro, ya que soy un aprendiz de Perl.

Mi problema es el siguiente:

Debo encontrar la forma (si es que existe) de extraer de varios textos las combinaciones entre palabras de una lista dada de palabras. Estamos hablando de 140 textos y una lista de alrededor de 1.300 palabras. Se trataría de ver cómo esos términos se repiten/combinan entre ellos en dichos textos.

El primer ...

Tengo que decir que hasta hoy nunca habia tratado con un script CGI. No llego ni a novato.
Tengo una web en un servidor Windows. Quería probar un pequeño catálogo que encontré por internet, hecho en flash y asociado al archivo "orderform.cgi".
He consultado a mi servidor y me ha dicho que este CGI es para Linux y que no funcionará bajo Windows.
Mi pregunta es, ¿cómo puedo "traducirlo" para que funcione en mi servidor? ...

Hola Perlianos:

Tengo un script que envía un mensaje SOAP a un servidor y recibo respuesta a través del Web Service; mi pregunta es:

¿Cómo puedo convertir "La Respuesta", que viene en XML a una estructura de datos en Perl? Este es mi script:

#!/usr/bin/perl
use strict;
use LWP::UserAgent;
use HTTP::Request::Common;
print "Content-Type: text/xml; charset=utf-8";

my $barco = 'ARGOSY';
my $manif = '465';
my $usuario = 'API940504EPA';
my $message = "<?xml version=\"1.0\" encoding=\"UTF-8\"?>
<soap:Envelope ...

Hola!
Estoy trabajando con PHP, Perl y MySQL y con dos máquinas diferentes.
Tengo un script .pl en una máquina, y desde ese script necesito hacer una consulta a la base de datos que se encuentra en la otra máquina, pero no se como hacerlo.
Espero que podais ayudarme.

Un saludo y gracias

Hola a todos...

Estoy debugeando un script de perl (perl -d <script.pl>) y no recuerdo cómo puedo ver el contenido de un arreglo de forma tal que me salgan sus elementos por separado...

Por ejemplo: la variable @a contiene los valores 10, 20 y 30

p @a me muestra 102030

Quisiera verlos de forma separada sin tener que poner

p $a, p $a o p $a

que pusiera.... <el comando para mostrar a @a> y ...

Hola a todos...

Tengo este código que me imprime lo siguiente...

Code: Seleccionar todo

@Month_name = ( "January", "February", "March", "April", "May", "June",
  "July", "August", "September", "October", "November", "December" );
( $sec, $min, $hour, $day, $month, $year ) = ( localtime ) [ 0, 1, 2, 3, 4, 5 ];

printf "%04d-%02d-%02d %02d:%02d:%02d\n", $year+1900, $month+1, $day, $hour, $min, $sec;

Imprime..... 2006-07-08 18:15:47

Aquí va la pregunta.... ¿Como podria almacenar el resultado en una variable ?? He intentado varias ...

Hola a todos...

Resulta que ahora me está dando problemas algo que ayer me funcionaba... Estoy insertando texto en un fichero de la siguiente forma y me da error. Acá va el código...

Code: Seleccionar todo

  use DBI;
 
  my $salida="/home/admin/fichero.txt";
  open (SALIDA,">$salida") || die "ERROR: No puedo abrir el fichero $salida\n";

  PRINT SALIDA "SKLHFEW EWTREJTOEWRTIETERHTOEOR";
  close (SALIDA);

El error es el siguiente...

Can't locate object method "PRINT" via package "IO::Handle" at /home/admin/write.pl line 6.

(la linea donde hago ...