Perl en Español

  1. Home
  2. Tutoriales
  3. Foro
  4. Artículos
  5. Donativos
  6. Publicidad
 
Índice general » Mundo Perl » Avanzado » Lista de objetos ordenada  RESUELTO Responder al tema
Nuevo tema


Página 1 de 1  [ 2 mensajes ] 
 
Nota 2011-05-18 09:38 @443

Perlero Nuevo
Registrado: 2011-04-20 06:32 @314
Mensajes: 35
Lista de objetos ordenada
¡Hola a todos!

Tengo una consultilla :D Os la lanzo.

Tengo una lista de objetos como (1) y me gustaría ordenar esta lista según uno de sus atributos. ¿Hay alguna manera de redefiniar el compare o algo (como en Java) para que, dado dos objetos decir cuál iría antes, y usar el metodo sort() de los arrays de Perl?

(1)
Objeto:
-identificador
-origen (atributo que define el orden del array)
-final

¿O con la explicación que os he dado, tenéis algún método alternativo que no llevando uno la cuenta del array? No quiero implementar ningún quicksort ni una burbuja xD

¡Gracias!


Última edición por explorer el 2011-05-18 09:44 @447, editado 1 vez en total
Tildes, admiraciones e interrogaciones


Nota 2011-05-18 09:49 @451
Avatar de Usuario
Administrador
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España
Mensajes: 10261
Re: Lista de objetos ordenada  RESUELTO
Te vale con indicarle a sort() la función que quieres usar para realizar la operación.

La función debe devolver un valor mayor, menor, o igual a 0, al realizar la comparación entre los dos argumentos pasados a esa función, o usando las variables globales $a y $b.

Por ejemplo:

Syntax: [ Download ] [ Hide ]
Using perl Syntax Highlighting
  1. @ordenado = sort { funcion_que_ordena() } @desordenado;


Más información en perldoc -f sort.

_________________
JF^D Perl programming


Responder al tema  [ 2 mensajes ] 

Reglas del Foro
No puedes abrir nuevos temas en este Foro
No puedes responder a temas en este Foro
No puedes editar tus mensajes en este Foro
No puedes borrar tus mensajes en este Foro
No puedes enviar adjuntos en este Foro

Publicidad

Socializa

Síguenos por Twitter

Suscríbete GRATUITAMENTE al Boletín de Perl en Español

Saltar a:  
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Traducción al español por Huan Manwë para phpbb-es.com
phpBB SEO