在Perl中，可以使用`eq`运算符来判断字符串是否相等。示例如下：
my $str1 = "Hello";
my $str2 = "World";
if ($str1 eq $str2) {
print “Strings are equal\n”;
} else {
print “Strings are not equal\n”;
}
输出结果为 Strings are not equal，因为$str1和$str2不相等。
另外，还可以使用==运算符来判断两个字符串的数值是否相等。但是需要注意，当字符串包含非数字字符时，会自动转换为数值0，可能会导致判断结果不准确。因此，对于纯字符串的比较，建议使用eq运算符。
