From marcelo.magallon en gmail.com Tue Mar 27 08:15:34 2012 From: marcelo.magallon en gmail.com (Marcelo) Date: Tue, 27 Mar 2012 09:15:34 -0600 Subject: Aprendiendo Perl, el reto: Encontrar duplicados Message-ID: Hola, brian d foy[0] comenzó a publicar en http://www.learning-perl.com/ una serie de retos para la gente aprendiendo Perl. Pensé que para alguna gente podría ser útil tener el reto disponible en Español y no en Inglés, además de poder conversar sobre las soluciones también en Español. Hasta que no monte otra cosa, les propongo hacerlo mediante esta lista, si alguno tiene interés. A continuación la traducción del post que brian publicó en http://www.learning-perl.com/?p=286 ------------------------------ 8< ------------------------------ Este es el segundo reto para novatos. Voy a darles un problema que deberían poder resolver solo con las cosas presentes en "Learning Perl" (incluyendo el uso de módulos, es decir, la mayoría de Perl). Más o menos una semana después publicaré una solución (NdT: me comprometo a traducir las soluciones también). Para este reto, dado un único directorio conteniendo archivos posiblemente duplicados, encuentre los archivos que pueden ser duplicados. Solo debe imprimir los archivos duplicados e imprimir sus nombres. Si desea remover los duplicados, ¡asegúrese de tener un backup! Existen algunos módulos que pueden resultar útiles: Digest::MD5 Digest::SHA1 Si se encuentra especialmente motivado, busque también en los subdirectorios que encuentre. ------------------------------ >8 ------------------------------ Saludos y que se diviertan, Marcelo PS: Como pueden ver en el blog de Learning Perl, la gente que quiere recibir retroalimentación publica sus soluciones allí. Sería buenísimo si la gente por acá hiciese lo mismo y los demás les den opiniones. [0] brian es coautor de "Learning Perl" en su última edición. Él prefiere escribir su nombre así como aparece acá, no estoy siendo perezoso con las mayúsculas :-)