Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much

Re: find words in array

by Rudolf (Pilgrim)
on Aug 01, 2012 at 18:42 UTC ( #984874=note: print w/replies, xml ) Need Help??

in reply to find words in array

Here is an example using pattern matching, if your looking to see if the word is contained within any elements of the array

use v5.14; chomp(my $word = <STDIN>); #get word from command line #chomp removes newline for search foreach my $name(@array){ #loop through names if($name =~ m/$word/i){ #if the word is contained within say $name; # print out the name with a newline (say) } }

otherwise, if your looking for exact maches just do something like this.

use v5.14; chomp(my $word = <STDIN>); foreach my $name(@array){ if($name eq $word){ #if the name equals the word say $name; } }

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://984874]
[Discipulus]: covfefe.. ? ;=)

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (10)
As of 2018-06-22 08:20 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (122 votes). Check out past polls.