if ($word_search[$w-1] eq $pattern_date && $word_search[$w-1] eq $array[$count])