| Pregunta: | 10442 - SQL ANIDADO EN PERL |
| Autor: | Eduardo Jurschan |
| Quiero hacer un SQL anidado en PERL usando el DBI de MySQL.
Primero hago un SQL que me devuelve un numérico y ese numérico debe incluirse en el otro SQL Ejemplo: #!/usr/bin/perl -w use DBI; $driver="mysql"; $dsn="DBI:$driver:sue"; my $sue = DBI->connect($dsn,"ejurschan","eduardo"); my $per = $sue->prepare("SELECT nroleg FROM per"); my $oldper = $sue->prepare("SELECT * FROM oldper WHERE nroleg NOT IN ?"); $per->bind_param(1,$value, SQL_INTEGER); $per->execute; $oldper->execute($value); open(OLDPER,">oldper.result"); print DBI::dump_results($oldper,undef,undef,undef,*OLDPER); La ejecución de esta rutina me tira como error que el parámetro SQL_INTEGER no está "hasheado" en el DBI:DBD, por lo tanto no puede hacer el fetch. Podría alguien decirme como arreglarlo ? Gracias | |
| Respuesta: | Nacho |
| Nunca he usado lo que apuntas, pero no seria mas sencillo hacer la sentencia directa:
("SELECT * FROM oldper WHERE nroleg NOT IN (SELECT nroleg FROM per)"); Como sugerencia, si te sirve. | |