Foro - Perl en Español

Buenas tardes,

estoy intentando realizar una consulta a una base de datos utilizando el módulo Net::MySQL, pero cuando realizo una consulta intentando filtrar los resultados con WHERE, el programa se queda bloqueado, como si estuviera pensando. En cambio si la consulta la hago sin WHERE, todo funciona bien.

Mi programa es el siguiente:

#!/usr/bin/perl -w

use Net::MySQL;
use strict;

my $mysql = Net::MySQL->new(
hostname => 'localhost', # Default use UNIX socket
database => 'XXXX',
user ...

Gente:
Estoy teniendo un problema, y probé de todo y nada me funciona.

método:

sub procesarUrls
{
my $self=shift;
my @urls=shift;
my @textos;
my $key;
my $value;

#print Dumper(@urls);


#for(my $i=0;$i<=$#urls;$i++)
foreach $value (@urls)
{
print "valor: $value \n";

#print "url: $urls \n\n";
#$self->getDataClarin($urls);
#$self->mostrarAtributos();
#push(@textos,$self->getText());
#$self->setText();
}
return @textos;
}


Invocación:

@urls=$esc->getLinkHome($html);
$esc->procesarUrls(@$urls);


probé pasarlo con @, con %, etc. pero no hay caso lo único que logro mostrar en la dirección ...

De un artículo de Jan Dubois (en inglés):

«El Perl Package Manager (PPM) instala módulos Perl precompilados en ActivePerl. Los repositorios PPM de ActiveState contienen, actualmente, de 13.000 a 16.000 módulos por plataforma. Son fáciles de localizar con el cliente PPM, tanto desde la línea de comandos como desde el entorno gráfico.

Sin embargo, algunas veces querrías saber si un módulo está disponible para una determinada plataforma, para decidir si puedes usarlo en un proyecto ...

¡¡Hola!!

¿Cómo le puedo hacer para quitar ceros de izquierda a derecha y que me deje solo los valores diferentes de 0?

Ejemplo:
0000000456 donde yo quiero obtener solo el número 456

¡¡Saludos!!

Hola, estoy buscando en foros pero no encuentro la solución a mi duda.

Es simple: ¿alguien me puede decir la diferencia entre poner

!/usr/bin/perl o poner

!/usr/bin/perl -w -T

?


¿Qué significa -w -T?

Y ¿cuál es la diferencia entre un archivo con extensión cgi o pl? ¿Da lo mismo una que otra? ¿Realizan las mismas funciones?

Pues nada, me ha dado por opinar sobre este lenguaje tras trastear y aprender un tiempo. Aunque en cuanto a teoría he devorado la mayor parte de los manuales de referencia que tengo.


Cosas buenas:
-El uso de los contextos, variables dinámicas, escalares y autoconversiones lo convierten en un lenguaje muy especial e hiperpotente aunque demasiadas veces tienes la sensación de perder un poco el control, aunque me gusta y facilita las cosas si sabes. ...

Me está marcando el siguiente error en mi sentencia.

if ($lenght $hs_poid="10") {$sc_numero_cuenta=substr($_,17,10);}

Adjunto error.

¡¡Saludos!!

Hola a todos y disculpen la simpleza de esta pregunta, el royo es que estoy empezando en el mundo del Perl, pues tengo una aplicación desarrollada en Perl que necesito montar, pero cuando intento acceder a ella desde la web al link http://my-server/passwd/ donde en la directorio passwd tengo los script .pl, el navegador me devuelve el siguiente error

The server encountered an internal error or misconfiguration and was ...

He estado intentado instalar el módulo DBD::Oracle para Perl 5.8.8 en un ambiente HP-UX y obtengo el siguiente error al intentar probar la librería...

# perl -MDBD::Oracle -le'print $INC{q{DBD/Oracle.pm}}'
Can't locate loadable object for module DBD::Oracle in @INC (@INC contains: /opt/perl_64/lib/5.8.8/IA64.ARCHREV_0-thread-multi-LP64 /opt/perl_64/lib/5.8.8 /opt/perl_64/lib/site_perl/5.8.8/IA64.ARCHREV_0-thread-multi-LP64 /opt/perl_64/lib/site_perl/5.8.8 /opt/perl_64/lib/site_perl /opt/perl_64/lib/vendor_perl/5.8.8/IA64.ARCHREV_0-thread-multi-LP64 /opt/perl_64/lib/vendor_perl/5.8.8 /opt/perl_64/lib/vendor_perl .) at -e line 0
Compilation failed in require.
BEGIN failed--compilation aborted.

Al probar el mismo comando con el usuario root funciona todo OK, pero cualquier otro ...

Hola, comunidad. Hoy me he encontrado con un problema... He investigado pero no he dado con la solución :? Bien, explicaré mi problema.

Este es mi texto inicial:
TOC of the extracted CD
Track | Start | Length | Start sector | End sector
---------------------------------------------------------
1 | 00:00:00 | 05:37:20 | 0 | 25294
2 | 05:37:20 | 07:53:72 | 25295 | 60841
3 | 13:31:17 | ...