• Publicidad

Módulo o función para facilitar una búsqueda

¿Apenas comienzas con Perl? En este foro podrás encontrar y hacer preguntas básicas de Perl con respuestas aptas a tu nivel.

Módulo o función para facilitar una búsqueda

Notapor luisjf » 2011-05-18 09:27 @435

Hola buenos días, esta es mi segunda interrogante. Está de más decir que soy nuevo en el mundo Perl y me encuentro buscando posibles alternativas que faciliten u optimicen el código que estoy desarrollando.

En este caso me gustaría saber si existe algún módulo o función que me ayude a realizar una búsqueda dentro de un array; por ejemplo, si tengo lo siguiente:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. my @hey = ("algo","perro","algo","perro","agua","casa","algo","perro");
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4


necesito al final solo quedar con

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1.  @hey = ("algo","perro","agua","casa");
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4


es decir, eliminar los valores repetidos. Yo tengo un desarrollo que es recursivo hecho a pie (muchos if() y bucles) y hace el trabajo pero pienso que es demasiado largo. Entonces quisiera saber y para sacarle mayor provecho a Perl si hay alguna función o módulo que me permita realizar búsquedas que me faciliten este trabajo.

Muchas gracias de antemano por la ayuda prestada.
Última edición por explorer el 2011-05-18 09:33 @439, editado 1 vez en total
Razón: q -> que
personal: debian 6 (squeeze) with perl v5.10.1
laboral: canaima 3 with perl v5.10.1
Avatar de Usuario
luisjf
Perlero nuevo
Perlero nuevo
 
Mensajes: 15
Registrado: 2011-05-11 17:57 @790

Publicidad

Re: Módulo o función para facilitar una búsqueda

Notapor explorer » 2011-05-18 09:36 @441

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. use List::MoreUtils 'uniq';
  2.  
  3. my @hey = qw(algo perro algo perro agua casa algo perro);
  4.  
  5. @hey = uniq @hey; # <algo perro agua casa>
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4


Más información en List::MoreUtils.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Re: Módulo o función para facilitar una búsqueda

Notapor luisjf » 2011-05-18 09:45 @448

Gracias mi pana, es exactamente lo que buscaba, de dos preguntas dos me has respondido, jajaja.

muchas gracias...
personal: debian 6 (squeeze) with perl v5.10.1
laboral: canaima 3 with perl v5.10.1
Avatar de Usuario
luisjf
Perlero nuevo
Perlero nuevo
 
Mensajes: 15
Registrado: 2011-05-11 17:57 @790


Volver a Básico

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 30 invitados