Snobol4【1】 语言文本分割【2】实战：按段落【3】与句子【4】拆分
Snobol4 是一种古老的编程语言，最初在1962年由David J. Farber、Ralph E. Griswold 和 Ivan P. Polonsky 在贝尔实验室开发。尽管它已经不再广泛使用，但Snobol4 在文本处理领域有着独特的优势，特别是在模式匹配【5】和字符串操作【6】方面。本文将探讨如何使用Snobol4 语言实现文本分割，包括按段落和句子进行拆分。
Snobol4 简介
Snobol4 是一种高级编程语言，以其强大的字符串处理能力而闻名。它提供了丰富的字符串操作函数，如搜索、替换、删除和插入等。Snobol4 的语法简洁，易于理解，这使得它在处理文本数据时非常高效。
文本分割需求分析
在进行文本分割之前，我们需要明确分割的目标。在本例中，我们的目标是：
1. 按段落拆分：将文本分割成多个段落，每个段落以空行分隔。
2. 按句子拆分：将每个段落进一步分割成句子，句子以句号、问号或感叹号结束。
按段落拆分
以下是一个Snobol4 程序，用于按段落拆分文本：
```snobol
:input
:output
'Paragraph' 'End' 'Sentence' 'End' 'EndOfText'
paragraph
:while (not 'EndOfText')
:if (not 'End')
:while (not 'End')
:get
:if (not 'End')
:put
:else
:break
:end
:put ' '
:else
:break
:end
:put ' '
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put 'End'
:put
Comments NOTHING