Check beginning : Anchors « Regular Expression « Perl

1. Perl
2. Regular Expression
3. Anchors

Check beginning

    

#!/usr/bin/perl -w

foreach $patt (@ARGV) {


    # Check beginning.
    if ($patt =~ /^perl/) {
        print "\tFound perl at start in \"$patt\".\n";
    }
}

   
    
    
    
  

Related examples in the same category