no lo he probado pero tiene toda la pinta de que sí.
Pero no me gusta ya que esta rutina sirve para insertar, borrar y modificar con tan solo variar la consulta que le pasamos. Lo ideal sería tener una rutina exclusiva para, por ejemplo, listar, solamente. Y he pensado en algo así:
Using perl Syntax Highlighting
sub listar{
my $sql= shift; #recogemos la consulta pasada como referencia.
my $sth=$dbh->prepare('$sql') or die("error");
$sth->execute();
while (my @data = $sth->fetchrow_array())
{
return (print "Nombre: @data[1] - (email: @data[2]) Tel: @data[3] \n");
}
$sth->finish();
}
Coloreado en 0.002 segundos, usando
GeSHi 1.0.8.4
¿detectas algún problema?
saludos!!