Shell Programming and Scripting

I tried to make the title/subject detailed, but well.. have to keep it short as well.

I am wanting to take a large list of strings, and search through a large list of files to hopefully find numerous matches. I am not sure the quickest way to do this though.

Code:

// List of files

file1.txt
file2.txt
file3.txt
file4.txt
file5.txt
file6.txt
file7.txt

// Searches

testtag
strings
more stuff
lots of stuff here

So basically take all of the strings under // Searches, and search through the files listed above it. I could imagine that the script may go something like this..

Code:

find . -type f -size -100k | xargs egrep -il "(testtag|strings|more stuff|lots of stuff here)"

While I know that will work, I would like to find a more efficient way of doing it. Any help would be greatly appreciated

Code:

#!/usr/bin/perl
use strict;
sub find{
	my($file,$str)=(@_);
	open FH,"<$file";
	$str=~s/,/|/g;
	while(<FH>){
		print "$file [line $.]: $_" if /($str)/;
	}
	print "---------------\n";
	close FH;
}
my @arr=("a.txt","b.txt");
my $match="152178,014052";
map {find($_,$match)} @arr;