Foro - Perl en Español

Hola, el problema que tengo es que quiero conectarme a un servidor Sybase.

Todas las conexiones están bien, estoy probando con un *.pl aparte para realizar "otra" conexión, pero me tira un error.

He acá el código...

use strict;
use warnings;
use Sybase::Sybperl;
#use sybase;

$dbproc = dblogin("server", "pass", "user");
dbcmd($dbproc, "select * from sysusers");
dbsqlexec($dbproc);
dbresults($dbproc);
while(@data = dbnextrow($dbproc)) {
print "@data\n";
}

El error por consola me tira...

Can´t locate ...

Hola.

Les consulto lo siguiente: Tengo un script en Perl el cual es ejecutado dentro del Squid con url_rewrite_program. La idea es compilar ese script y poder seguir ejecutándolo de la misma manera, ya que tengo que darlo en un servidor de prueba y no quería que se vea el código.

Nada más que eso.

¡Ah! Antes que me olvide, probé con pp -o compilado script.pl. Me lo deja compilado pero no me lo ejecuta ...

Hola nuevamente...

Sigo leyendo archivos...
Hice una consulta hace algún tiempo, pero algo pasó, porque no encontré la pregunta y obvio... no hubo respuesta.

Ahora tengo un problema, estoy leyendo un archivo Excel (xlsx) y trae varias hojas... y debo generar un archivo txt con cada una de ellas, y utilizo el nombre de la hoja para generar el nombre del archivo. Mi problema es que una de ellas se llama "viña". Al intentar asignar ...

«Desarrollar un programa que abra el archivo TEXTO1.rtf y cree uno nuevo de nombre pruebafin.txt, de tal forma que haga desaparecer todas las líneas que comiencen por “BASURA” y visualice el contenido por pantalla al mismo tiempo.»

El archivo TEXTO1.rtf contiene esto:
ttcccatcaa gccctagggc tcctcgtggc tgctgggagt tgtagtctga acgcttctat
BASURA cttggcgaga agcgcctacg ctccccctac cgagtcccgc ggtaattctt aaagcacctg
caccgccccc ccgccgcctg cagagggcgc agcaggtctt gcacctcttc tgcatctcat
tctccaggct tcagacctgt ctccctcatt caaaaaatat ttattatcga gctcttactt
BASURA gctacccagc actgatatag gcactcagga atacaacaat gaataagata gtagaaaaat
tctatatcct ...

Hola amigos, he estado viendo el foro y está muy bueno y muy completo, a pesar de esto hay algo
que no encontré o tal vez no miré bien. Mi duda es la siguiente:

He creado un package con el nombre de configuración, con la función conexion_bd();
éste es llamado desde otro perl; el problema es que si no le pongo al package un 1; o return 1;
mi función no se ejecuta dándome el ...

Hola, foro,
Hace días estoy intentando de resolver este error:

NOTICE: SELECT dbi_link.set_up_connection(
'dbi:mysql:database=webdb;host=192.168.1.106;port=3306',
'root',
'root',
'---
AutoCommit: 1
RaiseError: 1
',
NULL,
NULL,
NULL,
'webdb'
)
NOTICE: SELECT count(*) AS "driver_there"
FROM dbi_link.available_drivers()
WHERE 'dbi:mysql:database=webdb;host=192.168.1.106;port=3306' like '%' || available_drivers || '%'

CONTEXTO: sentencia SQL: «SELECT dbi_link.set_up_connection(
'dbi:mysql:database=webdb;host=192.168.1.106;port=3306',
'root',
'root',
'---
AutoCommit: 1
RaiseError: 1
',
NULL,
NULL,
NULL,
'webdb'
)
»
NOTICE: Warning: something's wrong at line 43.

CONTEXTO: sentencia SQL: «SELECT dbi_link.set_up_connection(
'dbi:mysql:database=webdb;host=192.168.1.106;port=3306', ...

Hola, ¿qué tal? Es la primera vez que ocupo de Perl y estuve buscando información en la web para resolver mi problema y me encontré con este foro y estuve navegando por aquí y me he dado cuenta que aparte de que este es un excelente foro, Perl es un lenguaje muy amplio.

Bueno, con respecto a mi consulta, estoy tratando de utilizar una librería (o no sé cómo se pueda llamar) que es para ...

¿Alguien me puede explicar cómo es el tema de las versiones para los programas?, me refiero a cómo se enumeran, porque yo siempre hago así:

0.1
0.5
1.0

y así sucesivamente, en vez de empezar desde 1.0 y seguir después de ahí.

¿ Alguien me puede explicar ?

«Este es un pequeño y sencillo módulo que facilita la inserción de imágenes en nuestros programas Perl-Gtk2, que interactúan ante eventos del ratón al pasar por encima de ellas o al pulsar en ellas. Es muy útil para la creación de botones interactivos, de ahí su nombre.»

Artículo

Hola buenas noches,

¡A ver si alguien me puede ayudar!

En el siguiente script abro un directorio. Tengo unos 66 ficheros pero solamente me interesan los 16 primeros.

Estos ficheros, tienen el siguiente formato:

gfs.t00z.pgrbf00.grib2
gfs.t12z.pgrbf03.grib2

es decir, solamente cambia la cifra que está detrás de la 'f' con intervalos de 3 (f00, f03, f06, f09, f12...).

Si introduzco en @files el nombre de todos los ficheros hasta el número 16, los elige y luego ...