- or download this
my @good = grep {
my $yes = $_;
!grep $_ == $yes, @notgood;
} @goodarray;
- or download this
my @good = grep {
my $yes = $_;
!first {$_ == $yes} @notgood;
} @goodarray;
- or download this
my @good = grep { not @notgood ~~ $_ } @goodarray;