Check for 'a' : Pattern matching « Regular Expression « Perl

Home
Perl
1.Array
2.CGI
3.Class
4.Data Type
5.Database
6.File
7.GUI
8.Hash
9.Language Basics
10.Network
11.Regular Expression
12.Report
13.Statement
14.String
15.Subroutine
16.System Functions
17.Win32
18.XML
Perl » Regular Expression » Pattern matching 
Check for 'a'
    

#!/usr/bin/perl -w

foreach $patt (@ARGV) {

    # Check for a.
    if ($patt =~ /a/) {
        print "\tFound an a in \"$patt\".\n";
    }
}

          

   
    
    
    
  
Related examples in the same category
1.Pattern Matching Operators
2.Pattern Modifiers
3.Pattern Tester
4.Pattern anchors in Perl.
5.Pattern array
6.Pattern match
7.Pattern-Matching Operators(The syntax used to perform a pattern match on a string)
8.Pattern-matching options.
9.Patterns containing + always try to match as many characters as possible.
10.Using variables containing matched subpatterns.
11.Regular Expression Patterns
12.Regular expression character patterns
13.Regular expression metacharacters
14.Regular expression modifiers
15.Regular expression pattern quantifiers
16.Regular expression: start a string with period
17.Reversing subpatterns
18.Repeating patterns
19.Check for 4-8 a's
20.Check for a or b
21.Check for and remove a trailing backslash character
22.Check for leading alpha character, rest alphanumeric
23.Check for no 'a'
24.Check for white space
25.A program that illustrates the use of the matching operator.
26./d.f/ matches d, followed by any non-newline character, followed by f
27./de{1,3}f/ matches d, followed by one, two, or three occurrences of e, followed by f.
28.Print line unless it matches E
29.Count the match times
java2s.com  | Contact Us | Privacy Policy
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.