using grep

[bhumikas]

Hi I want to is this right if I want to search an array and evaluate as true for IF statement...

if(grep{ $_ == $p }@p1)
{
 
}

Any Suggestions...

[eWish]

They way you are trying I don't believe will return anything.

my @p1 = (qw{22 33 43 56 77 34});
my @p2;
my $n = 34;
 
if (@p2 = grep {/^$n$/} @p1) {
    print @p2,"\n";
} else {
    print "No Match's were found\n";
}

[KevinADC]

They way you are trying I don't believe will return anything.

It will return 1 (true) or 0 (false). But it is not very efficient because it has to check every element of the array. A for/foreach loop should be more efficient and could be way more efficient in some circumstances. For example:

@array = 0..1000000000;
$p = 0;
 
for (@array) {
   if ($_ == $p) {
      print "true";
      last;
   }
} 

that will be much faster than:

if (grep {$_ == $p} @array) {
   print "true";
}

[bhumikas]

It will return 1 (true) or 0 (false). But it is not very efficient because it has to check every element of the array. A for/foreach loop should be more efficient and could be way more efficient in some circumstances. For example:

@array = 0..1000000000;
$p = 0;
 
for (@array) {
   if ($_ == $p) {
      print "true";
      last;
   }
} 

that will be much faster than:

if (grep {$_ == $p} @array) {
   print "true";
}

thanks for the suggestion...I asked for that as it was not working for me with the code I mentioned....
Anyway I will be using the for loop....

[KevinADC]

It will work:

@p1 = 1..5;
$p = 3;
if (grep{ $_ == $p } @p1) {
   print "true";
}
else {
   print "false";
}