Select Code to Download

package Perl::Critic::Policy::BuiltinFunctions::GrepWithSimpleValue;
use warnings;
...
}

1;

#!/usr/bin/env perl
use warnings;
...
my @ary;
push @ary, "foo" unless grep { "foo" } @ary;       # bad
push @ary, "foo" unless grep { $_ eq "foo" } @ary; # good