• Publicidad

Cómo utilizar el comando "grep" en Perl

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

Re: Cómo utilizar el comando "grep" en Perl

Notapor explorer » 2011-02-11 13:23 @599

davids84 escribiste:Sabes... si quiero meterle 2 condicionantes al grep(), ¿se puede?

Sí;

grep { condición1 and condición2 }

davids84 escribiste:Solo quiero que me imprima mi variable $var cuando me encuentre "GPJFHIG01" ¿¿Así está bien la forma de ponerlo??
¡Huy, qué lío! ¿Quieres imprimir la misma variable $var cada vez que en el otro fichero aparezca esa cadena? Pues entonces queda así:
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
while (<$fh>) {
    print "$var\n" if /GPJFHIG01/;
}
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4


¿No sería mejor explicar de una vez qué es lo que quieres hacer?
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

Publicidad

Re: Cómo utilizar el comando "grep" en Perl

Notapor davids84 » 2011-02-11 13:30 @604

¿Sabes cómo pude hacerlo?

Lo hice dentro del mismo grep() utilizando "&&"

Por ejemplo:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
my @result=grep { /$var/ && /GPJFHIG01/ } <FH>;
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4


Así es como también me pudo sacar el resultado...

Lo probaré con la condición que pusiste :wink: :wink:

¡Saludos!
davids84
Perlero nuevo
Perlero nuevo
 
Mensajes: 20
Registrado: 2011-01-27 13:14 @593

Re: Cómo utilizar el comando "grep" en Perl

Notapor explorer » 2011-02-11 13:44 @614

Lo que has escrito quiere decir que quieres buscar tanto el contenido de $var como la cadena, en la misma fila leída del fichero.

Te recomiendo que mires los siguientes hilos, porque en ellos se comentan casos casi idénticos al que presentas:

* Datos repetidos

* Comparar líneas entre archivos
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: Cómo utilizar el comando "grep" en Perl

Notapor salva » 2011-02-16 16:02 @710

davids84 escribiste:Mi pregunta es: el comando grep tiene una opción que es "-c" que sirve para contar cuántas veces se encontró el carácter. ¿¿¿Hay alguna manera de meter esa opción "-c" a mi código a forma de que me cuente cuántas veces me aparece el ">"????


grep en contexto escalar devuelve el número de elementos seleccionados:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
my $count = grep /^>/, <$fh>;
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
Avatar de Usuario
salva
Perlero nuevo
Perlero nuevo
 
Mensajes: 200
Registrado: 2008-01-03 15:19 @680

Anterior

Volver a Básico

¿Quién está conectado?

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