Help for this page
use Modern::Perl; use List::Compare; ... my $lc = List::Compare->new(\@a, \@b); say $lc->get_unique;
1234