Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation

Re: using grep to match more than two words

by Samy_rio (Vicar)
on Jun 12, 2007 at 06:25 UTC ( #620638=note: print w/replies, xml ) Need Help??

in reply to using grep to match more than two words

Hi sroy5, try this,

use strict; use warnings; my @arr1 = ("Sun", "Moon", "Venus", "Pluto", "Neptune"); ((grep/^(Sun|Moon)$/, @arr1) == 2) ? (print "True") : (print "False");

Anyway first look into these links How do I post a question effectively? & How (Not) To Ask A Question

Velusamy R.

eval"print uc\"\\c$_\""for split'','j)@,/6%@0%2,`e@3!-9v2)/@|6%,53!-9@2~j';

Replies are listed 'Best First'.
Re^2: using grep to match more than two words
by blazar (Canon) on Jun 12, 2007 at 08:29 UTC
    ((grep/^(Sun|Moon)$/, @arr1) == 2) ? (print "True") : (print "False");

    This is not reliable if @arr1 is allowed to contain duplicates, it is deemed to give false positives and false negatives, and the OP wrote nothing about that possibility.

      Oh Dang! I was going to post which would had counted the number of matches (did not post as similar method had already been shown) but I completely missed the possibility of duplicates. Thanks much.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://620638]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (4)
As of 2017-08-23 09:06 GMT
Find Nodes?
    Voting Booth?
    Who is your favorite scientist and why?

    Results (350 votes). Check out past polls.