Смена кодировки: :e ++enc=cp1251
cat book | awk 'BEGIN{name="sect"; regexp="begin"; i=0} $0 ~ regexp {i++} {print $0 > name i}'
разбивает файл book на несколько частей, используя в качестве метки начала новой части слово "begin" и помещает каждую часть в файл sectN.