@array = $line =~ /\b(?:BRIN|SAGEF403)\b/;