How can I compare arrays in Perl?

Question

I have two arrays, @a and @b. I want to do a compare among the elements of the two arrays.

my @a = qw\"abc def efg ghy klm ghn\";
m         


        

Answer 1

List::Compare

if ( scalar List::Compare->new(\@a, \@b)->get_intersection ) {
    …
}