Hola Chicos...
Estaba buscando la forma de obtener un hash con todos los resultados desde mi base de datos para transportarlos a un Template que tengo en HTML.
Aquí dejo el codigo...
Código HTML:
...
<TMPL_LOOP NAME=ROWS>
<tr>
<td><TMPL_VAR NAME=ID></td>
<td><TMPL_VAR NAME=NOMBRE></td>
<td><TMPL_VAR NAME=RUT></td>
<td><TMPL_VAR NAME=DIRECCION></td>
<td><TMPL_VAR NAME=COMUNA></td>
<td><TMPL_VAR NAME=CIUDAD></td>
<td><TMPL_VAR NAME=GIRO></td>
<td><TMPL_VAR NAME=TELEFONO></td>
<td><TMPL_VAR NAME=FAX></td>
</tr>
</TMPL_LOOP>
...
Aquí el codigo Perl...
Código:
...
my $sth = $dbi->prepare("SELECT * FROM empresas");
$sth->execute();
while (my $recordset = $sth->fetchrow_hashref())
{
$html->param(ROWS => [$recorset]);
}
...
El problema es que cuando hago eso para obtener todos los resultados de la Base de Datos, solo el ultimo registro... algo así como si reescribiera el registro más antiguo y deja el más nuevo. Ejemplo: En mi base de Datos tengo 50 registros aprox. y solo muestra el ultimo, el numero 50. Por lo mismo, he leido mucho respecto al tema de HTML::Template y llegue a la conclusion que lo unico que puedo hacer es:
- Obtener un HASH con todos los registros desde la Base de Datos con alguna función o proceso, ¡PERO NO SE COMO!
- Ver alguna forma de tomar un HASH y luego unirlo con los que siguen para que se cree un HASH con todos los registros de la DB. ¡PERO NO SE COMO!
Nesesito ayuda urgente... por favor.
Atentamente, DarkXNightmare.