在Perl中，您可以使用正则表达式来匹配字符串是否存在。
您可以使用=~运算符结合正则表达式来匹配字符串。如果匹配成功，则返回1；如果没有匹配，则返回0。
下面是一个示例代码：
my $string = "Hello, World!";
if ($string =~ /World/) {
print "字符串存在\n";
} else {
print "字符串不存在\n";
}
在上面的示例中，我们使用=~运算符将字符串和正则表达式/World/进行匹配。如果字符串中存在"World"，则打印"字符串存在"；否则打印"字符串不存在"。
请注意，在正则表达式中，默认情况下是区分大小写的。如果您想要进行不区分大小写的匹配，可以在正则表达式后面加上i修饰符，如/World/i。
希望对您有所帮助！
