Re: Match string in array

in reply to Match string in array

@FirstArray=qw(A B C D);
@SecondArray=qw(D E F B);
foreach $pr (@FirstArray){
    #print "Property: $pr\n";
    @match=();
    @match=grep(/$pr/,@SecondArray);
    if (!@match){
        push(@UniqueInFirstArrayNotFoundInSecondArray,$pr);
    } else {
        push(@FoundInBothArrays,$pr);
    }
}
print "".join("\n",@UniqueInFirstArrayNotFoundInSecondArray)."\n";
print "".join("\n",@FoundInBothArrays)."\n";
[download]

Comment on Re: Match string in array Download Code

Replies are listed 'Best First'.
Re^2: Match string in array by sauoq (Abbot) on Oct 03, 2005 at 19:18 UTC
Everytime you use `grep`, you are iterating through the list. Since you do that inside of loop, your algorithm is O(N*M). In contrast, JediWizard iterates once through a loop so his algorithm is linear. His approach is also conceptually simpler which results in cleaner code. -sauoq "My two cents aren't worth a dime.";	[reply] [d/l]

In Section Seekers of Perl Wisdom