[Perl] Perl y Mysql

[Ing. Roberto Andrade Fonseca]

Hola:

On Mon, 20 Aug 2001, Juan Luis Orozco Montalvo wrote:

> Hola perleros..
>=20
> Estoy trabajando en una base de datos en Mysql y a traves de perl subo
> los datos
> a la base.
>=20
> Mi base cuenta con 3 tablas. En la tabla en la que subo los datos (la
> principal), de los reportes que obtengo en perl, subo una clave de
> usuario de 6
> digitos, pero lo que quiero es que no suban los numeros, si no que suban
> los
> nombres de los usuarios, en otra de las tablas tengo dados de alta todos
> los
> usuarios y pues antes de subirlos a la tabla principal, quisiera que
> checara la
> clave con el nombre y subiera el nombre.
>=20
> Lo puedo desde perl o tengo que hacerlo desde mysql a traves de un
> query??
> Como le hago??

La mejor manera es que hagas un script de perl, que te permita permita cone=
ctartea Mysql con DBI.

Loe que quieres hacer es un un joint entre dos tablas. Ejemplo:

usuarios
--------
id_usuario=09int,
nombre=09=09varchar(20),
apellidos=09varchar(30)


tareas
------
id_tarea=09int,
nombre_tarea=09varchar(20)

tareas_asignadas
----------------
id_tarea=09int,
id_usuario=09int


Si quieres un reporte de tareas, ser=E1 algo as=ED (no lo prob=E9):

select u.nombre, u.apellidos, t.nombre_tarea, ta_id_tarea  from usuarios u,=
 tareas t, tareas_asignadas ta where u.id_usuario =3D ta.id_usuario and t.i=
d_tarea =3D ta.id_tarea;


Saludos,

Roberto Andrade Fonseca
randrade@abl.com.mx