Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re^2: Matching multiple substrings of a string to arrays and printing those that match

by mr_ron (Chaplain)
on Apr 03, 2018 at 21:24 UTC ( #1212295=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    my @dis_dic;
    open(my $in1, "<", "$dis_verbs")
      or die "error reading $dis_verbs. $!";
    chomp(@dis_dic = <$in1>);
    close($in1);
    
  2. or download this
    elsif ( index($f3_line, @apr_dic && @dis_dic) != -1 ) {
    

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (4)
As of 2022-05-16 19:44 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you prefer to work remotely?



    Results (63 votes). Check out past polls.

    Notices?