Select Code to Download

while (<>) {  # read a string from input
    my @senteces = split /\.\s+/;  # ". " might work for splitting int
+o sentences(?)
...
        }
    }
}