Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked

Re: matching an array of alternates

by btrott (Parson)
on Jun 23, 2000 at 23:17 UTC ( #19645=note: print w/ replies, xml ) Need Help??

in reply to matching an array of alternates

Build a regular expression that will match those countries, then scan through the file and check each line against it:

my $regex = join '|', @latin_am; while (<>) { print $1 if /$regex/; }
This reads from STDIN, so invoke it like this:
% file

Comment on Re: matching an array of alternates
Select or Download Code
Replies are listed 'Best First'.
RE: Re: matching an array of alternates
by Zoogie (Curate) on Jun 23, 2000 at 23:54 UTC
    Just wanted to point out that if the file you're searching has a lot of lines, you can gain some speed by adding the "o" option to the regex; i.e.:
    print $1 if /$regex/o;
    This way, the regular expression only has to be compiled once.

    - Zoogie

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://19645]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (2)
As of 2015-11-27 03:04 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (714 votes), past polls