Foro - Perl en Español

Tengo una gran duda, verán, quería hacer una lista ligada en Perl, solo para práctica, porque sé que en Perl rara vez se usan, pero estoy practicando POO en Perl y es uno de los ejercicios que se me ocurrió, "Una lista ligada ordenada", pero no he podido porque simplemente no encuentro la manera, si alguien pudiera hacerme el favor de poner el código sería perfecto.

Por definición las listas no llevan orden, podrías crear algo similar creando un hash y ordenando el hash con sort() y luego cogiendo los valores ordenados como una "lista", pero no acabo de ver qué tipo de salida quieres conseguir.

O podrías ordenar la lista con sort() directamente si los elementos siguen algún orden alfabético o numérico.

Hola,

Echa un vistazo a:


Saludos,
Birei

Bienvenido a los foros de Perl en español, Poldon.

Las listas enlazadas se pueden construir fácilmente en Perl, siguiendo la definición clásica de las listas: cada elemento (nodo) de la lista es una estructura que contiene un valor (la información), una referencia al siguiente nodo de la lista y, opcionalmente, una referencia al nodo anterior.

Birei y pvaldes se refieren a las listas de elementos que se crean con los array y hash de Perl. En los array, solo tenemos un valor escalar como información del nodo, y no hay referencias a los nodos antecedentes y consecuentes porque todos los nodos están indexados por su posición, así que es fácil moverse entre ellos. Y en los hash, los valores se indexan de forma directa a través de su clave.

Tienes razón de que en Perl se use muy poco, y es porque con los hash y array se resuelven de forma cómoda los problemas que de forma clásica resolvían las listas enlazadas.

Una de las muchas formas de hacerlo en Perl, sería así:



En CPAN hay algunos módulos que implementan los algoritmos clásicos de las listas. Por ejemplo:

• List::DoubleLinked - Listas doblemente enlazadas
• LinkedList::Single - Lista simplemente enlazadas.

Gracias, explorer, me has sido de mucha ayuda, en todo caso que me trabe, preguntaré por PM. XD