[caracas-pm] caracas-pm Digest, Vol 39, Issue 7
Luis Muñoz
lem at cantv.net
Wed Aug 22 13:29:52 PDT 2007
Hola Daniel.
Por favor no hagas top-posting... Tampoco es buena idea hacer quote
de todo el digest en tu respuesta ;-)
On Aug 22, 2007, at 3:39 PM, Daniel Rojas wrote:
> Que tal Ernesto, gracias por tu respuesta, el ejemplo que coloque
> lo puse a manera de referencia y de manera simple para ilustrar el
> error, ya que el programa original es mas extenso, ya he probado
> Class::DBI y DBIx::Class y ambos arrojan el mismo error que
> publique con el Oracle, [...]
El fragmento de código que enviaste, no tiene sentido. Fíjate (cito
el código original):
>> use strict;
>> use DBI;
>>
>> my $dbh = DBI->connect( ... ) || die "Database connection not
>> made: $DBI::errstr";
>>
>> my $sql = qq{ SELECT * FROM gl_balances where set_of_books_id =
>> 344 and
>> code_combination_id = 166823 and currency_code = 'VEB'};
>> my $sth = $dbh->prepare( $sql );
>> $sth->execute();
Hasta aquí, bien...
>> print $sth;
Esta línea no tiene sentido. Esto *no* hace lo que crees que hace.
Esencialmente, no estás haciendo fetch() de los resultados... Lo que
quieres, es algo como esto
while (my @r = $sth->fetchrow_array) { print "@r\n"; }
$sth->finish;
undef $sth;
Saludos
-lem
More information about the caracas-pm
mailing list