Perl matching operator

m operator in Perl is used to match a pattern within the given text. The string passed to m operator can be enclosed within any character which will be used as a delimiter to regular expressions.
To print this matched pattern and the remaining string, m operator provides various operators which include $, which contains whatever the last grouping match matched.
$& – contains the entire matched string
$` – contains everything before the matched string
$’ – contains everything after the matched string

Syntax: m/String/

Return:
0 on failure and 1 on success

Example 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";

Output:

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

Example 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";

Output:

Before: Welcome 
Matched: to Ge
After: eksForGeeks

My Personal Notes arrow_drop_up

Save