Find the substring with '$_ =~ /Aa/' : substr « String « Perl






Find the substring with '$_ =~ /Aa/'

     

#!/usr/bin/perl

use strict;

$_ = "A aA AaA aAa AA aa... '";

if ($_ =~ /Aa/) {
    print "found\n";
}

   
    
    
    
    
  








Related examples in the same category

1.Get the sub string
2.Using substr with offset (-6) and length (-2)
3.Using substr with offset (-6), and length (2)
4.Using substr with the string and the offset (2)
5.Using substr with the string, offset (2) and length (3)
6.substr and index function
7.substring from 10 to 14
8.Locate a substring with space inside
9.Using substr.
10.If the offset is negative, substr counts from the end of the string