Foro - Perl en Español

Estoy tratando con una tabla llamada formaaant que contiene los campos 'formaactual' y 'formaanterior'. Ambos campos son foreign keys (claves foráneas) de la única clave primaria (rid) de la tabla forma. Dibujo un poco la situación a continuación para que se entienda mejor:






ACLARACIÓN: aquellos registros que no se encuentran en formaant, significa que NUNCA han cambiado su forma o al menos, de momento.

Lo que deseo es hacer un script que a la hora de tomar cualquier forma (ya sea f2, g3, z6, etc.) de la tabla formaant, ¡¡logré enterarme cuál es su correspondiente forma1 (vamos, su forma madre), me refiero a (f1, g1, z1 -siguiendo el mismo orden-)!!

Estuve leyendo de "expresiones de tabla común o cte", donde se puede hacer consultas recursivas pero ya depende del motor de la base ¡¡y es un lío!!

¿¿Alguien me echa un cable??

Creo que el siguiente ejemplo lo puede resolver.

En lugar de consultas a base de datos, he usado hash, que es casi lo mismo.

Ejemplo de la salida:

¡¡explorer, resulta de perlas!! Pero... si trabajo de esta forma, me refiero al tratar ambas tablas como hashes, teniendo en cuenta que son muchísimos registros, no debería de tener problemas, ¿cierto?

Por cierto el /env perl sé que lleva una relación directa con la variable de entorno sino corríjeme pero corrí el script con el simple /perl y ¡¡obtuve el mismo resultado!! ¿En este caso lo has acotado por alguna cuestión ajena?

reLlene escribiste:¡¡explorer, resulta de perlas!! Pero... si trabajo de esta forma, me refiero al tratar ambas tablas como hashes, teniendo en cuenta que son muchísimos registros, no debería de tener problemas, ¿cierto?

Depende de la cantidad de memoria que tengas en el ordenador.

reLlene escribiste:Por cierto el /env perl sé que lleva una relación directa con la variable de entorno sino corríjeme pero corrí el script con el simple /perl y ¡¡obtuve el mismo resultado!! ¿En este caso lo has acotado por alguna cuestión ajena?

Es la forma recomendada de ejecutar perl: en vez de poner una ruta absoluta, le pedimos al programa env que lo busque.

De esta manera, si en el futuro ejecutamos el programa en otro ordenador, que tenga Perl instalado en un directorio distinto, no tendremos que abrirlo y editarlo.

Esto es fundamental, además, cuando se usan instalaciones locales de distintas versiones de Perl, o cuando un usuario quiere usar una versión de Perl distinta de la del sistema, todo ello con la ayuda del genial perlbrew.

Otro tema es si aún estás en Windows, que entonces dependes de la configuración del sistema, ya que entonces la línea '#!' no es más que un simple comentario. Puedes hacer la prueba cambiando la primera línea por '#Perl', o cualquier otro texto.

Gracias por la aclaración, recién me entero de ello.

Por cierto, no cuento con mucha memoria en la máquina del trabajo y tampoco me encuentro allí como para hacer la prueba ¡je,je! pero resulta que la idea no deja de ser la misma. Es esa información (forma de origen) que debo de ir a buscar en la tabla formaant y que me tiene que devolver la primera de sus formas... En la tabla forma yo puse solamente el campo descripción a modo de no complicar mucho la idea pero en realidad cuenta con muchos otros y lo que necesito es que me muestre el contenido de TODOS esos campos, es decir todo ese registro, una vez que me ENTERO que se trata de la forma origen.

Los hashes, no me queda otra que cargarlos uno por uno, me refiero: ¿a mano? CADA uno e incluso, si llega a sufrir una modificación la tabla formaant, una actualización supongamos, ¿debería de editar NUEVAMENTE el hash??

A mano, no... A máquina... hay que sustituir la parte del programa que crea los hash por un par de consultas a la base de datos, y crear los hash a partir de esas consultas.

hummm... ¿me podrías dar alguna mano?

Intuyo que con algún



pero ya escapa de mi noción

En este sitio web hay algún manual al respecto de cómo hacer consultas a base de datos (mira la sección Tutoriales, arriba del todo).

Además, por estos foros hay muchos ejemplos de acceso a base de datos y de lectura de los resultados de la consulta a una tabla hash.

Es más, usando el módulo DBI, tienes una función llamada selectall_hashref() que devuelve toda la consulta en una referencia a un hash, así que lo tendrías todo resuelto en un par de líneas.

Por ejemplo, Ordenar hash DBI::selectall_hashref