Jue Sep 18, 2008 6:16 pm
|
|
|
| Datos de la consulta SQL |
|
|
Tengo problemas con la recuperación de los datos (cómo los capturo), agradezco de antemano su colaboración.
La consulta es la siguiente:
| Perl: | #!/usr/bin/perl
use CGI:: Carp qw(fatalsToBrowser );
use strict;
use DBI;
my $dbuser = "maest_gonzalo";
my $dbpass = "gjr";
my $dbhost = "localhost";
my $dbname = "maest_ME3REGIS";
my $dbh = DBI-> connect("DBI:mysql:$dbname:$dbhost", $dbuser, $dbpass);
my $query = $dbh-> prepare( "SELECT identif FROM ME3REG" );
$query-> execute();
while( my @data = $query-> fetchrow_array() ) {
print " DATA= @data \n ";
}
$query-> finish(); |
|
|
|
|

Jue Sep 18, 2008 9:07 pm
|
 |
monoswim
Vive para Perl en Español

|
Registrado: 18 Nov 2003
Mensajes: 720
Ubicación: Buenos Aires
|
|
|
|
|
No encuentro el error en el código, siempre intenta usar algún escape ante un error, como ser:
| Perl: | my $dbh = DBI-> connect("DBI:mysql:$dbname:$dbhost", $dbuser, $dbpass) || die('no se puede conectar...'); |
Saludos |
|
Vie Sep 19, 2008 12:59 am
|
 |
explorer
Moderador

|
Registrado: 24 Jul 2005
Mensajes: 4239
Ubicación: Valladolid, España
|
|
|
|
|
| Pero, ¿estás ejecutando este proceso como un CGI desde el principio? ¿No puedes ejecutar el proceso directamente desde la línea de comandos? |
|
Vie Sep 19, 2008 10:12 am
|
|
|
|
|
|
No me explico como siempre te sales con la Tuya, adicione la validación a la conexión y me funciono........Gracias por tu valiosa colaboración…..
Cordial Saludo,
Gonzalo.
 |
|
Powered by phpBB © 2001, 2005 phpBB Group
|