Find the substring with '$_ =~ /Aa/' : substr « String « Perl
- Perl
- String
- substr
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