Operador de coincidencia de Perl

El operador m en Perl se usa para hacer coincidir un patrón dentro del texto dado. La string pasada al operador m se puede encerrar dentro de cualquier carácter que se utilizará como delimitador de expresiones regulares.
Para imprimir este patrón coincidente y la string restante, el operador m proporciona varios operadores que incluyen $, que contiene la última coincidencia de agrupación coincidente.
$& : contiene toda la string coincidente
$` : contiene todo antes de la string coincidente
$’ : contiene todo lo que sigue a la string coincidente

Sintaxis: m/String/

Retorno:
0 en caso de falla y 1 en caso de éxito

Ejemplo 1:

#!/usr/bin/perl -w
  
# Text String
$string = "Geeks for geeks is the best";
  
# Let us use m operator to search 
# "or g"
$string =~ m/or g/;
  
# Printing the String
print "Before: $`\n";
print "Matched: $&\n";
print "After: $'\n";
Producción:

Before: Geeks f
Matched: or g
After: eeks is the best

Ejemplo 2:

#!/usr/bin/perl -w
  
# Text String
$string = "Welcome to GeeksForGeeks";
  
# Let us use m operator to search 
# "to Ge"
$string =~ m/to Ge/;
  
# Printing the String
print "Before: $`\n";
print "Matched: $&\n";
print "After: $'\n";
Producción:

Before: Welcome 
Matched: to Ge
After: eksForGeeks

Publicación traducida automáticamente

Artículo escrito por Code_Mech y traducido por Barcelona Geeks. The original can be accessed here. Licence: CCBY-SA

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *