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

Re: how to automate the regular expression match from a file?

by eff_i_g (Curate)
on Apr 06, 2011 at 19:37 UTC ( #897867=note: print w/ replies, xml ) Need Help??


in reply to how to automate the regular expression match from a file?

I recommend Regexp::Assemble for something like this. An example:

use warnings; use strict; use Regexp::Assemble; my @keywords = qw( a an the then that this ); my $key_rea = Regexp::Assemble->new; $key_rea->add($_) for @keywords; my $key_re = $key_rea->re; my $data = do { undef $/; <DATA> }; print "$1\n" while $data =~ m/(\b$key_re\b)/g; __DATA__ hello everyone, i had been trying to make a lexical analyzer for c, wh +ere all the keywords were to be inputted in a text file keywords. thi +s i stored in an array. but this process is not being automated. the +code i wrote is as follows :- ... the keywords file contains:- auto continue enum if short break switch +volatile default extern int signed typedef while case do float long s +izeof union char double for register static unsigned const else goto +return struct void


Comment on Re: how to automate the regular expression match from a file?
Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (7)
As of 2015-07-31 06:00 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (274 votes), past polls