$last_in_sentence = ($content_array[$location] =~ m/\. $/s)