Call WordsIn String ';' ( Word : 
                                 W <- Word, "'", '.'; Say W
                        )