[Madrid-pm] Crear listados desde una BD

[Joaquin Ferrero]

El jue, 10-07-2008 a las 09:38 +0200, PEGG escribió:
> Tengo esto:
> my %resultados;
> while ( my @resultados = $sth->fetchrow_array ) {
>     foreach my $resultado (@resultados) {        
>         my ( $ID, $pais ) = @{$resultado}[ 0, 1 ];
>         push @{ $resultados{$ID} }, $pais;
> 
> Donde tengo que entrecomillar??

Yo me refería a las constantes que había puesto en mi código, para
imitar la consulta a una base de datos.


> while ( my @resultados = $sth->fetchrow_array ) {
> $resultado=\"$resultado\"; #<-Aquí??
>     foreach my $resultado (@resultados) { 
> 
> Imprime: Use of uninitialized value in concatenation (.) or string
> at ...

Pero, ¿qué línea? Si no pones todo el error, no sabremos dónde.

Creo que faltan algunas '}' al principio...

-- 
JF^D