Perl -Suche, wenn Variable Word enthält
if (index($str, $substr) != -1) {
print "$str contains $substr\n";
}
Prickly Panther
if (index($str, $substr) != -1) {
print "$str contains $substr\n";
}