OUTER: foreach my $item (@array){
    foreach my $subitem (@array2){
        next OUTER if($subitem eq $item);
    }
}

##</code><code>##

foreach my $item (@array){
   next if(scalar(grep({$_ eq $item} @other_array)));
}