Foro - Perl en Español

Hola.

A ver si podéis ayudarme que estoy muy flojito en esto de la programación.

Tengo dos ficheros de texto .txt de diferente longitud, y me gustaría saber cómo hacer un script el cual me devuelva aquellos resultados que no se encuentren en los dos ficheros, sino solo en uno. Por ejemplo:

Fichero 1 contiene una lista de tipos de manzanas:

Golden
Red
Royal
Fuji

Fichero 2 contiene una lista del tipo de manzana con respecto al experimento asociado a ella que a mi me interesa para mi trabajo, con algunas manzanas se han hecho varios experimentos, pero con otras sin embargo ningún experimento.

Golden_047896
Golden_569854
Golden_105687
Red_54871
Fuji_78

¿Cómo puedo sacar una lista de aquellas variedades de manzanas de las que no se ha hecho ningún experimento?

El resultado debería ser una lista con estas variedades, que en mi ejemplo sería

Royal





Muchas gracias, saludos.

Bienvenido a los foros de Perl en Español, macaco.

Hay muchas formas de resolver este problema, y de hecho, en estos mismos foros habrá como mínimo diez hilos comentando variaciones y soluciones de él.

Se me ocurre lo siguiente: lees el primer archivo, y pones todas las entradas en un hash, con valores iniciales 0.

Luego, vas leyendo el segundo archivo. Para cada entrada, extraes la información que te interesa (en el ejemplo, puede ser la información que hay delante del primer guión bajo, cosa que puedes conseguir con una expresión regular o con index()+substr().

Con esa información, sumas 1 a la entrada correspondiente en el hash anterior. Así llevamos la cuenta de las veces que se repite.

Después de leer el segundo archivo, queda por recorrer el hash y sacar aquellas claves que tengan un 0 como valor, pues indicarán que no se encontraron en el segundo archivo.

Muchas gracias, explorer, pero es que soy nuevo en esto, y no entiendo muy bien lo que tengo que hacer. ¿Podrías darme una explicación de principiante/novato? Gracias.

¿Y cómo lo hago si el fichero 1 tiene 22 000 elementos de la lista y el fichero 2 tiene 3 000 elementos?

No importa que haya miles de datos. Mientras tengas memoria suficiente, puedes hacerlo. De hecho, Perl está indicado justo para estas situaciones.

Muestra el código que tengas hecho, para que veamos por dónde vas.

Mira este hilo: Comparar líneas de archivos muy grandes.

Hay más hilos que hablan al respecto.