[comp.os.minix] Message extraction for LISTSERV archives

u27602@uy.ncsa.uiuc.edu (Jeffrey C. Ollie) (03/15/91)

Hi *,

  This is a program that will extract messages from the comp.os.minix
archives stored by LISTSERV at VM1.NoDak.edu.  I wrote this program
mostly for myself (I am new to comp.os.minix and I want to catch up
on some of the past activity, it was also a challenge to myself), but
I am posting it in case any of the rest of you want to use it.

  The progam is fairly simple.  LISTSERV prepends a line containing only
equal signs to the beginning of each message.  Extract simply looks for
that line and starts a new file when it sees one.  Files are named in a
simple enough matter: each file is given an 8 digit number for its name.
NOTE:  extract will not check to see if there is a file with that name
already, it will merely overwrite that file!

  To extract: cut out the header and footer from this message,
uudecode it, and then unshar it.  A makefile is provided (even though
the program uses only one file).

  The syntax is:
     extract logfile

  Be careful!  This program will generate a lot of files, and it will
take up more than double the space of the original log file.

  Please let me know if there are any improvements that you would like
to see.

  Thanks,

  Jeff  (Internet: u27602@uy.ncsa.uiuc.edu)

BEGIN--cut here--CUT HERE--
begin 644 extract.sh
M(R$@+V)I;B]S:`HC(%1H:7,@:7,@82!S:&5L;"!A<F-H:79E+B`@4F5M;W9E
M(&%N>71H:6YG(&)E9F]R92!T:&ES(&QI;F4L('1H96X@=6YP86-K"B,@:70@
M8GD@<V%V:6YG(&ET(&EN=&\@82!F:6QE(&%N9"!T>7!I;F<@(G-H(&9I;&4B
M+B`@5&\@;W9E<G=R:71E(&5X:7-T:6YG"B,@9FEL97,L('1Y<&4@(G-H(&9I
M;&4@+6,B+B`@66]U(&-A;B!A;'-O(&9E960@=&AI<R!A<R!S=&%N9&%R9"!I
M;G!U="!V:6$*(R!U;G-H87(L(&]R(&)Y('1Y<&EN9R`B<V@@/&9I;&4B+"!E
M+F<N+B`@268@=&AI<R!A<F-H:79E(&ES(&-O;7!L971E+"!Y;W4*(R!W:6QL
M('-E92!T:&4@9F]L;&]W:6YG(&UE<W-A9V4@870@=&AE(&5N9#H*(PD)(D5N
M9"!O9B!S:&5L;"!A<F-H:79E+B(*(R!#;VYT96YT<SH@(&UA:V5F:6QE(&5X
M=')A8W0N8PHC(%=R87!P960@8GD@:6)M<&-`;&%P:')O:6<N555#4"!O;B!4
M:'4@36%R(#$T(#(R.C(T.C4S(#$Y.3$*4$%42#TO8FEN.B]U<W(O8FEN.B]U
M<W(O=6-B(#L@97AP;W)T(%!!5$@*:68@=&5S="`M9B!M86ME9FEL92`M82`B
M)'LQ?2(@(3T@(BUC(B`[('1H96X@"B`@96-H;R!S:&%R.B!7:6QL(&YO="!O
M=F5R+7=R:71E(&5X:7-T:6YG(&9I;&4@7")M86ME9FEL95PB"F5L<V4*96-H
M;R!S:&%R.B!%>'1R86-T:6YG(%PB;6%K969I;&5<(B!<*#0T(&-H87)A8W1E
M<G-<*0IS960@(G,O7E@O+R(@/FUA:V5F:6QE(#P\)T5.1%]/1E]M86ME9FEL
M92<*6&5X=')A8W0Z"65X=')A8W0N8PI8"6-C(&5X=')A8W0N8R`M;R!E>'1R
M86-T"D5.1%]/1E]M86ME9FEL90II9B!T97-T(#0T("UN92!@=V,@+6,@/&UA
M:V5F:6QE8#L@=&AE;@H@("`@96-H;R!S:&%R.B!<(FUA:V5F:6QE7"(@=6YP
M86-K960@=VET:"!W<F]N9R!S:7IE(0IF:0HC(&5N9"!O9B!O=F5R=W)I=&EN
M9R!C:&5C:PIF:0II9B!T97-T("UF(&5X=')A8W0N8R`M82`B)'LQ?2(@(3T@
M(BUC(B`[('1H96X@"B`@96-H;R!S:&%R.B!7:6QL(&YO="!O=F5R+7=R:71E
M(&5X:7-T:6YG(&9I;&4@7")E>'1R86-T+F-<(@IE;'-E"F5C:&\@<VAA<CH@
M17AT<F%C=&EN9R!<(F5X=')A8W0N8UPB(%PH,3$W,"!C:&%R86-T97)S7"D*
M<V5D(")S+UY8+R\B(#YE>'1R86-T+F,@/#PG14Y$7T]&7V5X=')A8W0N8R<*
M6"\J"E@@("!%6%1204-4+D,*6`I8("`@=C$N,"!B>2!*969F<F5Y($,N($]L
M;&EE("TM(#$T($UA<B`Q.3DQ"E@*6"`@($$@<VEM<&QE('!R;V=R86T@=&\@
M97AT<F%C="!M97-S86=E<R!F<F]M('1H92!,25-44T525B!A<F-H:79E<RX*
M6`I8*B\*6`I8(VEN8VQU9&4@/'-T9&EO+F@^"E@C:6YC;'5D92`\<W1R:6YG
M+F@^"E@*6&-H87(@<V5P87)A=&]R6UT@/2`B/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/2(["E@*6$9)3$4@*FEN+"`J;W5T.PI8"EAI;G0@9V5T;&EN
M92`H;&EN92D*6&-H87(@*FQI;F4["EA["E@@(&EN="!R97,["E@*6"`@<F5S
M(#T@9G-C86YF("AI;BP@(B4Q,CA;7EQN724J8R(L(&QI;F4I.PI8("!I9B`H
M<F5S(#T](#`I"E@@('L*6"`@("!L:6YE6S!=(#T@,#L*6"`@("!R971U<FX@
M,3L*6"`@?0I8"E@@(&EF("AR97,@/3T@14]&*0I8("!["E@@("`@;&EN95LP
M72`](#`["E@@("`@<F5T=7)N(#`["E@@('T*6`I8("!I9B`H<W1R8VUP("AL
M:6YE+"!S97!A<F%T;W(I(#T](#`I"E@@("`@<F5T=7)N(#`["E@@(&5L<V4*
M6"`@("!R971U<FX@,3L*6'T*6"`@("`*6&UA:6X@*&%R9V,L(&%R9W8I"EAI
M;G0@87)G8SL*6&-H87(@*F%R9W9;73L*6'L*6"`@:6YT(&9N=6T],#L*6"`@
M8VAA<B!F;F%M95LR,%TL(&QI;F5;,3,P73L*6`I8("!I;B`](&9O<&5N("AA
M<F=V6S%=+"`B<B(I.PI8"E@@(&EF("AI;B`]/2!.54Q,*0I8("!["E@@("`@
M9G!R:6YT9B`H<W1D97)R+"`B97AT<F%C=#H@)7,Z(&YO('-U8V@@9FEL92!O
M<B!D:7)E8W1O<GE<;B(L(&%R9W9;,5TI.PI8("`@(&5X:70@*#$I.PI8("!]
M"E@*6"`@=VAI;&4@*"@A9V5T;&EN92AL:6YE*2D@)B8@*"%F96]F*&EN*2DI
M.PI8"E@@('=H:6QE("@A9F5O9B`H:6XI*0I8("!["E@@("`@<W!R:6YT9B`H
M9FYA;64L("(E,#AD+G1X="(L(&9N=6TI.PI8("`@(&]U="`](&9O<&5N("AF
M;F%M92P@(G<B*3L*6"`@("!I9B`H;W5T(#T]($Y53$PI"E@@("`@>PI8("`@
M("`@9G!R:6YT9B`H<W1D97)R+"`B97AT<F%C=#H@=6YA8FQE('1O(&-R96%T
M93H@)7-<;B(L(&9N86UE*3L*6"`@("`@(&5X:70@*#$I.PI8("`@('T*6"`@
M("!W:&EL92`H9V5T;&EN92`H;&EN92DI"E@@("`@("!F<')I;G1F("AO=70L
M("(E<UQN(BP@;&EN92D["E@@("`@9FYU;2LK.PI8("`@(&9C;&]S92`H;W5T
M*3L*6"`@?0I8"E@@(&9C;&]S92`H:6XI.PI8?0I%3D1?3T9?97AT<F%C="YC
M"FEF('1E<W0@,3$W,"`M;F4@8'=C("UC(#QE>'1R86-T+F-@.R!T:&5N"B`@
M("!E8VAO('-H87(Z(%PB97AT<F%C="YC7"(@=6YP86-K960@=VET:"!W<F]N
M9R!S:7IE(0IF:0HC(&5N9"!O9B!O=F5R=W)I=&EN9R!C:&5C:PIF:0IE8VAO
D('-H87(Z($5N9"!O9B!S:&5L;"!A<F-H:79E+@IE>&ET(#`*
`
end
2556
END--cut here--CUT HERE--