I am wondering if there is an and or operator. I am trying to run a match with multiple patterns and return the match whether it is multiple or single. this seems to have worked for 2 but any more gets buggy and only prints the first occurrence of a match, I am thinking an and/or statement in the match would allow the info to be carried forward something like &| maybe?:
....
if ($element =~m/(WEED)|(DIAL)|(PIES)|(KILLD)/gs)
{
$match = $1||$2||$3||$4;
print " $fastaheader : $match \n";
}
}