Perl | eq operator

‘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.

Syntax: String1 eq String2

Returns: 1 if left argument is equal to the right argument

Example 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:

String1 is not equal to String2

Example 2:

#!/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