• Publicidad

Buscar dos letras juntas con expresiones regulares

¿Ya sabes lo que es una referencia? Has progresado, el nível básico es cosa del pasado y ahora estás listo para el siguiente nivel.

Buscar dos letras juntas con expresiones regulares

Notapor Yazston » 2008-06-25 06:27 @310

Buenas tardes, aquí mi problema, obtengo una serie de datos de un archivo, lo saco en bloque de 30 usando substr y después tengo en estos bloques que buscar si tienen la unión RD y contar cuántas veces.

Veréis los datos son así...

Código: Seleccionar todo
RGEDGRGERGGFFGRFSD


Yo tenía pensado esto...
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
my $contador_RD = $bloque =~ tr/[RD]/[RD]/;
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4


pero esto me da tanto las R como las D estén o no juntas.

Cómo puedo hacer para que me busque y cuente cuántas veces sale pero las dos letras juntas. Gracias por todo.
Yazston
Perlero nuevo
Perlero nuevo
 
Mensajes: 3
Registrado: 2008-04-02 16:31 @729

Publicidad

Notapor kidd » 2008-06-25 07:53 @370

Hola:

En perldoc -q count encontrarás varias maneras de lograr lo que quieres.

Una manera podría ser:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
my $string = 'RDRGEDGRGERDRGGFFGRFSDRD';

my $count = () = $string =~ /RD/g;
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4


Saludos
Uriel Lizama Perl programmer fundador de Perl en Español
Perl Programming Language
Avatar de Usuario
kidd
Creador de Perl en Español
Creador de Perl en Español
 
Mensajes: 1166
Registrado: 2003-10-15 16:52 @744
Ubicación: México

Notapor explorer » 2008-06-25 09:57 @456

Esta es otra:
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
$count++ while $string =~ /RD/g;
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14486
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España


Volver a Intermedio

¿Quién está conectado?

Usuarios navegando por este Foro: Bing [Bot], Google [Bot] y 1 invitado

cron