Count number of sentences in a string in SAS

object oMissing = System.Reflection.Missing.Value;

var oWord = new Microsoft.Office.Interop.Word.Application();
oWord.Visible = false;
var oDoc = oWord.Documents.Add(ref oMissing, ref oMissing, ref oMissing, ref oMissing);

oDoc.Content.Text = inputTextBox.Text;

//get just sentence count
sentenceCountLabel.Text = oDoc.Sentences.Count.ToString();

//get all statistics
foreach (Microsoft.Office.Interop.Word.ReadabilityStatistic stat in oDoc.ReadabilityStatistics)
{
    Console.WriteLine("{0}: {1}", stat.Name, stat.Value);
}

object oFalse = false;

oDoc.Close(ref oFalse, ref oMissing, ref oMissing);

 Words: 283 
 Characters: 1271 
 Paragraphs: 3 
 Sentences: 6 
 Sentences per Paragraph: 2 
 Words per Sentence: 47.1 
 Characters per Word: 4.3 
 Passive Sentences: 0 
 Flesch Reading Ease: 55.2 
 Flesch-Kincaid Grade Level: 12.5

install.packages("openNLP") ## Installs the required natural language processing (NLP) package
install.packages("openNLPmodels.en") ## Installs the model files for the English language
library(openNLP) ## Loads the package for use in the task
library(openNLPmodels.en) ## Loads the model files for the English language

text = "Dr. Brown and Mrs. Theresa will be away from a very long time!!! I can't wait to see them again." ## This sentence has unusual punctuation as suggested by @gui11aume

x = sentDetect(text, language = "en") ## sentDetect() is the function to use. It detects and seperates sentences in a text. The first argument is the string vector (or text) and the second argument is the language.
x ## Displays the different sentences in the string vector (or text).

[1] "Dr. Brown and Mrs. Theresa will be away from a very long time!!! "
[2] "I can't wait to see them again."

length(x) ## Displays the number of sentences in the string vector (or text).

[1] 2

word.split(/[.!?]+\s/).filter(Boolean).length;