Inline Modifiers : modifier « Regular Expression « Perl






Inline Modifiers

    

#!/usr/bin/perl
use warnings;
use strict;
my $string = "There's more than One Way to do it!";
print "Enter a test expression: ";
my $pat = <STDIN>;
chomp($pat);
if ($string =~ /$pat/) {
    print "'$pat' matches the sample string.\n";
} else {
    print "No match found for '$pat'";
}

   
    
    
    
  








Related examples in the same category

1.The e Modifier Evaluating an Expression
2.The e modifier
3.The g Modifier Global Substitution
4.The m Operator and Matching
5.The m modifier controls the behavior of the $ and ^ anchor metacharacters.
6.The s Modifier-The Dot Metacharacter and the Newline
7.The s Operator and Substitution
8.The s operator supports a number of variables
9.The x Modifier: The Expressive Modifier
10.The i Modifier Case Insensitivity
11.\B matches only if the pattern is contained in a word.
12.The \s metasymbol and whitespace
13.ei modifier
14.Use /gc to remember position
15.Use \G to match rest of text
16.The \S metasymbol and nonwhitespace
17.Matching Modifiers