'eq' operator in Perl is one of the string comparison operators used to check for the equality of the two strings. It is used to check if the string to its left is stringwise equal to the string to its right.
Perl
Perl
Syntax: String1 eq String2 Returns: 1 if left argument is equal to the right argumentExample 1:
#!/usr/local/bin/perl
# Initializing Strings
$a = "Welcome";
$b = "Geeks";
# Comparing the strings using eq operator
$c = $a eq $b;
if($c == 1)
{
print"String1 is equal to String2";
}
else
{
print"String1 is not equal to String2";
}
Output:
Example 2:
String1 is not equal to String2
#!/usr/local/bin/perl
# Initializing Strings
$a = "Geeks";
$b = "Geeks";
# Comparing the strings using eq operator
$c = $a eq $b;
if($c == 1)
{
print"String1 is equal to String2";
}
else
{
print"String1 is not equal to String2";
}
Output:
String1 is equal to String2