Foro - Perl en Español

Hola, tengo que capturar una cadena de un dn, el dn tiene esta pinta:


Quiero capturar "Usuario123", pero no sé cómo especificarle a la expresión que capture hasta el primer OU:


En el caso de que quiera capturar por ",", estamos en las mismas, me captura hasta la ultima ocurrencia que encuentra.
¿Cómo puedo especificarle esto?

Saludos,

Prueba con



Hay que cambiar el comodín avaricioso (.+) por el que no lo es: (.+?).

De esa manera, se capturará la cadena de texto más corta con la que coincida, antes de la ','.

Me quedo con lo del comodín avaricioso; ¡este mamón captura todo lo que pille por delante!
Por cierto, creo que este es el récord: 7 m en resolver una duda.
¡Muchas gracias!

Si CN está al principio de la línea puede interesarte ponerlo así

pvaldes escribiste:Si CN está al principio de la línea puede interesarte ponerlo así

Sintáxis: [ Descargar ] [ Ocultar ]

Sintáxis: [ Descargar ] [ Mostrar ]

Using perl Syntax Highlighting

1.   if ($linea =~ m/^CN=(.+?),/i) {

Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4

Sí, eso sí lo sabia, aunque en este caso no está al principio de la línea.
De todas formas, gracias pvaldes.