가장 좋은 방법은 awk과 gawk입니다.

어 wk

awk -F "([.] )|( / )" '/^[0-9]{1,3}[.]/{x="F"$1"("$2").txt";}{print >x;}' I_Ching_Wilhelm_Translation.txt

-F각 줄에 대해 필드 구분 기호를 지정합니다. 그것은 정규식, 우리가 여러 seperators를 사용 ". "하고 " / ". 따라서 같은 줄 1. Ch'ien / The Creative은 3 개의 필드로 나뉩니다 : 1 Ch'ien및 The Creative. 나중에이 필드를로 참조 할 수 있습니다 $n. $0전체 라인입니다.

그런 다음 awk에게 패턴과 라인을 일치 시키 ^[0-9]{1,3}[.]라고 지시 x합니다. x 값은 print조작을 위한 파일 이름으로 사용됩니다 . 이 예제에서 우리 "F"$1"("$2").txt"는 라인 1. Ch'ien / The Creative이 파일 이름을 제공 하도록 사용 합니다F1(Ch'ien).txt

둔한 사람

gawk에서는 캡처 된 그룹에 액세스 할 수도 있습니다. 따라서 다음과 같은 명령을 단순화 할 수 있습니다.

gawk 'match($0, /^([0-9]{1,3})[.] (.*) \/ (.*)$/, ary){x="F"ary[1]"("ary[2]")";}{print >x;}' I_Ching_Wilhelm_Translation.txt

여기서 우리 match는 그룹을 캡처하여 변수 목록에 넣습니다 ary. $0전체 라인입니다. ary[0]모든 것이 일치합니다. ary[1...n]각 그룹입니다.

펄

펄로도 할 수 있습니다 :

perl -ne 'if(/^([0-9]{1,3})[.] (.*) \/ (.*)$/) {close F; open F, ">", sprintf("F$1($2).txt");} print F' I_Ching_Wilhelm_Translation.txt

결과 :

> ls F*
F10(Lü).txt         F22(Pi).txt       F34(Ta Chuang).txt  F46(Shêng).txt     F58(Tui).txt
F11(T'ai).txt       F23(Po).txt       F35(Chin).txt       F47(K'un).txt      F59(Huan).txt
F12(P'i).txt        F24(Fu).txt       F36(Ming I).txt     F48(Ching).txt     F5(Hsü).txt
F13(T'ung Jên).txt  F25(Wu Wang).txt  F37(Chia Jên).txt   F49(Ko).txt        F60(Chieh).txt
F14(Ta Yu).txt      F26(Ta Ch'u).txt  F38(K'uei).txt      F4(Mêng).txt       F61(Chung Fu).txt
F15(Ch'ien).txt     F27(I).txt        F39(Chien).txt      F50(Ting).txt      F62(Hsiao Kuo).txt
F16(Yü).txt         F28(Ta Kuo).txt   F3(Chun).txt        F51(Chên).txt      F63(Chi Chi).txt
F17(Sui).txt        F29(K'an).txt     F40(Hsieh).txt      F52(Kên).txt       F64(Wei Chi).txt
F18(Ku).txt         F2(K'un).txt      F41(Sun).txt        F53(Chien).txt     F6(Sung).txt
F19(Lin).txt        F30(Li).txt       F42(I).txt          F54(Kuei Mei).txt  F7(Shih).txt
F1(Ch'ien).txt      F31(Hsien).txt    F43(Kuai).txt       F55(Fêng).txt      F8(Pi).txt
F20(Kuan).txt       F32(Hêng).txt     F44(Kou).txt        F56(Lü).txt        F9(Hsiao Ch'u).txt
F21(Shih Ho).txt    F33(TUN).txt      F45(Ts'ui).txt      F57(Sun).txt

예제 파일을 얻는 방법 :

curl http://www2.unipr.it/~deyoung/I_Ching_Wilhelm_Translation.html|html2text -o I_Ching_Wilhelm_Translation.plain
sed 's|^[[:blank:]]*||g' I_Ching_Wilhelm_Translation.plain > I_Ching_Wilhelm_Translation.txt

답변

BEGIN {outfile="header.txt"}
{
    while (/^[0-9]+\.$/) {
        prev = $0; getline;
        if ($0 == "") outfile = prev "txt";
        print prev >outfile
    }
    print >outfile
}