How to check if Two Arrays are Equal in Perl

How to check if Two Arrays are Equal in Perl ?

Answer

To check if two arrays are equal in Perl, you can use the cmp operator for arrays with the same elements and manually compare elements for arrays with different elements.

✐ Examples

1 Arrays with Same Elements

In this example,

We create two arrays named @arr1 and @arr2 with the same elements.
We then use the cmp operator to check if the arrays are equal and store the result in the variable $equal1.
The cmp operator checks if two arrays have the same elements in the same order.
Finally, we print the value of $equal1 to the console.

Perl Program

@arr1 = (1, 2, 3);
@arr2 = (1, 2, 3);
$equal1 = (@arr1 cmp @arr2) == 0;
print "Arrays are equal: $equal1\n";

Output

Arrays are equal: 1

2 Arrays with Different Elements

In this example,

We create two arrays named @arr3 and @arr4 with different elements.
We then manually compare each element of both arrays and store the result in the variable $equal2.
If all elements are equal, $equal2 is set to true; otherwise, it's set to false.
Finally, we print the value of $equal2 to the console.

Perl Program

@arr3 = (1, 2, 3);
@arr4 = (3, 2, 1);
$equal2 = 1;
for my $i (0 .. $#arr3) {
    if ($arr3[$i] != $arr4[$i]) {
        $equal2 = 0;
        last;
    }
}
print "Arrays are equal: $equal2\n";

Output

Arrays are equal: 0

Summary

In this tutorial, we learned How to check if Two Arrays are Equal in Perl language with well detailed examples.

◀ Previous Next ▶

Perl Tutorials

Perl How-Tos

How to check if Two Arrays are Equal in Perl

How to check if Two Arrays are Equal in Perl ?

Answer

✐ Examples

1 Arrays with Same Elements

Perl Program

Output

2 Arrays with Different Elements

Perl Program

Output

Summary

More Perl Arrays Tutorials