home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 2 / 2608 < prev    next >
SHell self-extracting ARchive  |  1991-01-25  |  2.4 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: SHell self-extracting ARchive (archive/shar).

You can browse this item here: 2608

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert Newsgroup Content (archive/news) magic Supported
100% dexvert SHell self-extracting ARchive (archive/shar) magic Supported
100% dexvert Internet Message Format (text/imf) magic Supported
1% dexvert Text File (text/txt) fallback Supported
100% file news or mail, ASCII text default
100% TrID E-Mail message (Var. 2) default
100% checkBytes Printable ASCII default
100% perlTextCheck Likely Text (Perl) default
100% siegfried fmt/329 Shell Archive Format default
100% detectItEasy Format: plain text[LF] default (weak)
100% xdgMime message/rfc822 default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 72 6f 6d 3a 20 70 65 | 6c 74 7a 40 63 65 72 6c |From: pe|ltz@cerl|
|00000010| 2e 75 69 75 63 2e 65 64 | 75 20 28 53 74 65 76 65 |.uiuc.ed|u (Steve|
|00000020| 20 50 65 6c 74 7a 29 0a | 4e 65 77 73 67 72 6f 75 | Peltz).|Newsgrou|
|00000030| 70 73 3a 20 61 6c 74 2e | 73 6f 75 72 63 65 73 0a |ps: alt.|sources.|
|00000040| 53 75 62 6a 65 63 74 3a | 20 75 75 65 6e 63 6f 64 |Subject:| uuencod|
|00000050| 65 20 73 70 6c 69 74 2f | 6a 6f 69 6e 0a 4d 65 73 |e split/|join.Mes|
|00000060| 73 61 67 65 2d 49 44 3a | 20 3c 31 39 39 31 4a 61 |sage-ID:| <1991Ja|
|00000070| 6e 32 34 2e 31 39 31 38 | 35 39 2e 31 31 31 32 32 |n24.1918|59.11122|
|00000080| 40 75 78 31 2e 63 73 6f | 2e 75 69 75 63 2e 65 64 |@ux1.cso|.uiuc.ed|
|00000090| 75 3e 0a 44 61 74 65 3a | 20 32 34 20 4a 61 6e 20 |u>.Date:| 24 Jan |
|000000a0| 39 31 20 31 39 3a 31 38 | 3a 35 39 20 47 4d 54 0a |91 19:18|:59 GMT.|
|000000b0| 0a 52 61 74 68 65 72 20 | 74 68 61 6e 20 6d 65 65 |.Rather |than mee|
|000000c0| 6b 6c 79 20 61 63 63 65 | 70 74 69 6e 67 20 74 68 |kly acce|pting th|
|000000d0| 65 20 6e 65 63 65 73 73 | 69 74 79 20 6f 66 20 61 |e necess|ity of a|
|000000e0| 20 70 72 6f 67 72 61 6d | 20 74 6f 20 63 6f 6d 62 | program| to comb|
|000000f0| 69 6e 65 20 74 68 65 20 | 70 61 72 74 73 20 6f 66 |ine the |parts of|
|00000100| 0a 61 20 73 70 6c 69 74 | 20 75 75 65 6e 63 6f 64 |.a split| uuencod|
|00000110| 65 64 20 66 69 6c 65 20 | 62 79 20 73 6b 69 70 70 |ed file |by skipp|
|00000120| 69 6e 67 20 68 65 61 64 | 65 72 73 2c 20 49 27 6c |ing head|ers, I'l|
|00000130| 6c 20 6a 75 73 74 20 70 | 6f 73 74 20 74 68 65 73 |l just p|ost thes|
|00000140| 65 20 74 77 6f 20 73 68 | 65 6c 6c 0a 73 63 72 69 |e two sh|ell.scri|
|00000150| 70 74 73 20 66 6f 72 20 | 73 70 6c 69 74 74 69 6e |pts for |splittin|
|00000160| 67 20 61 6e 64 20 6a 6f | 69 6e 69 6e 67 20 61 20 |g and jo|ining a |
|00000170| 66 69 6c 65 2e 20 4f 66 | 20 63 6f 75 72 73 65 2c |file. Of| course,|
|00000180| 20 61 6e 6f 74 68 65 72 | 20 73 69 6d 70 6c 65 20 | another| simple |
|00000190| 77 61 79 20 77 6f 75 6c | 64 0a 62 65 20 74 6f 20 |way woul|d.be to |
|000001a0| 65 6e 63 6c 6f 73 65 20 | 65 61 63 68 20 70 61 72 |enclose |each par|
|000001b0| 74 20 6f 66 20 74 68 65 | 20 73 70 6c 69 74 20 66 |t of the| split f|
|000001c0| 69 6c 65 20 69 6e 73 69 | 64 65 20 61 20 73 68 61 |ile insi|de a sha|
|000001d0| 72 2c 20 62 75 74 20 74 | 68 61 74 20 77 6f 75 6c |r, but t|hat woul|
|000001e0| 64 20 62 65 0a 74 6f 6f | 20 73 69 6d 70 6c 65 2e |d be.too| simple.|
|000001f0| 20 41 74 20 6c 65 61 73 | 74 20 77 69 74 68 20 74 | At leas|t with t|
|00000200| 68 69 73 2c 20 79 6f 75 | 20 63 61 6e 20 6a 6f 69 |his, you| can joi|
|00000210| 6e 20 74 68 65 20 66 69 | 6c 65 20 62 79 20 75 75 |n the fi|le by uu|
|00000220| 64 65 63 6f 64 69 6e 67 | 20 74 68 65 0a 73 65 70 |decoding| the.sep|
|00000230| 61 72 61 74 65 20 70 61 | 72 74 73 20 28 6c 65 74 |arate pa|rts (let|
|00000240| 74 69 6e 67 20 75 75 64 | 65 63 6f 64 65 20 73 6b |ting uud|ecode sk|
|00000250| 69 70 20 74 68 65 20 68 | 65 61 64 65 72 73 29 2c |ip the h|eaders),|
|00000260| 20 74 68 65 6e 20 63 61 | 74 20 74 68 65 20 72 65 | then ca|t the re|
|00000270| 73 75 6c 74 61 6e 74 0a | 66 69 6c 65 73 20 74 6f |sultant.|files to|
|00000280| 67 65 74 68 65 72 20 28 | 77 68 69 63 68 20 69 73 |gether (|which is|
|00000290| 20 61 6c 6c 20 74 68 61 | 74 20 74 68 65 20 75 75 | all tha|t the uu|
|000002a0| 6a 6f 69 6e 20 73 63 72 | 69 70 74 20 62 65 6c 6f |join scr|ipt belo|
|000002b0| 77 20 64 6f 65 73 29 2e | 0a 0a 4e 6f 74 65 20 74 |w does).|..Note t|
|000002c0| 68 61 74 20 75 75 73 70 | 6c 69 74 20 64 6f 65 73 |hat uusp|lit does|
|000002d0| 6e 27 74 20 74 65 73 74 | 20 74 6f 20 73 65 65 20 |n't test| to see |
|000002e0| 69 66 20 74 68 65 20 66 | 69 6c 65 20 77 61 73 20 |if the f|ile was |
|000002f0| 61 63 74 75 61 6c 6c 79 | 20 73 70 6c 69 74 2c 20 |actually| split, |
|00000300| 73 6f 0a 69 74 20 62 6c | 6f 77 73 20 75 70 20 69 |so.it bl|ows up i|
|00000310| 6e 20 74 68 61 74 20 63 | 61 73 65 2e 0a 0a 0a 23 |n that c|ase....#|
|00000320| 21 20 2f 62 69 6e 2f 73 | 68 0a 23 20 54 68 69 73 |! /bin/s|h.# This|
|00000330| 20 69 73 20 61 20 73 68 | 65 6c 6c 20 61 72 63 68 | is a sh|ell arch|
|00000340| 69 76 65 2e 20 20 52 65 | 6d 6f 76 65 20 61 6e 79 |ive. Re|move any|
|00000350| 74 68 69 6e 67 20 62 65 | 66 6f 72 65 20 74 68 69 |thing be|fore thi|
|00000360| 73 20 6c 69 6e 65 2c 20 | 74 68 65 6e 20 75 6e 70 |s line, |then unp|
|00000370| 61 63 6b 0a 23 20 69 74 | 20 62 79 20 73 61 76 69 |ack.# it| by savi|
|00000380| 6e 67 20 69 74 20 69 6e | 74 6f 20 61 20 66 69 6c |ng it in|to a fil|
|00000390| 65 20 61 6e 64 20 74 79 | 70 69 6e 67 20 22 73 68 |e and ty|ping "sh|
|000003a0| 20 66 69 6c 65 22 2e 20 | 20 54 6f 20 6f 76 65 72 | file". | To over|
|000003b0| 77 72 69 74 65 20 65 78 | 69 73 74 69 6e 67 0a 23 |write ex|isting.#|
|000003c0| 20 66 69 6c 65 73 2c 20 | 74 79 70 65 20 22 73 68 | files, |type "sh|
|000003d0| 20 66 69 6c 65 20 2d 63 | 22 2e 20 20 59 6f 75 20 | file -c|". You |
|000003e0| 63 61 6e 20 61 6c 73 6f | 20 66 65 65 64 20 74 68 |can also| feed th|
|000003f0| 69 73 20 61 73 20 73 74 | 61 6e 64 61 72 64 20 69 |is as st|andard i|
|00000400| 6e 70 75 74 20 76 69 61 | 0a 23 20 75 6e 73 68 61 |nput via|.# unsha|
|00000410| 72 2c 20 6f 72 20 62 79 | 20 74 79 70 69 6e 67 20 |r, or by| typing |
|00000420| 22 73 68 20 3c 66 69 6c | 65 22 2c 20 65 2e 67 2e |"sh <fil|e", e.g.|
|00000430| 2e 20 20 49 66 20 74 68 | 69 73 20 61 72 63 68 69 |. If th|is archi|
|00000440| 76 65 20 69 73 20 63 6f | 6d 70 6c 65 74 65 2c 20 |ve is co|mplete, |
|00000450| 79 6f 75 0a 23 20 77 69 | 6c 6c 20 73 65 65 20 74 |you.# wi|ll see t|
|00000460| 68 65 20 66 6f 6c 6c 6f | 77 69 6e 67 20 6d 65 73 |he follo|wing mes|
|00000470| 73 61 67 65 20 61 74 20 | 74 68 65 20 65 6e 64 3a |sage at |the end:|
|00000480| 0a 23 09 09 22 45 6e 64 | 20 6f 66 20 73 68 65 6c |.#.."End| of shel|
|00000490| 6c 20 61 72 63 68 69 76 | 65 2e 22 0a 23 20 43 6f |l archiv|e.".# Co|
|000004a0| 6e 74 65 6e 74 73 3a 20 | 20 75 75 73 70 6c 69 74 |ntents: | uusplit|
|000004b0| 20 75 75 6a 6f 69 6e 0a | 23 20 57 72 61 70 70 65 | uujoin.|# Wrappe|
|000004c0| 64 20 62 79 20 70 65 6c | 74 7a 40 75 69 6e 6f 76 |d by pel|tz@uinov|
|000004d0| 61 20 6f 6e 20 54 68 75 | 20 4a 61 6e 20 32 34 20 |a on Thu| Jan 24 |
|000004e0| 31 33 3a 31 39 3a 30 33 | 20 31 39 39 31 0a 50 41 |13:19:03| 1991.PA|
|000004f0| 54 48 3d 2f 62 69 6e 3a | 2f 75 73 72 2f 62 69 6e |TH=/bin:|/usr/bin|
|00000500| 3a 2f 75 73 72 2f 75 63 | 62 20 3b 20 65 78 70 6f |:/usr/uc|b ; expo|
|00000510| 72 74 20 50 41 54 48 0a | 69 66 20 74 65 73 74 20 |rt PATH.|if test |
|00000520| 2d 66 20 27 75 75 73 70 | 6c 69 74 27 20 2d 61 20 |-f 'uusp|lit' -a |
|00000530| 22 24 7b 31 7d 22 20 21 | 3d 20 22 2d 63 22 20 3b |"${1}" !|= "-c" ;|
|00000540| 20 74 68 65 6e 20 0a 20 | 20 65 63 68 6f 20 73 68 | then . | echo sh|
|00000550| 61 72 3a 20 57 69 6c 6c | 20 6e 6f 74 20 63 6c 6f |ar: Will| not clo|
|00000560| 62 62 65 72 20 65 78 69 | 73 74 69 6e 67 20 66 69 |bber exi|sting fi|
|00000570| 6c 65 20 5c 22 27 75 75 | 73 70 6c 69 74 27 5c 22 |le \"'uu|split'\"|
|00000580| 0a 65 6c 73 65 0a 65 63 | 68 6f 20 73 68 61 72 3a |.else.ec|ho shar:|
|00000590| 20 45 78 74 72 61 63 74 | 69 6e 67 20 5c 22 27 75 | Extract|ing \"'u|
|000005a0| 75 73 70 6c 69 74 27 5c | 22 20 5c 28 32 30 36 20 |usplit'\|" \(206 |
|000005b0| 63 68 61 72 61 63 74 65 | 72 73 5c 29 0a 73 65 64 |characte|rs\).sed|
|000005c0| 20 22 73 2f 5e 58 2f 2f | 22 20 3e 27 75 75 73 70 | "s/^X//|" >'uusp|
|000005d0| 6c 69 74 27 20 3c 3c 27 | 45 4e 44 5f 4f 46 5f 46 |lit' <<'|END_OF_F|
|000005e0| 49 4c 45 27 0a 58 23 21 | 2f 62 69 6e 2f 73 68 0a |ILE'.X#!|/bin/sh.|
|000005f0| 58 75 75 65 6e 63 6f 64 | 65 20 24 31 20 24 31 2e |Xuuencod|e $1 $1.|
|00000600| 61 61 20 7c 20 73 70 6c | 69 74 20 2d 20 24 31 2e |aa | spl|it - $1.|
|00000610| 0a 58 6c 61 73 74 3d 24 | 31 2e 61 61 2e 75 75 0a |.Xlast=$|1.aa.uu.|
|00000620| 58 6d 76 20 24 31 2e 61 | 61 20 24 6c 61 73 74 0a |Xmv $1.a|a $last.|
|00000630| 58 66 6f 72 20 66 69 6c | 65 20 69 6e 20 24 31 2e |Xfor fil|e in $1.|
|00000640| 5b 61 2d 7a 5d 5b 61 2d | 7a 5d 0a 58 64 6f 0a 58 |[a-z][a-|z].Xdo.X|
|00000650| 63 61 74 20 3e 3e 20 24 | 6c 61 73 74 20 3c 3c 20 |cat >> $|last << |
|00000660| 45 4f 46 0a 58 20 78 0a | 58 65 6e 64 0a 58 45 4f |EOF.X x.|Xend.XEO|
|00000670| 46 0a 58 6c 61 73 74 3d | 24 66 69 6c 65 2e 75 75 |F.Xlast=|$file.uu|
|00000680| 0a 58 63 61 74 20 2d 20 | 24 66 69 6c 65 20 3e 20 |.Xcat - |$file > |
|00000690| 24 6c 61 73 74 20 3c 3c | 20 45 4f 46 0a 58 62 65 |$last <<| EOF.Xbe|
|000006a0| 67 69 6e 20 36 34 34 20 | 24 66 69 6c 65 0a 58 45 |gin 644 |$file.XE|
|000006b0| 4f 46 0a 58 72 6d 20 24 | 66 69 6c 65 0a 58 64 6f |OF.Xrm $|file.Xdo|
|000006c0| 6e 65 0a 45 4e 44 5f 4f | 46 5f 46 49 4c 45 0a 69 |ne.END_O|F_FILE.i|
|000006d0| 66 20 74 65 73 74 20 32 | 30 36 20 2d 6e 65 20 60 |f test 2|06 -ne `|
|000006e0| 77 63 20 2d 63 20 3c 27 | 75 75 73 70 6c 69 74 27 |wc -c <'|uusplit'|
|000006f0| 60 3b 20 74 68 65 6e 0a | 20 20 20 20 65 63 68 6f |`; then.| echo|
|00000700| 20 73 68 61 72 3a 20 5c | 22 27 75 75 73 70 6c 69 | shar: \|"'uuspli|
|00000710| 74 27 5c 22 20 75 6e 70 | 61 63 6b 65 64 20 77 69 |t'\" unp|acked wi|
|00000720| 74 68 20 77 72 6f 6e 67 | 20 73 69 7a 65 21 0a 66 |th wrong| size!.f|
|00000730| 69 0a 63 68 6d 6f 64 20 | 2b 78 20 27 75 75 73 70 |i.chmod |+x 'uusp|
|00000740| 6c 69 74 27 0a 23 20 65 | 6e 64 20 6f 66 20 27 75 |lit'.# e|nd of 'u|
|00000750| 75 73 70 6c 69 74 27 0a | 66 69 0a 69 66 20 74 65 |usplit'.|fi.if te|
|00000760| 73 74 20 2d 66 20 27 75 | 75 6a 6f 69 6e 27 20 2d |st -f 'u|ujoin' -|
|00000770| 61 20 22 24 7b 31 7d 22 | 20 21 3d 20 22 2d 63 22 |a "${1}"| != "-c"|
|00000780| 20 3b 20 74 68 65 6e 20 | 0a 20 20 65 63 68 6f 20 | ; then |. echo |
|00000790| 73 68 61 72 3a 20 57 69 | 6c 6c 20 6e 6f 74 20 63 |shar: Wi|ll not c|
|000007a0| 6c 6f 62 62 65 72 20 65 | 78 69 73 74 69 6e 67 20 |lobber e|xisting |
|000007b0| 66 69 6c 65 20 5c 22 27 | 75 75 6a 6f 69 6e 27 5c |file \"'|uujoin'\|
|000007c0| 22 0a 65 6c 73 65 0a 65 | 63 68 6f 20 73 68 61 72 |".else.e|cho shar|
|000007d0| 3a 20 45 78 74 72 61 63 | 74 69 6e 67 20 5c 22 27 |: Extrac|ting \"'|
|000007e0| 75 75 6a 6f 69 6e 27 5c | 22 20 5c 28 31 30 32 20 |uujoin'\|" \(102 |
|000007f0| 63 68 61 72 61 63 74 65 | 72 73 5c 29 0a 73 65 64 |characte|rs\).sed|
|00000800| 20 22 73 2f 5e 58 2f 2f | 22 20 3e 27 75 75 6a 6f | "s/^X//|" >'uujo|
|00000810| 69 6e 27 20 3c 3c 27 45 | 4e 44 5f 4f 46 5f 46 49 |in' <<'E|ND_OF_FI|
|00000820| 4c 45 27 0a 58 23 21 2f | 62 69 6e 2f 73 68 0a 58 |LE'.X#!/|bin/sh.X|
|00000830| 66 6f 72 20 66 69 6c 65 | 20 69 6e 20 24 31 2e 5b |for file| in $1.[|
|00000840| 61 2d 7a 5d 5b 61 2d 7a | 5d 2e 75 75 0a 58 64 6f |a-z][a-z|].uu.Xdo|
|00000850| 0a 58 75 75 64 65 63 6f | 64 65 20 24 66 69 6c 65 |.Xuudeco|de $file|
|00000860| 0a 58 64 6f 6e 65 0a 58 | 63 61 74 20 24 31 2e 5b |.Xdone.X|cat $1.[|
|00000870| 61 2d 7a 5d 5b 61 2d 7a | 5d 20 3e 20 24 31 0a 58 |a-z][a-z|] > $1.X|
|00000880| 72 6d 20 24 31 2e 5b 61 | 2d 7a 5d 5b 61 2d 7a 5d |rm $1.[a|-z][a-z]|
|00000890| 0a 45 4e 44 5f 4f 46 5f | 46 49 4c 45 0a 69 66 20 |.END_OF_|FILE.if |
|000008a0| 74 65 73 74 20 31 30 32 | 20 2d 6e 65 20 60 77 63 |test 102| -ne `wc|
|000008b0| 20 2d 63 20 3c 27 75 75 | 6a 6f 69 6e 27 60 3b 20 | -c <'uu|join'`; |
|000008c0| 74 68 65 6e 0a 20 20 20 | 20 65 63 68 6f 20 73 68 |then. | echo sh|
|000008d0| 61 72 3a 20 5c 22 27 75 | 75 6a 6f 69 6e 27 5c 22 |ar: \"'u|ujoin'\"|
|000008e0| 20 75 6e 70 61 63 6b 65 | 64 20 77 69 74 68 20 77 | unpacke|d with w|
|000008f0| 72 6f 6e 67 20 73 69 7a | 65 21 0a 66 69 0a 63 68 |rong siz|e!.fi.ch|
|00000900| 6d 6f 64 20 2b 78 20 27 | 75 75 6a 6f 69 6e 27 0a |mod +x '|uujoin'.|
|00000910| 23 20 65 6e 64 20 6f 66 | 20 27 75 75 6a 6f 69 6e |# end of| 'uujoin|
|00000920| 27 0a 66 69 0a 65 63 68 | 6f 20 73 68 61 72 3a 20 |'.fi.ech|o shar: |
|00000930| 45 6e 64 20 6f 66 20 73 | 68 65 6c 6c 20 61 72 63 |End of s|hell arc|
|00000940| 68 69 76 65 2e 0a 65 78 | 69 74 20 30 0a 2d 2d 0a |hive..ex|it 0.--.|
|00000950| 53 74 65 76 65 20 50 65 | 6c 74 7a 0a 49 6e 74 65 |Steve Pe|ltz.Inte|
|00000960| 72 6e 65 74 3a 20 70 65 | 6c 74 7a 40 63 65 72 6c |rnet: pe|ltz@cerl|
|00000970| 2e 75 69 75 63 2e 65 64 | 75 09 50 4c 41 54 4f 2f |.uiuc.ed|u.PLATO/|
|00000980| 4e 6f 76 61 4e 45 54 3a | 20 70 65 6c 74 7a 2f 73 |NovaNET:| peltz/s|
|00000990| 2f 63 65 72 6c 0a | |/cerl. | |
+--------+-------------------------+-------------------------+--------+--------+