To check if a string contains a given substring in Perl, you can use the 'index' function.
In this example,
sub contains_substring {
my ($str, $substr) = @_;
my $index = index($str, $substr);
return $index != -1;
}
my $str = 'Hello World';
my $substr = 'World';
my $contains = contains_substring($str, $substr);
print "String contains substring '$substr': $contains\n";
String contains substring 'World': 1
In this tutorial, we learned How to Check if a String contains given Substring in Perl language with well detailed examples.