Bueno... ya no hace falta que me ayuden porque lo resolvi solo :P.
Explicare lo que hice para los amigos que tengan algún problema parecido:
Código:
...
my $sth = $dbi->prepare("SELECT * FROM empresas");
$sth->execute();
my @full_record = ();
while (my $recordset = $sth->fetchrow_hashref())
{
push(@full_record, $recordset);
}
$html->param(ROWS => [@full_record]);
...
Ahora, todo funciona de maravilla :D.
Atentamente, DarkXNightmare ;D.