在Perl中，你可以使用eq运算符来判断两个字符串是否相等。这个运算符返回一个布尔值，如果两个字符串相等则返回1，否则返回0。下面是一个示例：
my $str1 = "Hello";
my $str2 = "Hello";
if ($str1 eq $str2) {
print "两个字符串相等\n";
} else {
print "两个字符串不相等\n";
}
在这个示例中，$str1和$str2的值都是Hello，所以$str1 eq $str2的结果为1，输出结果为"两个字符串相等"。
