Hi, as usual with perl, there are milion ways of doing this :-).

Just to get you on the road

open(XYZ, "<xyz") or die $!;
print "OK\n" if  grep({ /Message/ or /here/ } <XYZ> ) >= 2;
close(XYZ);
[download]

---------------------------
Dr. Mark Ceulemans
Senior Consultant
IT Masters, Belgium