if (defined(($array[1] =~ m{/:sptrembl\|\w+\|\w+}) || ($array[1] =~ m{/:tre
mblnew\|\w+\|\w+})) && ($array[8] > 95))