Foro - Perl en Español

Estoy trabajando con MYSQL, necesito poder recuperar el valor dado a un campo tipo auto_increment por la base de datos al realizar una insercion, para luego insertar dicho valor en otra Tabla.

¿como puedo obtener dicho valor?

MUCHAS GRACIAS.

Hola, quería ver un poco de teoría sobre como hacer algo parecido a los sistemas de administración de hosting que se logean como usuarios mismos del sistema y administran los archivos de configuración y tienen funcionalidades como si estuviesen logeados en línea de comandos...

Supongamos que me quiero loggear como root y editar algún archivo de configuración como ser el del ftpd.conf que solo tiene acceso root...

Debería de darle acceso al usuario apache para ...

Buenos días,
Me enfrento con el siguientes problema:
Digamos que tengo la siguiente variable:
$Cadena="hola"
Me gustaría de algún modo, no sé si existe alguna función,
de modo que pudiera obtener las letras de la variable por separado,
es decir, por ejemplo
valor1=h, valor2=o ....

Estuve pensando en meter el contenido de la variable en un arreglo, pero no veo forma de hacerlo, o al menos no sé qué separador poner. Desde este arreglo, ya ...

Migré mi base de datos de 8i a 9i y de ahí en más cuando ingreso a Query builder me da el mensaje de error :

OBE-15952: No se ha cargado la tabla de privilegios del usuario

¿Alguien puede ayudarme a solucionar este problema?

Gracias :D

A continuación cuando cargo un consulta aparece:

15409: error when loading
information on the restriction ....

Hola amigos, veréis, tengo que hacer un trabajo para la facultad, algo sencillo, un benchmark portable; debe ser en Perl por lo que necesito algo de ayuda (yo controlo c, c++, java).

He visto que existe un módulo llamado benchmark con el que puedes medir el tiempo que tarda en hacer algo determinado; necesito saber si se puede hacer algo como medir cuántos bloques de datos se pueden escribir en disco por espacio de tiempo, ...

Hola, que tal?

Bien, en The OpenGroup vi que con stdlib, usando la funcion ptsname se puede saber el nombre de la pts (pseudo terminal slave) y queria saber si con perl, usando ioctl, termios o algo similiar se podría saber el nombre.

También quiero saber si por demdio de Perl se puede saber el nombre, o el path del pts usado (si estoy en /dev/pts/0 o /dev/pts/1... ).

Resulta que tengo que pasar unos ...

Muy buenas. ¿Alguien ve algún error en la siguiente búsqueda? Cuando lo ejecuto en Solaris va OK, pero sin embargo cuando lo lanzo como parte de un script de Perl, me da valores que no son los correctos

$Cadena=`ls -l /var/ldap | grep cert7.db | awk ´{ print $1}´`;
es curioso, cuando lo lanzo fuera en el Solaris, tengo como respuesta

Code: Seleccionar todo

-r--r--r--

que es lo correcto
y cuando lo lanzo desde Perl
-r--r--r-- 1 root other ...

¿Cómo saber si el sistema es de 32 ó 64 bits?

Intenté por Config.pm pero no encontré el flag...
Con POSIX usando uname, pero no hay tal información.

¿Alguna idiea?

Pongamos por ejemplo este código:

#!/usr/bin/perl
#~.

# al menos no da ningun error
use Mail::Mailer;
eval {
$m = Mail::Mailer->new("sendmail");
$m->open( { From => 'micorreo',
To => 'micorreo',
Subject => 'Como enviar e-mail desde Perl'
} );
print $m <<CUERPO
CPAN es tu amigo.
Perl es superior porque todo está en CPAN.
Resistirse es inútil.
CUERPO
;
$m->close;
};
if ($@) {
print "Error: $@\n";
}
else {
print "Mensaje enviado.\n";
}

cuando ...

Necesito saber cómo puedo vincular plplot con gtk. Es decir necesito graficar con plplot pero cargar las gráficas desde gtk para uso posterior.