/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / misc / volume21 / mailmerge / part01

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 4e 65 77 73 67 72 6f 75 | 70 73 3a 20 63 6f 6d 70 |Newsgrou|ps: comp|
|00000010| 2e 73 6f 75 72 63 65 73 | 2e 6d 69 73 63 0a 46 72 |.sources|.misc.Fr|
|00000020| 6f 6d 3a 20 41 6a 61 79 | 20 53 68 61 68 20 3c 61 |om: Ajay| Shah <a|
|00000030| 6a 61 79 73 68 61 68 40 | 61 6c 68 65 6e 61 2e 75 |jayshah@|alhena.u|
|00000040| 73 63 2e 65 64 75 3e 0a | 53 75 62 6a 65 63 74 3a |sc.edu>.|Subject:|
|00000050| 20 20 76 32 31 69 30 34 | 33 3a 20 20 6d 61 69 6c |  v21i04|3:  mail|
|00000060| 6d 65 72 67 65 20 2d 20 | 4d 61 69 6c 6d 65 72 67 |merge - |Mailmerg|
|00000070| 65 20 77 72 69 74 74 65 | 6e 20 69 6e 20 61 77 6b |e writte|n in awk|
|00000080| 2c 20 50 61 72 74 30 31 | 2f 30 31 0a 4d 65 73 73 |, Part01|/01.Mess|
|00000090| 61 67 65 2d 49 44 3a 20 | 3c 31 39 39 31 4a 75 6c |age-ID: |<1991Jul|
|000000a0| 32 36 2e 31 38 31 31 35 | 36 2e 32 36 38 37 31 40 |26.18115|6.26871@|
|000000b0| 73 70 61 72 6b 79 2e 49 | 4d 44 2e 53 74 65 72 6c |sparky.I|MD.Sterl|
|000000c0| 69 6e 67 2e 43 4f 4d 3e | 0a 58 2d 4d 64 34 2d 53 |ing.COM>|.X-Md4-S|
|000000d0| 69 67 6e 61 74 75 72 65 | 3a 20 35 64 63 36 65 36 |ignature|: 5dc6e6|
|000000e0| 36 30 63 62 36 30 38 65 | 36 34 62 38 65 62 31 38 |60cb608e|64b8eb18|
|000000f0| 61 65 61 64 35 64 38 37 | 32 65 0a 44 61 74 65 3a |aead5d87|2e.Date:|
|00000100| 20 46 72 69 2c 20 32 36 | 20 4a 75 6c 20 31 39 39 | Fri, 26| Jul 199|
|00000110| 31 20 31 38 3a 31 31 3a | 35 36 20 47 4d 54 0a 41 |1 18:11:|56 GMT.A|
|00000120| 70 70 72 6f 76 65 64 3a | 20 6b 65 6e 74 40 73 70 |pproved:| kent@sp|
|00000130| 61 72 6b 79 2e 69 6d 64 | 2e 73 74 65 72 6c 69 6e |arky.imd|.sterlin|
|00000140| 67 2e 63 6f 6d 0a 0a 53 | 75 62 6d 69 74 74 65 64 |g.com..S|ubmitted|
|00000150| 2d 62 79 3a 20 41 6a 61 | 79 20 53 68 61 68 20 3c |-by: Aja|y Shah <|
|00000160| 61 6a 61 79 73 68 61 68 | 40 61 6c 68 65 6e 61 2e |ajayshah|@alhena.|
|00000170| 75 73 63 2e 65 64 75 3e | 0a 50 6f 73 74 69 6e 67 |usc.edu>|.Posting|
|00000180| 2d 6e 75 6d 62 65 72 3a | 20 56 6f 6c 75 6d 65 20 |-number:| Volume |
|00000190| 32 31 2c 20 49 73 73 75 | 65 20 34 33 0a 41 72 63 |21, Issu|e 43.Arc|
|000001a0| 68 69 76 65 2d 6e 61 6d | 65 3a 20 6d 61 69 6c 6d |hive-nam|e: mailm|
|000001b0| 65 72 67 65 2f 70 61 72 | 74 30 31 0a 45 6e 76 69 |erge/par|t01.Envi|
|000001c0| 72 6f 6e 6d 65 6e 74 3a | 20 41 57 4b 0a 0a 54 68 |ronment:| AWK..Th|
|000001d0| 69 73 20 69 73 20 61 20 | 6d 61 69 6c 6d 65 72 67 |is is a |mailmerg|
|000001e0| 65 20 70 72 6f 67 72 61 | 6d 2e 20 20 49 74 20 69 |e progra|m.  It i|
|000001f0| 73 20 6e 6f 74 20 61 77 | 61 72 65 20 6f 66 20 74 |s not aw|are of t|
|00000200| 68 65 20 74 79 70 65 73 | 65 74 74 65 72 0a 62 65 |he types|etter.be|
|00000210| 69 6e 67 20 75 73 65 64 | 3b 20 69 2e 65 2e 2c 20 |ing used|; i.e., |
|00000220| 69 74 20 63 61 6e 20 77 | 6f 72 6b 20 77 69 74 68 |it can w|ork with|
|00000230| 20 74 72 6f 66 66 2c 20 | 54 65 58 2c 20 6f 72 20 | troff, |TeX, or |
|00000240| 77 68 61 74 65 76 65 72 | 2e 0a 49 20 73 65 61 72 |whatever|..I sear|
|00000250| 63 68 65 64 20 6f 6e 20 | 61 72 63 68 69 65 2c 20 |ched on |archie, |
|00000260| 61 6e 64 20 6f 6e 6c 79 | 20 74 75 72 6e 65 64 20 |and only| turned |
|00000270| 75 70 20 6f 6e 65 20 73 | 75 63 68 20 70 72 6f 67 |up one s|uch prog|
|00000280| 72 61 6d 2c 20 77 68 69 | 63 68 0a 73 65 65 6d 65 |ram, whi|ch.seeme|
|00000290| 64 20 74 6f 20 62 65 20 | 72 61 74 68 65 72 20 74 |d to be |rather t|
|000002a0| 72 6f 66 66 2d 6f 72 69 | 65 6e 74 65 64 2e 0a 0a |roff-ori|ented...|
|000002b0| 49 74 20 74 61 6b 65 73 | 20 74 77 6f 20 69 6e 70 |It takes| two inp|
|000002c0| 75 74 73 3a 0a 0a 09 2d | 20 61 20 6c 65 74 74 65 |uts:...-| a lette|
|000002d0| 72 20 77 72 69 74 74 65 | 6e 20 75 73 69 6e 67 20 |r writte|n using |
|000002e0| 76 61 72 69 61 62 6c 65 | 73 20 6f 66 20 74 68 65 |variable|s of the|
|000002f0| 20 66 6f 72 6d 20 4e 41 | 4d 45 0a 09 2d 20 61 20 | form NA|ME..- a |
|00000300| 64 61 74 61 62 61 73 65 | 20 6f 66 20 70 65 6f 70 |database| of peop|
|00000310| 6c 65 2c 20 77 68 69 63 | 68 20 69 73 20 6a 75 73 |le, whic|h is jus|
|00000320| 74 20 76 61 6c 75 65 73 | 20 66 6f 72 20 74 68 65 |t values| for the|
|00000330| 73 65 20 76 61 72 69 61 | 62 6c 65 73 2e 0a 0a 53 |se varia|bles...S|
|00000340| 75 70 70 6f 73 65 20 74 | 68 65 20 6c 65 74 74 65 |uppose t|he lette|
|00000350| 72 20 69 73 20 69 6e 20 | 61 20 66 69 6c 65 20 6e |r is in |a file n|
|00000360| 61 6d 65 64 20 22 6c 65 | 74 74 65 72 22 2e 20 20 |amed "le|tter".  |
|00000370| 53 75 70 70 6f 73 65 0a | 74 68 65 20 64 61 74 61 |Suppose.|the data|
|00000380| 62 61 73 65 20 69 73 20 | 69 6e 20 61 20 66 69 6c |base is |in a fil|
|00000390| 65 20 22 6c 69 73 74 2e | 6f 66 2e 70 65 6f 70 6c |e "list.|of.peopl|
|000003a0| 65 22 2e 20 20 54 68 65 | 20 63 6f 6d 6d 61 6e 64 |e".  The| command|
|000003b0| 0a 0a 09 67 61 77 6b 20 | 2d 66 20 6d 61 69 6c 6d |...gawk |-f mailm|
|000003c0| 65 72 67 65 2e 61 77 6b | 20 2d 76 20 4c 3d 6c 65 |erge.awk| -v L=le|
|000003d0| 74 74 65 72 20 6c 69 73 | 74 2e 6f 66 2e 70 65 6f |tter lis|t.of.peo|
|000003e0| 70 6c 65 0a 0a 77 69 6c | 6c 20 67 65 6e 65 72 61 |ple..wil|l genera|
|000003f0| 74 65 20 66 69 6c 65 73 | 20 6d 6d 5f 6c 65 74 74 |te files| mm_lett|
|00000400| 65 72 2e 31 2c 20 6d 6d | 5f 6c 65 74 74 65 72 2e |er.1, mm|_letter.|
|00000410| 32 2c 20 65 74 63 20 69 | 6e 20 63 75 72 72 65 6e |2, etc i|n curren|
|00000420| 74 0a 64 69 72 65 63 74 | 6f 72 79 2e 0a 0a 54 68 |t.direct|ory...Th|
|00000430| 65 20 66 69 6c 65 20 64 | 65 6d 6f 2e 6c 65 74 74 |e file d|emo.lett|
|00000440| 65 72 20 69 73 20 61 20 | 73 61 6d 70 6c 65 20 6f |er is a |sample o|
|00000450| 66 20 61 20 6c 65 74 74 | 65 72 2e 20 20 54 68 65 |f a lett|er.  The|
|00000460| 20 75 73 65 20 6f 66 20 | 6d 61 69 6c 6d 65 72 67 | use of |mailmerg|
|00000470| 65 0a 76 61 72 69 61 62 | 6c 65 73 20 4d 55 53 54 |e.variab|les MUST|
|00000480| 20 62 65 20 6f 66 20 74 | 68 65 20 66 6f 72 6d 20 | be of t|he form |
|00000490| 46 49 45 4c 44 2c 20 74 | 68 6f 75 67 68 20 75 70 |FIELD, t|hough up|
|000004a0| 70 65 72 63 61 73 65 20 | 69 73 20 6f 70 74 69 6f |percase |is optio|
|000004b0| 6e 61 6c 2e 0a 41 73 20 | 6c 6f 6e 67 20 61 73 20 |nal..As |long as |
|000004c0| 74 68 65 20 66 69 65 6c | 64 6e 61 6d 65 20 79 6f |the fiel|dname yo|
|000004d0| 75 20 75 73 65 20 61 67 | 72 65 65 73 20 77 69 74 |u use ag|rees wit|
|000004e0| 68 20 74 68 65 20 63 6f | 72 72 65 73 70 6f 6e 64 |h the co|rrespond|
|000004f0| 69 6e 67 0a 6e 61 6d 65 | 20 69 6e 20 74 68 65 20 |ing.name| in the |
|00000500| 64 61 74 61 66 69 6c 65 | 20 28 69 6e 63 6c 75 64 |datafile| (includ|
|00000510| 69 6e 67 20 63 61 73 65 | 29 20 69 74 20 77 69 6c |ing case|) it wil|
|00000520| 6c 20 77 6f 72 6b 20 6f | 75 74 20 72 69 67 68 74 |l work o|ut right|
|00000530| 2e 0a 0a 49 66 20 79 6f | 75 27 72 65 20 61 66 72 |...If yo|u're afr|
|00000540| 61 69 64 20 61 62 6f 75 | 74 20 61 20 66 69 65 6c |aid abou|t a fiel|
|00000550| 64 20 6e 61 6d 65 20 63 | 6c 61 73 68 69 6e 67 20 |d name c|lashing |
|00000560| 77 69 74 68 20 73 6f 6d | 65 74 68 69 6e 67 0a 77 |with som|ething.w|
|00000570| 68 69 63 68 20 73 68 6f | 75 6c 64 20 6e 6f 74 20 |hich sho|uld not |
|00000580| 62 65 20 72 65 70 6c 61 | 63 65 64 2c 20 79 6f 75 |be repla|ced, you|
|00000590| 20 63 6f 75 6c 64 20 61 | 6c 77 61 79 73 20 75 73 | could a|lways us|
|000005a0| 65 20 61 20 66 69 65 6c | 64 6e 61 6d 65 0a 6f 66 |e a fiel|dname.of|
|000005b0| 20 74 68 65 20 66 6f 72 | 6d 20 5f 4e 41 4d 45 20 | the for|m _NAME |
|000005c0| 69 6e 73 74 65 61 64 20 | 6f 66 20 4e 41 4d 45 2e |instead |of NAME.|
|000005d0| 20 20 54 68 61 74 20 73 | 68 6f 75 6c 64 20 6d 61 |  That s|hould ma|
|000005e0| 6b 65 20 63 6c 61 73 68 | 65 73 0a 70 72 61 63 74 |ke clash|es.pract|
|000005f0| 69 63 61 6c 6c 79 20 69 | 6d 70 6f 73 73 69 62 6c |ically i|mpossibl|
|00000600| 65 2e 0a 0a 54 68 65 20 | 66 69 6c 65 20 64 65 6d |e...The |file dem|
|00000610| 6f 2e 64 62 20 69 73 20 | 61 20 73 61 6d 70 6c 65 |o.db is |a sample|
|00000620| 20 64 61 74 61 62 61 73 | 65 20 66 69 6c 65 2e 20 | databas|e file. |
|00000630| 54 68 65 20 66 69 72 73 | 74 20 6c 69 6e 65 20 0a |The firs|t line .|
|00000640| 4d 55 53 54 20 64 65 66 | 69 6e 65 20 74 68 65 20 |MUST def|ine the |
|00000650| 6c 61 79 6f 75 74 20 6f | 66 20 66 69 65 6c 64 73 |layout o|f fields|
|00000660| 20 6f 6e 20 74 68 65 20 | 6c 69 6e 65 2e 20 20 54 | on the |line.  T|
|00000670| 68 65 20 66 69 65 6c 64 | 73 20 4d 55 53 54 20 0a |he field|s MUST .|
|00000680| 62 65 20 70 69 70 65 2d | 64 65 6c 69 6d 69 74 65 |be pipe-|delimite|
|00000690| 64 2e 20 20 45 78 74 72 | 61 20 62 6c 61 6e 6b 20 |d.  Extr|a blank |
|000006a0| 6c 69 6e 65 73 20 61 6e | 79 77 68 65 72 65 20 61 |lines an|ywhere a|
|000006b0| 72 65 20 6f 6b 2e 0a 0a | 54 6f 20 74 65 73 74 20 |re ok...|To test |
|000006c0| 69 74 20 6f 6e 20 74 68 | 65 73 65 20 64 65 6d 6f |it on th|ese demo|
|000006d0| 20 66 69 6c 65 73 2c 20 | 64 6f 75 62 6c 65 63 68 | files, |doublech|
|000006e0| 65 63 6b 20 74 68 61 74 | 20 74 68 65 20 74 6f 70 |eck that| the top|
|000006f0| 20 6f 66 20 0a 74 68 65 | 20 4d 61 6b 65 66 69 6c | of .the| Makefil|
|00000700| 65 20 69 73 20 6f 6b 2c | 20 61 6e 64 20 73 61 79 |e is ok,| and say|
|00000710| 20 22 6d 61 6b 65 22 2e | 0a 0a 41 6a 61 79 5f 53 | "make".|..Ajay_S|
|00000720| 68 61 68 40 72 61 6e 64 | 2e 6f 72 67 0a 41 6a 61 |hah@rand|.org.Aja|
|00000730| 79 20 53 68 61 68 2c 0a | 54 68 65 20 52 61 6e 64 |y Shah,.|The Rand|
|00000740| 20 43 6f 72 70 6f 72 61 | 74 69 6f 6e 2c 0a 54 68 | Corpora|tion,.Th|
|00000750| 75 20 4a 75 6c 20 32 35 | 20 32 31 3a 34 36 3a 30 |u Jul 25| 21:46:0|
|00000760| 32 20 50 44 54 20 31 39 | 39 31 0a 23 21 20 2f 62 |2 PDT 19|91.#! /b|
|00000770| 69 6e 2f 73 68 0a 23 20 | 54 68 69 73 20 69 73 20 |in/sh.# |This is |
|00000780| 61 20 73 68 65 6c 6c 20 | 61 72 63 68 69 76 65 2e |a shell |archive.|
|00000790| 20 20 52 65 6d 6f 76 65 | 20 61 6e 79 74 68 69 6e |  Remove| anythin|
|000007a0| 67 20 62 65 66 6f 72 65 | 20 74 68 69 73 20 6c 69 |g before| this li|
|000007b0| 6e 65 2c 20 74 68 65 6e | 20 75 6e 70 61 63 6b 0a |ne, then| unpack.|
|000007c0| 23 20 69 74 20 62 79 20 | 73 61 76 69 6e 67 20 69 |# it by |saving i|
|000007d0| 74 20 69 6e 74 6f 20 61 | 20 66 69 6c 65 20 61 6e |t into a| file an|
|000007e0| 64 20 74 79 70 69 6e 67 | 20 22 73 68 20 66 69 6c |d typing| "sh fil|
|000007f0| 65 22 2e 20 20 54 6f 20 | 6f 76 65 72 77 72 69 74 |e".  To |overwrit|
|00000800| 65 20 65 78 69 73 74 69 | 6e 67 0a 23 20 66 69 6c |e existi|ng.# fil|
|00000810| 65 73 2c 20 74 79 70 65 | 20 22 73 68 20 66 69 6c |es, type| "sh fil|
|00000820| 65 20 2d 63 22 2e 20 20 | 59 6f 75 20 63 61 6e 20 |e -c".  |You can |
|00000830| 61 6c 73 6f 20 66 65 65 | 64 20 74 68 69 73 20 61 |also fee|d this a|
|00000840| 73 20 73 74 61 6e 64 61 | 72 64 20 69 6e 70 75 74 |s standa|rd input|
|00000850| 20 76 69 61 0a 23 20 75 | 6e 73 68 61 72 2c 20 6f | via.# u|nshar, o|
|00000860| 72 20 62 79 20 74 79 70 | 69 6e 67 20 22 73 68 20 |r by typ|ing "sh |
|00000870| 3c 66 69 6c 65 22 2c 20 | 65 2e 67 2e 2e 20 20 49 |<file", |e.g..  I|
|00000880| 66 20 74 68 69 73 20 61 | 72 63 68 69 76 65 20 69 |f this a|rchive i|
|00000890| 73 20 63 6f 6d 70 6c 65 | 74 65 2c 20 79 6f 75 0a |s comple|te, you.|
|000008a0| 23 20 77 69 6c 6c 20 73 | 65 65 20 74 68 65 20 66 |# will s|ee the f|
|000008b0| 6f 6c 6c 6f 77 69 6e 67 | 20 6d 65 73 73 61 67 65 |ollowing| message|
|000008c0| 20 61 74 20 74 68 65 20 | 65 6e 64 3a 0a 23 09 09 | at the |end:.#..|
|000008d0| 22 45 6e 64 20 6f 66 20 | 73 68 65 6c 6c 20 61 72 |"End of |shell ar|
|000008e0| 63 68 69 76 65 2e 22 0a | 23 20 43 6f 6e 74 65 6e |chive.".|# Conten|
|000008f0| 74 73 3a 20 20 31 2e 65 | 78 70 65 63 74 65 64 20 |ts:  1.e|xpected |
|00000900| 32 2e 65 78 70 65 63 74 | 65 64 20 4d 61 6b 65 66 |2.expect|ed Makef|
|00000910| 69 6c 65 20 52 45 41 44 | 4d 45 20 64 65 6d 6f 2e |ile READ|ME demo.|
|00000920| 64 62 20 64 65 6d 6f 2e | 6c 65 74 74 65 72 0a 23 |db demo.|letter.#|
|00000930| 20 20 20 6d 61 69 6c 6d | 65 72 67 65 2e 61 77 6b |   mailm|erge.awk|
|00000940| 0a 23 20 57 72 61 70 70 | 65 64 20 62 79 20 61 6a |.# Wrapp|ed by aj|
|00000950| 61 79 73 68 61 68 40 6d | 61 78 20 6f 6e 20 54 68 |ayshah@m|ax on Th|
|00000960| 75 20 4a 75 6c 20 32 35 | 20 32 31 3a 34 37 3a 34 |u Jul 25| 21:47:4|
|00000970| 33 20 31 39 39 31 0a 50 | 41 54 48 3d 2f 62 69 6e |3 1991.P|ATH=/bin|
|00000980| 3a 2f 75 73 72 2f 62 69 | 6e 3a 2f 75 73 72 2f 75 |:/usr/bi|n:/usr/u|
|00000990| 63 62 20 3b 20 65 78 70 | 6f 72 74 20 50 41 54 48 |cb ; exp|ort PATH|
|000009a0| 0a 69 66 20 74 65 73 74 | 20 2d 66 20 27 31 2e 65 |.if test| -f '1.e|
|000009b0| 78 70 65 63 74 65 64 27 | 20 2d 61 20 22 24 7b 31 |xpected'| -a "${1|
|000009c0| 7d 22 20 21 3d 20 22 2d | 63 22 20 3b 20 74 68 65 |}" != "-|c" ; the|
|000009d0| 6e 20 0a 20 20 65 63 68 | 6f 20 73 68 61 72 3a 20 |n .  ech|o shar: |
|000009e0| 57 69 6c 6c 20 6e 6f 74 | 20 63 6c 6f 62 62 65 72 |Will not| clobber|
|000009f0| 20 65 78 69 73 74 69 6e | 67 20 66 69 6c 65 20 5c | existin|g file \|
|00000a00| 22 27 31 2e 65 78 70 65 | 63 74 65 64 27 5c 22 0a |"'1.expe|cted'\".|
|00000a10| 65 6c 73 65 0a 65 63 68 | 6f 20 73 68 61 72 3a 20 |else.ech|o shar: |
|00000a20| 45 78 74 72 61 63 74 69 | 6e 67 20 5c 22 27 31 2e |Extracti|ng \"'1.|
|00000a30| 65 78 70 65 63 74 65 64 | 27 5c 22 20 5c 28 39 39 |expected|'\" \(99|
|00000a40| 20 63 68 61 72 61 63 74 | 65 72 73 5c 29 0a 73 65 | charact|ers\).se|
|00000a50| 64 20 22 73 2f 5e 58 2f | 2f 22 20 3e 27 31 2e 65 |d "s/^X/|/" >'1.e|
|00000a60| 78 70 65 63 74 65 64 27 | 20 3c 3c 27 45 4e 44 5f |xpected'| <<'END_|
|00000a70| 4f 46 5f 46 49 4c 45 27 | 0a 58 0a 58 54 6f 0a 58 |OF_FILE'|.X.XTo.X|
|00000a80| 09 53 61 64 68 61 6e 61 | 20 53 68 61 68 0a 58 09 |.Sadhana| Shah.X.|
|00000a90| 43 4d 49 45 2c 20 42 6f | 6d 62 61 79 0a 58 0a 58 |CMIE, Bo|mbay.X.X|
|00000aa0| 44 65 61 72 20 53 61 64 | 2c 0a 58 0a 58 09 49 20 |Dear Sad|,.X.X.I |
|00000ab0| 61 6c 6d 6f 73 74 20 66 | 6f 72 67 6f 74 20 74 68 |almost f|orgot th|
|00000ac0| 61 74 20 4a 75 6c 79 20 | 38 20 77 61 73 20 79 6f |at July |8 was yo|
|00000ad0| 75 72 20 62 69 72 74 68 | 64 61 79 21 0a 58 0a 58 |ur birth|day!.X.X|
|00000ae0| 09 2d 20 6d 65 0a 45 4e | 44 5f 4f 46 5f 46 49 4c |.- me.EN|D_OF_FIL|
|00000af0| 45 0a 69 66 20 74 65 73 | 74 20 39 39 20 2d 6e 65 |E.if tes|t 99 -ne|
|00000b00| 20 60 77 63 20 2d 63 20 | 3c 27 31 2e 65 78 70 65 | `wc -c |<'1.expe|
|00000b10| 63 74 65 64 27 60 3b 20 | 74 68 65 6e 0a 20 20 20 |cted'`; |then.   |
|00000b20| 20 65 63 68 6f 20 73 68 | 61 72 3a 20 5c 22 27 31 | echo sh|ar: \"'1|
|00000b30| 2e 65 78 70 65 63 74 65 | 64 27 5c 22 20 75 6e 70 |.expecte|d'\" unp|
|00000b40| 61 63 6b 65 64 20 77 69 | 74 68 20 77 72 6f 6e 67 |acked wi|th wrong|
|00000b50| 20 73 69 7a 65 21 0a 66 | 69 0a 23 20 65 6e 64 20 | size!.f|i.# end |
|00000b60| 6f 66 20 27 31 2e 65 78 | 70 65 63 74 65 64 27 0a |of '1.ex|pected'.|
|00000b70| 66 69 0a 69 66 20 74 65 | 73 74 20 2d 66 20 27 32 |fi.if te|st -f '2|
|00000b80| 2e 65 78 70 65 63 74 65 | 64 27 20 2d 61 20 22 24 |.expecte|d' -a "$|
|00000b90| 7b 31 7d 22 20 21 3d 20 | 22 2d 63 22 20 3b 20 74 |{1}" != |"-c" ; t|
|00000ba0| 68 65 6e 20 0a 20 20 65 | 63 68 6f 20 73 68 61 72 |hen .  e|cho shar|
|00000bb0| 3a 20 57 69 6c 6c 20 6e | 6f 74 20 63 6c 6f 62 62 |: Will n|ot clobb|
|00000bc0| 65 72 20 65 78 69 73 74 | 69 6e 67 20 66 69 6c 65 |er exist|ing file|
|00000bd0| 20 5c 22 27 32 2e 65 78 | 70 65 63 74 65 64 27 5c | \"'2.ex|pected'\|
|00000be0| 22 0a 65 6c 73 65 0a 65 | 63 68 6f 20 73 68 61 72 |".else.e|cho shar|
|00000bf0| 3a 20 45 78 74 72 61 63 | 74 69 6e 67 20 5c 22 27 |: Extrac|ting \"'|
|00000c00| 32 2e 65 78 70 65 63 74 | 65 64 27 5c 22 20 5c 28 |2.expect|ed'\" \(|
|00000c10| 31 30 36 20 63 68 61 72 | 61 63 74 65 72 73 5c 29 |106 char|acters\)|
|00000c20| 0a 73 65 64 20 22 73 2f | 5e 58 2f 2f 22 20 3e 27 |.sed "s/|^X//" >'|
|00000c30| 32 2e 65 78 70 65 63 74 | 65 64 27 20 3c 3c 27 45 |2.expect|ed' <<'E|
|00000c40| 4e 44 5f 4f 46 5f 46 49 | 4c 45 27 0a 58 0a 58 54 |ND_OF_FI|LE'.X.XT|
|00000c50| 6f 0a 58 09 53 75 73 61 | 6e 20 54 68 6f 6d 61 73 |o.X.Susa|n Thomas|
|00000c60| 0a 58 09 52 61 6e 64 20 | 43 6f 72 70 6f 72 61 74 |.X.Rand |Corporat|
|00000c70| 69 6f 6e 0a 58 0a 58 44 | 65 61 72 20 53 75 73 61 |ion.X.XD|ear Susa|
|00000c80| 6e 2c 0a 58 0a 58 09 49 | 20 61 6c 6d 6f 73 74 20 |n,.X.X.I| almost |
|00000c90| 66 6f 72 67 6f 74 20 74 | 68 61 74 20 4a 75 6c 79 |forgot t|hat July|
|00000ca0| 20 33 30 20 77 61 73 20 | 79 6f 75 72 20 62 69 72 | 30 was |your bir|
|00000cb0| 74 68 64 61 79 21 0a 58 | 0a 58 09 2d 20 6d 65 0a |thday!.X|.X.- me.|
|00000cc0| 45 4e 44 5f 4f 46 5f 46 | 49 4c 45 0a 69 66 20 74 |END_OF_F|ILE.if t|
|00000cd0| 65 73 74 20 31 30 36 20 | 2d 6e 65 20 60 77 63 20 |est 106 |-ne `wc |
|00000ce0| 2d 63 20 3c 27 32 2e 65 | 78 70 65 63 74 65 64 27 |-c <'2.e|xpected'|
|00000cf0| 60 3b 20 74 68 65 6e 0a | 20 20 20 20 65 63 68 6f |`; then.|    echo|
|00000d00| 20 73 68 61 72 3a 20 5c | 22 27 32 2e 65 78 70 65 | shar: \|"'2.expe|
|00000d10| 63 74 65 64 27 5c 22 20 | 75 6e 70 61 63 6b 65 64 |cted'\" |unpacked|
|00000d20| 20 77 69 74 68 20 77 72 | 6f 6e 67 20 73 69 7a 65 | with wr|ong size|
|00000d30| 21 0a 66 69 0a 23 20 65 | 6e 64 20 6f 66 20 27 32 |!.fi.# e|nd of '2|
|00000d40| 2e 65 78 70 65 63 74 65 | 64 27 0a 66 69 0a 69 66 |.expecte|d'.fi.if|
|00000d50| 20 74 65 73 74 20 2d 66 | 20 27 4d 61 6b 65 66 69 | test -f| 'Makefi|
|00000d60| 6c 65 27 20 2d 61 20 22 | 24 7b 31 7d 22 20 21 3d |le' -a "|${1}" !=|
|00000d70| 20 22 2d 63 22 20 3b 20 | 74 68 65 6e 20 0a 20 20 | "-c" ; |then .  |
|00000d80| 65 63 68 6f 20 73 68 61 | 72 3a 20 57 69 6c 6c 20 |echo sha|r: Will |
|00000d90| 6e 6f 74 20 63 6c 6f 62 | 62 65 72 20 65 78 69 73 |not clob|ber exis|
|00000da0| 74 69 6e 67 20 66 69 6c | 65 20 5c 22 27 4d 61 6b |ting fil|e \"'Mak|
|00000db0| 65 66 69 6c 65 27 5c 22 | 0a 65 6c 73 65 0a 65 63 |efile'\"|.else.ec|
|00000dc0| 68 6f 20 73 68 61 72 3a | 20 45 78 74 72 61 63 74 |ho shar:| Extract|
|00000dd0| 69 6e 67 20 5c 22 27 4d | 61 6b 65 66 69 6c 65 27 |ing \"'M|akefile'|
|00000de0| 5c 22 20 5c 28 34 36 39 | 20 63 68 61 72 61 63 74 |\" \(469| charact|
|00000df0| 65 72 73 5c 29 0a 73 65 | 64 20 22 73 2f 5e 58 2f |ers\).se|d "s/^X/|
|00000e00| 2f 22 20 3e 27 4d 61 6b | 65 66 69 6c 65 27 20 3c |/" >'Mak|efile' <|
|00000e10| 3c 27 45 4e 44 5f 4f 46 | 5f 46 49 4c 45 27 0a 58 |<'END_OF|_FILE'.X|
|00000e20| 0a 58 4e 45 57 41 57 4b | 3d 67 61 77 6b 0a 58 09 |.XNEWAWK|=gawk.X.|
|00000e30| 23 20 63 68 61 6e 67 65 | 20 74 68 61 74 20 74 6f |# change| that to|
|00000e40| 20 62 65 20 79 6f 75 72 | 20 63 6f 70 79 20 6f 66 | be your| copy of|
|00000e50| 20 61 20 6e 65 77 20 61 | 77 6b 2e 0a 58 0a 58 23 | a new a|wk..X.X#|
|00000e60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000e70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 20 4e 65 65 64 20 6e |--------|- Need n|
|00000e80| 6f 74 20 63 68 61 6e 67 | 65 20 61 6e 79 74 68 69 |ot chang|e anythi|
|00000e90| 6e 67 20 62 65 6c 6f 77 | 20 74 68 69 73 20 6c 69 |ng below| this li|
|00000ea0| 6e 65 0a 58 0a 58 74 65 | 73 74 20 3a 0a 58 09 24 |ne.X.Xte|st :.X.$|
|00000eb0| 28 4e 45 57 41 57 4b 29 | 20 2d 66 20 6d 61 69 6c |(NEWAWK)| -f mail|
|00000ec0| 6d 65 72 67 65 2e 61 77 | 6b 20 2d 76 20 4c 3d 64 |merge.aw|k -v L=d|
|00000ed0| 65 6d 6f 2e 6c 65 74 74 | 65 72 20 64 65 6d 6f 2e |emo.lett|er demo.|
|00000ee0| 64 62 0a 58 09 64 69 66 | 66 20 6d 6d 5f 64 65 6d |db.X.dif|f mm_dem|
|00000ef0| 6f 2e 6c 65 74 74 65 72 | 2e 31 20 31 2e 65 78 70 |o.letter|.1 1.exp|
|00000f00| 65 63 74 65 64 0a 58 09 | 64 69 66 66 20 6d 6d 5f |ected.X.|diff mm_|
|00000f10| 64 65 6d 6f 2e 6c 65 74 | 74 65 72 2e 32 20 32 2e |demo.let|ter.2 2.|
|00000f20| 65 78 70 65 63 74 65 64 | 0a 58 09 40 65 63 68 6f |expected|.X.@echo|
|00000f30| 20 49 66 20 74 68 6f 73 | 65 20 74 77 6f 20 64 69 | If thos|e two di|
|00000f40| 66 66 73 20 77 65 6e 74 | 20 62 79 20 66 69 6e 65 |ffs went| by fine|
|00000f50| 2c 20 69 74 20 77 6f 72 | 6b 73 2e 0a 58 0a 58 63 |, it wor|ks..X.Xc|
|00000f60| 6c 65 61 6e 20 3a 0a 58 | 09 72 6d 20 2d 66 20 6d |lean :.X|.rm -f m|
|00000f70| 6d 5f 64 65 6d 6f 2e 6c | 65 74 74 65 72 2e 2a 20 |m_demo.l|etter.* |
|00000f80| 72 65 61 64 79 74 6f 70 | 6f 73 74 0a 58 0a 58 70 |readytop|ost.X.Xp|
|00000f90| 6f 73 74 20 3a 20 63 6c | 65 61 6e 0a 58 09 73 68 |ost : cl|ean.X.sh|
|00000fa0| 61 72 20 2a 20 3e 20 2f | 74 6d 70 2f 6d 61 69 6c |ar * > /|tmp/mail|
|00000fb0| 6d 65 72 67 65 2e 73 68 | 61 72 0a 58 09 63 61 74 |merge.sh|ar.X.cat|
|00000fc0| 20 52 45 41 44 4d 45 20 | 2f 74 6d 70 2f 6d 61 69 | README |/tmp/mai|
|00000fd0| 6c 6d 65 72 67 65 2e 73 | 68 61 72 20 3e 20 72 65 |lmerge.s|har > re|
|00000fe0| 61 64 79 74 6f 70 6f 73 | 74 0a 58 09 72 6d 20 2d |adytopos|t.X.rm -|
|00000ff0| 66 20 2f 74 6d 70 2f 6d | 61 69 6c 6d 65 72 67 65 |f /tmp/m|ailmerge|
|00001000| 2e 73 68 61 72 0a 58 0a | 45 4e 44 5f 4f 46 5f 46 |.shar.X.|END_OF_F|
|00001010| 49 4c 45 0a 69 66 20 74 | 65 73 74 20 34 36 39 20 |ILE.if t|est 469 |
|00001020| 2d 6e 65 20 60 77 63 20 | 2d 63 20 3c 27 4d 61 6b |-ne `wc |-c <'Mak|
|00001030| 65 66 69 6c 65 27 60 3b | 20 74 68 65 6e 0a 20 20 |efile'`;| then.  |
|00001040| 20 20 65 63 68 6f 20 73 | 68 61 72 3a 20 5c 22 27 |  echo s|har: \"'|
|00001050| 4d 61 6b 65 66 69 6c 65 | 27 5c 22 20 75 6e 70 61 |Makefile|'\" unpa|
|00001060| 63 6b 65 64 20 77 69 74 | 68 20 77 72 6f 6e 67 20 |cked wit|h wrong |
|00001070| 73 69 7a 65 21 0a 66 69 | 0a 23 20 65 6e 64 20 6f |size!.fi|.# end o|
|00001080| 66 20 27 4d 61 6b 65 66 | 69 6c 65 27 0a 66 69 0a |f 'Makef|ile'.fi.|
|00001090| 69 66 20 74 65 73 74 20 | 2d 66 20 27 52 45 41 44 |if test |-f 'READ|
|000010a0| 4d 45 27 20 2d 61 20 22 | 24 7b 31 7d 22 20 21 3d |ME' -a "|${1}" !=|
|000010b0| 20 22 2d 63 22 20 3b 20 | 74 68 65 6e 20 0a 20 20 | "-c" ; |then .  |
|000010c0| 65 63 68 6f 20 73 68 61 | 72 3a 20 57 69 6c 6c 20 |echo sha|r: Will |
|000010d0| 6e 6f 74 20 63 6c 6f 62 | 62 65 72 20 65 78 69 73 |not clob|ber exis|
|000010e0| 74 69 6e 67 20 66 69 6c | 65 20 5c 22 27 52 45 41 |ting fil|e \"'REA|
|000010f0| 44 4d 45 27 5c 22 0a 65 | 6c 73 65 0a 65 63 68 6f |DME'\".e|lse.echo|
|00001100| 20 73 68 61 72 3a 20 45 | 78 74 72 61 63 74 69 6e | shar: E|xtractin|
|00001110| 67 20 5c 22 27 52 45 41 | 44 4d 45 27 5c 22 20 5c |g \"'REA|DME'\" \|
|00001120| 28 31 34 33 38 20 63 68 | 61 72 61 63 74 65 72 73 |(1438 ch|aracters|
|00001130| 5c 29 0a 73 65 64 20 22 | 73 2f 5e 58 2f 2f 22 20 |\).sed "|s/^X//" |
|00001140| 3e 27 52 45 41 44 4d 45 | 27 20 3c 3c 27 45 4e 44 |>'README|' <<'END|
|00001150| 5f 4f 46 5f 46 49 4c 45 | 27 0a 58 0a 58 54 68 69 |_OF_FILE|'.X.XThi|
|00001160| 73 20 69 73 20 61 20 6d | 61 69 6c 6d 65 72 67 65 |s is a m|ailmerge|
|00001170| 20 70 72 6f 67 72 61 6d | 2e 20 20 49 74 20 69 73 | program|.  It is|
|00001180| 20 6e 6f 74 20 61 77 61 | 72 65 20 6f 66 20 74 68 | not awa|re of th|
|00001190| 65 20 74 79 70 65 73 65 | 74 74 65 72 0a 58 62 65 |e typese|tter.Xbe|
|000011a0| 69 6e 67 20 75 73 65 64 | 3b 20 69 2e 65 2e 2c 20 |ing used|; i.e., |
|000011b0| 69 74 20 63 61 6e 20 77 | 6f 72 6b 20 77 69 74 68 |it can w|ork with|
|000011c0| 20 74 72 6f 66 66 2c 20 | 54 65 58 2c 20 6f 72 20 | troff, |TeX, or |
|000011d0| 77 68 61 74 65 76 65 72 | 2e 0a 58 49 20 73 65 61 |whatever|..XI sea|
|000011e0| 72 63 68 65 64 20 6f 6e | 20 61 72 63 68 69 65 2c |rched on| archie,|
|000011f0| 20 61 6e 64 20 6f 6e 6c | 79 20 74 75 72 6e 65 64 | and onl|y turned|
|00001200| 20 75 70 20 6f 6e 65 20 | 73 75 63 68 20 70 72 6f | up one |such pro|
|00001210| 67 72 61 6d 2c 20 77 68 | 69 63 68 0a 58 73 65 65 |gram, wh|ich.Xsee|
|00001220| 6d 65 64 20 74 6f 20 62 | 65 20 72 61 74 68 65 72 |med to b|e rather|
|00001230| 20 74 72 6f 66 66 2d 6f | 72 69 65 6e 74 65 64 2e | troff-o|riented.|
|00001240| 0a 58 0a 58 49 74 20 74 | 61 6b 65 73 20 74 77 6f |.X.XIt t|akes two|
|00001250| 20 69 6e 70 75 74 73 3a | 0a 58 0a 58 09 2d 20 61 | inputs:|.X.X.- a|
|00001260| 20 6c 65 74 74 65 72 20 | 77 72 69 74 74 65 6e 20 | letter |written |
|00001270| 75 73 69 6e 67 20 76 61 | 72 69 61 62 6c 65 73 20 |using va|riables |
|00001280| 6f 66 20 74 68 65 20 66 | 6f 72 6d 20 4e 41 4d 45 |of the f|orm NAME|
|00001290| 0a 58 09 2d 20 61 20 64 | 61 74 61 62 61 73 65 20 |.X.- a d|atabase |
|000012a0| 6f 66 20 70 65 6f 70 6c | 65 2c 20 77 68 69 63 68 |of peopl|e, which|
|000012b0| 20 69 73 20 6a 75 73 74 | 20 76 61 6c 75 65 73 20 | is just| values |
|000012c0| 66 6f 72 20 74 68 65 73 | 65 20 76 61 72 69 61 62 |for thes|e variab|
|000012d0| 6c 65 73 2e 0a 58 0a 58 | 53 75 70 70 6f 73 65 20 |les..X.X|Suppose |
|000012e0| 74 68 65 20 6c 65 74 74 | 65 72 20 69 73 20 69 6e |the lett|er is in|
|000012f0| 20 61 20 66 69 6c 65 20 | 6e 61 6d 65 64 20 22 6c | a file |named "l|
|00001300| 65 74 74 65 72 22 2e 20 | 20 53 75 70 70 6f 73 65 |etter". | Suppose|
|00001310| 0a 58 74 68 65 20 64 61 | 74 61 62 61 73 65 20 69 |.Xthe da|tabase i|
|00001320| 73 20 69 6e 20 61 20 66 | 69 6c 65 20 22 6c 69 73 |s in a f|ile "lis|
|00001330| 74 2e 6f 66 2e 70 65 6f | 70 6c 65 22 2e 20 20 54 |t.of.peo|ple".  T|
|00001340| 68 65 20 63 6f 6d 6d 61 | 6e 64 0a 58 0a 58 09 67 |he comma|nd.X.X.g|
|00001350| 61 77 6b 20 2d 66 20 6d | 61 69 6c 6d 65 72 67 65 |awk -f m|ailmerge|
|00001360| 2e 61 77 6b 20 2d 76 20 | 4c 3d 6c 65 74 74 65 72 |.awk -v |L=letter|
|00001370| 20 6c 69 73 74 2e 6f 66 | 2e 70 65 6f 70 6c 65 0a | list.of|.people.|
|00001380| 58 0a 58 77 69 6c 6c 20 | 67 65 6e 65 72 61 74 65 |X.Xwill |generate|
|00001390| 20 66 69 6c 65 73 20 6d | 6d 5f 6c 65 74 74 65 72 | files m|m_letter|
|000013a0| 2e 31 2c 20 6d 6d 5f 6c | 65 74 74 65 72 2e 32 2c |.1, mm_l|etter.2,|
|000013b0| 20 65 74 63 20 69 6e 20 | 63 75 72 72 65 6e 74 0a | etc in |current.|
|000013c0| 58 64 69 72 65 63 74 6f | 72 79 2e 0a 58 0a 58 54 |Xdirecto|ry..X.XT|
|000013d0| 68 65 20 66 69 6c 65 20 | 64 65 6d 6f 2e 6c 65 74 |he file |demo.let|
|000013e0| 74 65 72 20 69 73 20 61 | 20 73 61 6d 70 6c 65 20 |ter is a| sample |
|000013f0| 6f 66 20 61 20 6c 65 74 | 74 65 72 2e 20 20 54 68 |of a let|ter.  Th|
|00001400| 65 20 75 73 65 20 6f 66 | 20 6d 61 69 6c 6d 65 72 |e use of| mailmer|
|00001410| 67 65 0a 58 76 61 72 69 | 61 62 6c 65 73 20 4d 55 |ge.Xvari|ables MU|
|00001420| 53 54 20 62 65 20 6f 66 | 20 74 68 65 20 66 6f 72 |ST be of| the for|
|00001430| 6d 20 46 49 45 4c 44 2c | 20 74 68 6f 75 67 68 20 |m FIELD,| though |
|00001440| 75 70 70 65 72 63 61 73 | 65 20 69 73 20 6f 70 74 |uppercas|e is opt|
|00001450| 69 6f 6e 61 6c 2e 0a 58 | 41 73 20 6c 6f 6e 67 20 |ional..X|As long |
|00001460| 61 73 20 74 68 65 20 66 | 69 65 6c 64 6e 61 6d 65 |as the f|ieldname|
|00001470| 20 79 6f 75 20 75 73 65 | 20 61 67 72 65 65 73 20 | you use| agrees |
|00001480| 77 69 74 68 20 74 68 65 | 20 63 6f 72 72 65 73 70 |with the| corresp|
|00001490| 6f 6e 64 69 6e 67 0a 58 | 6e 61 6d 65 20 69 6e 20 |onding.X|name in |
|000014a0| 74 68 65 20 64 61 74 61 | 66 69 6c 65 20 28 69 6e |the data|file (in|
|000014b0| 63 6c 75 64 69 6e 67 20 | 63 61 73 65 29 20 69 74 |cluding |case) it|
|000014c0| 20 77 69 6c 6c 20 77 6f | 72 6b 20 6f 75 74 20 72 | will wo|rk out r|
|000014d0| 69 67 68 74 2e 0a 58 0a | 58 49 66 20 79 6f 75 27 |ight..X.|XIf you'|
|000014e0| 72 65 20 61 66 72 61 69 | 64 20 61 62 6f 75 74 20 |re afrai|d about |
|000014f0| 61 20 66 69 65 6c 64 20 | 6e 61 6d 65 20 63 6c 61 |a field |name cla|
|00001500| 73 68 69 6e 67 20 77 69 | 74 68 20 73 6f 6d 65 74 |shing wi|th somet|
|00001510| 68 69 6e 67 0a 58 77 68 | 69 63 68 20 73 68 6f 75 |hing.Xwh|ich shou|
|00001520| 6c 64 20 6e 6f 74 20 62 | 65 20 72 65 70 6c 61 63 |ld not b|e replac|
|00001530| 65 64 2c 20 79 6f 75 20 | 63 6f 75 6c 64 20 61 6c |ed, you |could al|
|00001540| 77 61 79 73 20 75 73 65 | 20 61 20 66 69 65 6c 64 |ways use| a field|
|00001550| 6e 61 6d 65 0a 58 6f 66 | 20 74 68 65 20 66 6f 72 |name.Xof| the for|
|00001560| 6d 20 5f 4e 41 4d 45 20 | 69 6e 73 74 65 61 64 20 |m _NAME |instead |
|00001570| 6f 66 20 4e 41 4d 45 2e | 20 20 54 68 61 74 20 73 |of NAME.|  That s|
|00001580| 68 6f 75 6c 64 20 6d 61 | 6b 65 20 63 6c 61 73 68 |hould ma|ke clash|
|00001590| 65 73 0a 58 70 72 61 63 | 74 69 63 61 6c 6c 79 20 |es.Xprac|tically |
|000015a0| 69 6d 70 6f 73 73 69 62 | 6c 65 2e 0a 58 0a 58 54 |impossib|le..X.XT|
|000015b0| 68 65 20 66 69 6c 65 20 | 64 65 6d 6f 2e 64 62 20 |he file |demo.db |
|000015c0| 69 73 20 61 20 73 61 6d | 70 6c 65 20 64 61 74 61 |is a sam|ple data|
|000015d0| 62 61 73 65 20 66 69 6c | 65 2e 20 54 68 65 20 66 |base fil|e. The f|
|000015e0| 69 72 73 74 20 6c 69 6e | 65 20 0a 58 4d 55 53 54 |irst lin|e .XMUST|
|000015f0| 20 64 65 66 69 6e 65 20 | 74 68 65 20 6c 61 79 6f | define |the layo|
|00001600| 75 74 20 6f 66 20 66 69 | 65 6c 64 73 20 6f 6e 20 |ut of fi|elds on |
|00001610| 74 68 65 20 6c 69 6e 65 | 2e 20 20 54 68 65 20 66 |the line|.  The f|
|00001620| 69 65 6c 64 73 20 4d 55 | 53 54 20 0a 58 62 65 20 |ields MU|ST .Xbe |
|00001630| 70 69 70 65 2d 64 65 6c | 69 6d 69 74 65 64 2e 20 |pipe-del|imited. |
|00001640| 20 45 78 74 72 61 20 62 | 6c 61 6e 6b 20 6c 69 6e | Extra b|lank lin|
|00001650| 65 73 20 61 6e 79 77 68 | 65 72 65 20 61 72 65 20 |es anywh|ere are |
|00001660| 6f 6b 2e 0a 58 0a 58 54 | 6f 20 74 65 73 74 20 69 |ok..X.XT|o test i|
|00001670| 74 20 6f 6e 20 74 68 65 | 73 65 20 64 65 6d 6f 20 |t on the|se demo |
|00001680| 66 69 6c 65 73 2c 20 64 | 6f 75 62 6c 65 63 68 65 |files, d|oubleche|
|00001690| 63 6b 20 74 68 61 74 20 | 74 68 65 20 74 6f 70 20 |ck that |the top |
|000016a0| 6f 66 20 0a 58 74 68 65 | 20 4d 61 6b 65 66 69 6c |of .Xthe| Makefil|
|000016b0| 65 20 69 73 20 6f 6b 2c | 20 61 6e 64 20 73 61 79 |e is ok,| and say|
|000016c0| 20 22 6d 61 6b 65 22 2e | 0a 58 0a 58 41 6a 61 79 | "make".|.X.XAjay|
|000016d0| 5f 53 68 61 68 40 72 61 | 6e 64 2e 6f 72 67 0a 58 |_Shah@ra|nd.org.X|
|000016e0| 41 6a 61 79 20 53 68 61 | 68 2c 0a 58 54 68 65 20 |Ajay Sha|h,.XThe |
|000016f0| 52 61 6e 64 20 43 6f 72 | 70 6f 72 61 74 69 6f 6e |Rand Cor|poration|
|00001700| 2c 0a 58 54 68 75 20 4a | 75 6c 20 32 35 20 32 31 |,.XThu J|ul 25 21|
|00001710| 3a 34 36 3a 30 32 20 50 | 44 54 20 31 39 39 31 0a |:46:02 P|DT 1991.|
|00001720| 45 4e 44 5f 4f 46 5f 46 | 49 4c 45 0a 69 66 20 74 |END_OF_F|ILE.if t|
|00001730| 65 73 74 20 31 34 33 38 | 20 2d 6e 65 20 60 77 63 |est 1438| -ne `wc|
|00001740| 20 2d 63 20 3c 27 52 45 | 41 44 4d 45 27 60 3b 20 | -c <'RE|ADME'`; |
|00001750| 74 68 65 6e 0a 20 20 20 | 20 65 63 68 6f 20 73 68 |then.   | echo sh|
|00001760| 61 72 3a 20 5c 22 27 52 | 45 41 44 4d 45 27 5c 22 |ar: \"'R|EADME'\"|
|00001770| 20 75 6e 70 61 63 6b 65 | 64 20 77 69 74 68 20 77 | unpacke|d with w|
|00001780| 72 6f 6e 67 20 73 69 7a | 65 21 0a 66 69 0a 23 20 |rong siz|e!.fi.# |
|00001790| 65 6e 64 20 6f 66 20 27 | 52 45 41 44 4d 45 27 0a |end of '|README'.|
|000017a0| 66 69 0a 69 66 20 74 65 | 73 74 20 2d 66 20 27 64 |fi.if te|st -f 'd|
|000017b0| 65 6d 6f 2e 64 62 27 20 | 2d 61 20 22 24 7b 31 7d |emo.db' |-a "${1}|
|000017c0| 22 20 21 3d 20 22 2d 63 | 22 20 3b 20 74 68 65 6e |" != "-c|" ; then|
|000017d0| 20 0a 20 20 65 63 68 6f | 20 73 68 61 72 3a 20 57 | .  echo| shar: W|
|000017e0| 69 6c 6c 20 6e 6f 74 20 | 63 6c 6f 62 62 65 72 20 |ill not |clobber |
|000017f0| 65 78 69 73 74 69 6e 67 | 20 66 69 6c 65 20 5c 22 |existing| file \"|
|00001800| 27 64 65 6d 6f 2e 64 62 | 27 5c 22 0a 65 6c 73 65 |'demo.db|'\".else|
|00001810| 0a 65 63 68 6f 20 73 68 | 61 72 3a 20 45 78 74 72 |.echo sh|ar: Extr|
|00001820| 61 63 74 69 6e 67 20 5c | 22 27 64 65 6d 6f 2e 64 |acting \|"'demo.d|
|00001830| 62 27 5c 22 20 5c 28 31 | 32 31 20 63 68 61 72 61 |b'\" \(1|21 chara|
|00001840| 63 74 65 72 73 5c 29 0a | 73 65 64 20 22 73 2f 5e |cters\).|sed "s/^|
|00001850| 58 2f 2f 22 20 3e 27 64 | 65 6d 6f 2e 64 62 27 20 |X//" >'d|emo.db' |
|00001860| 3c 3c 27 45 4e 44 5f 4f | 46 5f 46 49 4c 45 27 0a |<<'END_O|F_FILE'.|
|00001870| 58 23 4c 41 59 4f 55 54 | 20 46 49 52 53 54 4e 41 |X#LAYOUT| FIRSTNA|
|00001880| 4d 45 20 4e 41 4d 45 20 | 42 49 52 54 48 44 41 59 |ME NAME |BIRTHDAY|
|00001890| 20 41 44 44 52 45 53 53 | 0a 58 53 61 64 7c 53 61 | ADDRESS|.XSad|Sa|
|000018a0| 64 68 61 6e 61 20 53 68 | 61 68 7c 4a 75 6c 79 20 |dhana Sh|ah|July |
|000018b0| 38 7c 43 4d 49 45 2c 20 | 42 6f 6d 62 61 79 0a 58 |8|CMIE, |Bombay.X|
|000018c0| 53 75 73 61 6e 7c 53 75 | 73 61 6e 20 54 68 6f 6d |Susan|Su|san Thom|
|000018d0| 61 73 7c 4a 75 6c 79 20 | 33 30 7c 52 61 6e 64 20 |as|July |30|Rand |
|000018e0| 43 6f 72 70 6f 72 61 74 | 69 6f 6e 0a 45 4e 44 5f |Corporat|ion.END_|
|000018f0| 4f 46 5f 46 49 4c 45 0a | 69 66 20 74 65 73 74 20 |OF_FILE.|if test |
|00001900| 31 32 31 20 2d 6e 65 20 | 60 77 63 20 2d 63 20 3c |121 -ne |`wc -c <|
|00001910| 27 64 65 6d 6f 2e 64 62 | 27 60 3b 20 74 68 65 6e |'demo.db|'`; then|
|00001920| 0a 20 20 20 20 65 63 68 | 6f 20 73 68 61 72 3a 20 |.    ech|o shar: |
|00001930| 5c 22 27 64 65 6d 6f 2e | 64 62 27 5c 22 20 75 6e |\"'demo.|db'\" un|
|00001940| 70 61 63 6b 65 64 20 77 | 69 74 68 20 77 72 6f 6e |packed w|ith wron|
|00001950| 67 20 73 69 7a 65 21 0a | 66 69 0a 23 20 65 6e 64 |g size!.|fi.# end|
|00001960| 20 6f 66 20 27 64 65 6d | 6f 2e 64 62 27 0a 66 69 | of 'dem|o.db'.fi|
|00001970| 0a 69 66 20 74 65 73 74 | 20 2d 66 20 27 64 65 6d |.if test| -f 'dem|
|00001980| 6f 2e 6c 65 74 74 65 72 | 27 20 2d 61 20 22 24 7b |o.letter|' -a "${|
|00001990| 31 7d 22 20 21 3d 20 22 | 2d 63 22 20 3b 20 74 68 |1}" != "|-c" ; th|
|000019a0| 65 6e 20 0a 20 20 65 63 | 68 6f 20 73 68 61 72 3a |en .  ec|ho shar:|
|000019b0| 20 57 69 6c 6c 20 6e 6f | 74 20 63 6c 6f 62 62 65 | Will no|t clobbe|
|000019c0| 72 20 65 78 69 73 74 69 | 6e 67 20 66 69 6c 65 20 |r existi|ng file |
|000019d0| 5c 22 27 64 65 6d 6f 2e | 6c 65 74 74 65 72 27 5c |\"'demo.|letter'\|
|000019e0| 22 0a 65 6c 73 65 0a 65 | 63 68 6f 20 73 68 61 72 |".else.e|cho shar|
|000019f0| 3a 20 45 78 74 72 61 63 | 74 69 6e 67 20 5c 22 27 |: Extrac|ting \"'|
|00001a00| 64 65 6d 6f 2e 6c 65 74 | 74 65 72 27 5c 22 20 5c |demo.let|ter'\" \|
|00001a10| 28 39 34 20 63 68 61 72 | 61 63 74 65 72 73 5c 29 |(94 char|acters\)|
|00001a20| 0a 73 65 64 20 22 73 2f | 5e 58 2f 2f 22 20 3e 27 |.sed "s/|^X//" >'|
|00001a30| 64 65 6d 6f 2e 6c 65 74 | 74 65 72 27 20 3c 3c 27 |demo.let|ter' <<'|
|00001a40| 45 4e 44 5f 4f 46 5f 46 | 49 4c 45 27 0a 58 0a 58 |END_OF_F|ILE'.X.X|
|00001a50| 54 6f 0a 58 09 4e 41 4d | 45 0a 58 09 41 44 44 52 |To.X.NAM|E.X.ADDR|
|00001a60| 45 53 53 0a 58 0a 58 44 | 65 61 72 20 46 49 52 53 |ESS.X.XD|ear FIRS|
|00001a70| 54 4e 41 4d 45 2c 0a 58 | 0a 58 09 49 20 61 6c 6d |TNAME,.X|.X.I alm|
|00001a80| 6f 73 74 20 66 6f 72 67 | 6f 74 20 74 68 61 74 20 |ost forg|ot that |
|00001a90| 42 49 52 54 48 44 41 59 | 20 77 61 73 20 79 6f 75 |BIRTHDAY| was you|
|00001aa0| 72 20 62 69 72 74 68 64 | 61 79 21 0a 58 0a 58 09 |r birthd|ay!.X.X.|
|00001ab0| 2d 20 6d 65 0a 45 4e 44 | 5f 4f 46 5f 46 49 4c 45 |- me.END|_OF_FILE|
|00001ac0| 0a 69 66 20 74 65 73 74 | 20 39 34 20 2d 6e 65 20 |.if test| 94 -ne |
|00001ad0| 60 77 63 20 2d 63 20 3c | 27 64 65 6d 6f 2e 6c 65 |`wc -c <|'demo.le|
|00001ae0| 74 74 65 72 27 60 3b 20 | 74 68 65 6e 0a 20 20 20 |tter'`; |then.   |
|00001af0| 20 65 63 68 6f 20 73 68 | 61 72 3a 20 5c 22 27 64 | echo sh|ar: \"'d|
|00001b00| 65 6d 6f 2e 6c 65 74 74 | 65 72 27 5c 22 20 75 6e |emo.lett|er'\" un|
|00001b10| 70 61 63 6b 65 64 20 77 | 69 74 68 20 77 72 6f 6e |packed w|ith wron|
|00001b20| 67 20 73 69 7a 65 21 0a | 66 69 0a 23 20 65 6e 64 |g size!.|fi.# end|
|00001b30| 20 6f 66 20 27 64 65 6d | 6f 2e 6c 65 74 74 65 72 | of 'dem|o.letter|
|00001b40| 27 0a 66 69 0a 69 66 20 | 74 65 73 74 20 2d 66 20 |'.fi.if |test -f |
|00001b50| 27 6d 61 69 6c 6d 65 72 | 67 65 2e 61 77 6b 27 20 |'mailmer|ge.awk' |
|00001b60| 2d 61 20 22 24 7b 31 7d | 22 20 21 3d 20 22 2d 63 |-a "${1}|" != "-c|
|00001b70| 22 20 3b 20 74 68 65 6e | 20 0a 20 20 65 63 68 6f |" ; then| .  echo|
|00001b80| 20 73 68 61 72 3a 20 57 | 69 6c 6c 20 6e 6f 74 20 | shar: W|ill not |
|00001b90| 63 6c 6f 62 62 65 72 20 | 65 78 69 73 74 69 6e 67 |clobber |existing|
|00001ba0| 20 66 69 6c 65 20 5c 22 | 27 6d 61 69 6c 6d 65 72 | file \"|'mailmer|
|00001bb0| 67 65 2e 61 77 6b 27 5c | 22 0a 65 6c 73 65 0a 65 |ge.awk'\|".else.e|
|00001bc0| 63 68 6f 20 73 68 61 72 | 3a 20 45 78 74 72 61 63 |cho shar|: Extrac|
|00001bd0| 74 69 6e 67 20 5c 22 27 | 6d 61 69 6c 6d 65 72 67 |ting \"'|mailmerg|
|00001be0| 65 2e 61 77 6b 27 5c 22 | 20 5c 28 31 37 34 33 20 |e.awk'\"| \(1743 |
|00001bf0| 63 68 61 72 61 63 74 65 | 72 73 5c 29 0a 73 65 64 |characte|rs\).sed|
|00001c00| 20 22 73 2f 5e 58 2f 2f | 22 20 3e 27 6d 61 69 6c | "s/^X//|" >'mail|
|00001c10| 6d 65 72 67 65 2e 61 77 | 6b 27 20 3c 3c 27 45 4e |merge.aw|k' <<'EN|
|00001c20| 44 5f 4f 46 5f 46 49 4c | 45 27 0a 58 0a 58 42 45 |D_OF_FIL|E'.X.XBE|
|00001c30| 47 49 4e 20 7b 0a 58 09 | 23 20 72 65 63 61 6c 6c |GIN {.X.|# recall|
|00001c40| 20 76 61 72 69 61 62 6c | 65 20 4c 20 68 61 73 20 | variabl|e L has |
|00001c50| 62 65 65 6e 20 73 65 74 | 75 70 2e 0a 58 09 23 20 |been set|up..X.# |
|00001c60| 66 69 72 73 74 2c 20 77 | 65 20 73 77 61 6c 6c 6f |first, w|e swallo|
|00001c70| 77 20 74 68 65 20 66 69 | 6c 65 20 4c 20 69 6e 74 |w the fi|le L int|
|00001c80| 6f 20 74 68 65 20 28 69 | 6e 74 65 67 65 72 20 69 |o the (i|nteger i|
|00001c90| 6e 64 65 78 65 64 29 20 | 61 72 72 61 79 0a 58 09 |ndexed) |array.X.|
|00001ca0| 23 20 22 6c 65 74 5f 6c | 69 6e 65 73 22 2e 20 20 |# "let_l|ines".  |
|00001cb0| 54 68 65 20 76 61 72 69 | 61 62 6c 65 20 22 6c 69 |The vari|able "li|
|00001cc0| 6e 65 22 20 63 6f 6e 74 | 61 69 6e 73 20 74 68 65 |ne" cont|ains the|
|00001cd0| 20 6e 75 6d 62 65 72 20 | 6f 66 0a 58 09 23 20 6c | number |of.X.# l|
|00001ce0| 69 6e 65 73 20 69 6e 20 | 74 68 69 73 20 66 69 6c |ines in |this fil|
|00001cf0| 65 2c 20 61 74 20 74 68 | 65 20 65 6e 64 2e 0a 58 |e, at th|e end..X|
|00001d00| 09 6c 69 6e 65 20 3d 20 | 30 3b 0a 58 09 64 6f 20 |.line = |0;.X.do |
|00001d10| 7b 0a 58 09 09 65 6f 66 | 20 3d 20 67 65 74 6c 69 |{.X..eof| = getli|
|00001d20| 6e 65 20 73 20 3c 20 4c | 3b 0a 58 09 09 69 66 20 |ne s < L|;.X..if |
|00001d30| 28 65 6f 66 20 3e 20 30 | 29 20 7b 0a 58 09 09 09 |(eof > 0|) {.X...|
|00001d40| 09 6c 69 6e 65 2b 2b 3b | 20 0a 58 09 09 09 09 6c |.line++;| .X....l|
|00001d50| 65 74 5f 6c 69 6e 65 73 | 5b 6c 69 6e 65 5d 20 3d |et_lines|[line] =|
|00001d60| 20 73 3b 0a 58 09 09 09 | 7d 0a 58 09 7d 20 77 68 | s;.X...|}.X.} wh|
|00001d70| 69 6c 65 20 28 65 6f 66 | 20 3e 20 30 29 3b 0a 58 |ile (eof| > 0);.X|
|00001d80| 09 69 66 20 28 6c 69 6e | 65 20 3d 3d 20 30 29 20 |.if (lin|e == 0) |
|00001d90| 7b 0a 58 09 09 70 72 69 | 6e 74 20 22 6d 61 69 6c |{.X..pri|nt "mail|
|00001da0| 6d 65 72 67 65 2e 61 77 | 6b 3a 20 46 69 6c 65 20 |merge.aw|k: File |
|00001db0| 22 20 4c 20 22 20 64 6f | 65 73 20 6e 6f 74 20 65 |" L " do|es not e|
|00001dc0| 78 69 73 74 2e 22 20 3e | 20 22 2f 64 65 76 2f 74 |xist." >| "/dev/t|
|00001dd0| 74 79 22 3b 0a 58 09 09 | 67 6f 63 68 20 3d 20 31 |ty";.X..|goch = 1|
|00001de0| 3b 20 65 78 69 74 20 31 | 3b 0a 58 09 7d 0a 58 7d |; exit 1|;.X.}.X}|
|00001df0| 0a 58 0a 58 7b 74 61 6b | 65 6e 20 3d 20 30 7d 0a |.X.X{tak|en = 0}.|
|00001e00| 58 09 23 20 22 54 68 69 | 73 20 6c 69 6e 65 20 68 |X.# "Thi|s line h|
|00001e10| 61 73 20 6e 6f 74 20 79 | 65 74 20 62 65 65 6e 20 |as not y|et been |
|00001e20| 64 65 61 6c 74 20 77 69 | 74 68 2e 0a 58 0a 58 28 |dealt wi|th..X.X(|
|00001e30| 4e 46 20 3d 3d 20 30 29 | 20 7b 74 61 6b 65 6e 20 |NF == 0)| {taken |
|00001e40| 3d 20 31 7d 0a 58 09 23 | 20 49 67 6e 6f 72 65 20 |= 1}.X.#| Ignore |
|00001e50| 62 6c 61 6e 6b 20 6c 69 | 6e 65 73 20 28 69 2e 65 |blank li|nes (i.e|
|00001e60| 2e 2c 20 74 68 6f 73 65 | 20 77 69 74 68 20 6e 6f |., those| with no|
|00001e70| 20 66 69 65 6c 64 73 29 | 2e 0a 58 0a 58 23 20 4e | fields)|..X.X# N|
|00001e80| 6f 77 20 63 61 74 63 68 | 20 74 68 65 20 4c 41 59 |ow catch| the LAY|
|00001e90| 4f 55 54 20 6c 69 6e 65 | 3a 0a 58 2f 5e 23 4c 41 |OUT line|:.X/^#LA|
|00001ea0| 59 4f 55 54 2f 20 7b 0a | 58 09 74 61 6b 65 6e 20 |YOUT/ {.|X.taken |
|00001eb0| 3d 20 31 3b 0a 58 09 69 | 66 20 28 4e 46 20 3d 3d |= 1;.X.i|f (NF ==|
|00001ec0| 20 31 29 20 7b 0a 58 09 | 09 70 72 69 6e 74 20 22 | 1) {.X.|.print "|
|00001ed0| 6d 61 69 6c 6d 65 72 67 | 65 2e 61 77 6b 3a 20 4c |mailmerg|e.awk: L|
|00001ee0| 41 59 4f 55 54 20 6d 75 | 73 74 20 63 6f 6e 74 61 |AYOUT mu|st conta|
|00001ef0| 69 6e 20 73 6f 6d 65 20 | 66 69 65 6c 64 73 21 22 |in some |fields!"|
|00001f00| 20 3e 20 22 2f 64 65 76 | 2f 74 74 79 22 3b 0a 58 | > "/dev|/tty";.X|
|00001f10| 09 09 67 6f 63 68 20 3d | 20 31 3b 20 65 78 69 74 |..goch =| 1; exit|
|00001f20| 20 31 3b 0a 58 09 7d 0a | 58 09 66 6f 72 20 28 69 | 1;.X.}.|X.for (i|
|00001f30| 3d 32 3b 20 69 3c 3d 4e | 46 3b 20 69 2b 2b 29 20 |=2; i<=N|F; i++) |
|00001f40| 70 6f 73 69 74 69 6f 6e | 5b 24 69 5d 20 3d 20 69 |position|[$i] = i|
|00001f50| 2d 31 3b 0a 58 09 66 6e | 75 6d 20 3d 20 4e 46 2d |-1;.X.fn|um = NF-|
|00001f60| 31 3b 0a 58 09 09 23 20 | 6a 75 73 74 20 67 6f 62 |1;.X..# |just gob|
|00001f70| 62 6c 65 20 6c 61 79 6f | 75 74 20 69 6e 74 6f 20 |ble layo|ut into |
|00001f80| 22 70 6f 73 69 74 69 6f | 6e 22 20 61 73 73 6f 63 |"positio|n" assoc|
|00001f90| 69 61 74 69 76 65 20 61 | 72 72 61 79 2e 0a 58 09 |iative a|rray..X.|
|00001fa0| 67 6f 74 6c 61 79 6f 75 | 74 20 3d 20 31 3b 0a 58 |gotlayou|t = 1;.X|
|00001fb0| 7d 0a 58 0a 58 23 20 46 | 69 6e 61 6c 6c 79 2c 20 |}.X.X# F|inally, |
|00001fc0| 69 66 20 79 6f 75 20 68 | 61 76 65 20 61 20 6c 69 |if you h|ave a li|
|00001fd0| 6e 65 20 77 69 74 68 20 | 74 61 6b 65 6e 20 3d 3d |ne with |taken ==|
|00001fe0| 20 30 2c 20 69 74 27 73 | 20 61 20 6e 6f 72 6d 61 | 0, it's| a norma|
|00001ff0| 6c 20 44 42 20 6c 69 6e | 65 2e 0a 58 28 74 61 6b |l DB lin|e..X(tak|
|00002000| 65 6e 20 3d 3d 20 30 29 | 20 7b 0a 58 09 69 66 20 |en == 0)| {.X.if |
|00002010| 28 67 6f 74 6c 61 79 6f | 75 74 20 3d 3d 20 30 29 |(gotlayo|ut == 0)|
|00002020| 20 7b 0a 58 09 09 70 72 | 69 6e 74 20 22 6d 61 69 | {.X..pr|int "mai|
|00002030| 6c 6d 65 72 67 65 2e 61 | 77 6b 3a 20 44 61 74 61 |lmerge.a|wk: Data|
|00002040| 62 61 73 65 20 66 69 6c | 65 20 6d 75 73 74 20 63 |base fil|e must c|
|00002050| 6f 6e 74 61 69 6e 20 61 | 20 4c 41 59 4f 55 54 20 |ontain a| LAYOUT |
|00002060| 6c 69 6e 65 20 62 65 66 | 6f 72 65 20 61 6e 79 20 |line bef|ore any |
|00002070| 72 65 61 6c 20 64 61 74 | 61 2e 22 20 3e 20 22 2f |real dat|a." > "/|
|00002080| 64 65 76 2f 74 74 79 22 | 3b 0a 58 09 09 67 6f 63 |dev/tty"|;.X..goc|
|00002090| 68 20 3d 20 31 3b 20 65 | 78 69 74 20 31 3b 0a 58 |h = 1; e|xit 1;.X|
|000020a0| 09 7d 0a 58 0a 58 09 70 | 72 69 6e 74 20 22 22 3b |.}.X.X.p|rint "";|
|000020b0| 0a 58 09 70 72 69 6e 74 | 20 22 49 6e 70 75 74 20 |.X.print| "Input |
|000020c0| 6c 69 6e 65 20 3d 20 22 | 20 73 75 62 73 74 72 28 |line = "| substr(|
|000020d0| 24 30 2c 20 31 2c 20 35 | 30 29 20 22 20 2e 2e 2e |$0, 1, 5|0) " ...|
|000020e0| 22 3b 0a 58 0a 58 09 6e | 20 3d 20 73 70 6c 69 74 |";.X.X.n| = split|
|000020f0| 28 24 30 2c 20 77 6f 72 | 64 73 2c 20 22 7c 22 29 |($0, wor|ds, "|")|
|00002100| 3b 0a 58 09 69 66 20 28 | 6e 20 21 3d 20 66 6e 75 |;.X.if (|n != fnu|
|00002110| 6d 29 20 7b 0a 58 09 09 | 70 72 69 6e 74 20 22 6d |m) {.X..|print "m|
|00002120| 61 69 6c 6d 65 72 67 65 | 2e 61 77 6b 3a 20 45 72 |ailmerge|.awk: Er|
|00002130| 72 6f 72 20 6f 6e 20 4c | 69 6e 65 20 22 20 4e 52 |ror on L|ine " NR|
|00002140| 20 22 20 6f 66 20 64 61 | 74 61 62 61 73 65 22 20 | " of da|tabase" |
|00002150| 3e 20 22 2f 64 65 76 2f | 74 74 79 22 3b 0a 58 09 |> "/dev/|tty";.X.|
|00002160| 09 70 72 69 6e 74 20 22 | 09 28 45 78 70 65 63 74 |.print "|.(Expect|
|00002170| 20 22 20 66 6e 75 6d 20 | 22 20 66 69 65 6c 64 73 | " fnum |" fields|
|00002180| 2c 20 67 6f 74 20 22 20 | 6e 20 22 29 22 20 3e 20 |, got " |n ")" > |
|00002190| 22 2f 64 65 76 2f 74 74 | 79 22 3b 0a 58 09 7d 0a |"/dev/tt|y";.X.}.|
|000021a0| 58 0a 58 09 23 20 4e 6f | 77 20 77 65 27 72 65 20 |X.X.# No|w we're |
|000021b0| 61 6c 6c 20 73 65 74 20 | 74 6f 20 67 65 6e 65 72 |all set |to gener|
|000021c0| 61 74 65 20 63 6f 64 65 | 2e 0a 58 09 23 20 46 69 |ate code|..X.# Fi|
|000021d0| 72 73 74 20 67 65 6e 65 | 72 61 74 65 20 66 69 6c |rst gene|rate fil|
|000021e0| 65 6e 61 6d 65 2e 0a 58 | 09 6f 66 6e 20 3d 20 22 |ename..X|.ofn = "|
|000021f0| 6d 6d 5f 22 20 4c 20 22 | 2e 22 20 28 4e 52 2d 31 |mm_" L "|." (NR-1|
|00002200| 29 3b 0a 58 09 70 72 69 | 6e 74 20 22 47 65 6e 65 |);.X.pri|nt "Gene|
|00002210| 72 61 74 69 6e 67 20 66 | 69 6c 65 20 6e 61 6d 65 |rating f|ile name|
|00002220| 64 20 22 20 6f 66 6e 3b | 0a 58 0a 58 09 23 20 72 |d " ofn;|.X.X.# r|
|00002230| 75 6e 20 6f 76 65 72 20 | 6c 69 6e 65 73 20 6f 66 |un over |lines of|
|00002240| 20 6c 65 74 74 65 72 2c | 20 64 6f 69 6e 67 20 66 | letter,| doing f|
|00002250| 69 6e 64 2d 72 65 70 6c | 61 63 65 2e 0a 58 09 66 |ind-repl|ace..X.f|
|00002260| 6f 72 20 28 69 3d 31 3b | 20 69 3c 3d 6c 69 6e 65 |or (i=1;| i<=line|
|00002270| 3b 20 69 2b 2b 29 20 7b | 0a 58 09 09 73 20 3d 20 |; i++) {|.X..s = |
|00002280| 6c 65 74 5f 6c 69 6e 65 | 73 5b 69 5d 3b 0a 58 09 |let_line|s[i];.X.|
|00002290| 09 66 6f 72 20 28 76 20 | 69 6e 20 70 6f 73 69 74 |.for (v |in posit|
|000022a0| 69 6f 6e 29 0a 58 09 09 | 09 69 66 20 28 30 20 21 |ion).X..|.if (0 !|
|000022b0| 3d 20 69 6e 64 65 78 28 | 73 2c 20 76 29 29 09 23 |= index(|s, v)).#|
|000022c0| 20 6f 6e 6c 79 20 74 72 | 79 20 72 65 70 6c 61 63 | only tr|y replac|
|000022d0| 65 20 69 66 20 69 74 20 | 6d 61 74 63 68 65 73 0a |e if it |matches.|
|000022e0| 58 09 09 09 09 67 73 75 | 62 28 76 2c 20 77 6f 72 |X....gsu|b(v, wor|
|000022f0| 64 73 5b 70 6f 73 69 74 | 69 6f 6e 5b 76 5d 5d 2c |ds[posit|ion[v]],|
|00002300| 20 73 29 3b 0a 58 09 09 | 70 72 69 6e 74 20 73 20 | s);.X..|print s |
|00002310| 3e 20 6f 66 6e 3b 0a 58 | 09 7d 0a 58 7d 0a 58 0a |> ofn;.X|.}.X}.X.|
|00002320| 58 45 4e 44 20 7b 0a 58 | 09 69 66 20 28 67 6f 63 |XEND {.X|.if (goc|
|00002330| 68 20 3d 3d 20 31 29 20 | 65 78 69 74 20 31 3b 0a |h == 1) |exit 1;.|
|00002340| 58 7d 0a 45 4e 44 5f 4f | 46 5f 46 49 4c 45 0a 69 |X}.END_O|F_FILE.i|
|00002350| 66 20 74 65 73 74 20 31 | 37 34 33 20 2d 6e 65 20 |f test 1|743 -ne |
|00002360| 60 77 63 20 2d 63 20 3c | 27 6d 61 69 6c 6d 65 72 |`wc -c <|'mailmer|
|00002370| 67 65 2e 61 77 6b 27 60 | 3b 20 74 68 65 6e 0a 20 |ge.awk'`|; then. |
|00002380| 20 20 20 65 63 68 6f 20 | 73 68 61 72 3a 20 5c 22 |   echo |shar: \"|
|00002390| 27 6d 61 69 6c 6d 65 72 | 67 65 2e 61 77 6b 27 5c |'mailmer|ge.awk'\|
|000023a0| 22 20 75 6e 70 61 63 6b | 65 64 20 77 69 74 68 20 |" unpack|ed with |
|000023b0| 77 72 6f 6e 67 20 73 69 | 7a 65 21 0a 66 69 0a 23 |wrong si|ze!.fi.#|
|000023c0| 20 65 6e 64 20 6f 66 20 | 27 6d 61 69 6c 6d 65 72 | end of |'mailmer|
|000023d0| 67 65 2e 61 77 6b 27 0a | 66 69 0a 65 63 68 6f 20 |ge.awk'.|fi.echo |
|000023e0| 73 68 61 72 3a 20 45 6e | 64 20 6f 66 20 73 68 65 |shar: En|d of she|
|000023f0| 6c 6c 20 61 72 63 68 69 | 76 65 2e 0a 65 78 69 74 |ll archi|ve..exit|
|00002400| 20 30 0a 0a 2d 2d 20 0a | 5f 5f 5f 5f 5f 5f 5f 5f | 0..-- .|________|
|00002410| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00002420| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00002430| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00002440| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00002450| 5f 5f 5f 5f 5f 5f 5f 0a | 41 6a 61 79 20 53 68 61 |_______.|Ajay Sha|
|00002460| 68 2c 20 28 32 31 33 29 | 37 33 34 2d 33 39 33 30 |h, (213)|734-3930|
|00002470| 2c 20 61 6a 61 79 73 68 | 61 68 40 75 73 63 2e 65 |, ajaysh|ah@usc.e|
|00002480| 64 75 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |du.     |        |
|00002490| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000024a0| 54 68 65 20 6d 6f 72 65 | 20 74 68 69 6e 67 73 20 |The more| things |
|000024b0| 63 68 61 6e 67 65 2c 20 | 74 68 65 20 6d 6f 72 65 |change, |the more|
|000024c0| 20 74 68 65 79 20 73 74 | 61 79 20 69 6e 73 61 6e | they st|ay insan|
|000024d0| 65 2e 0a 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |e.._____|________|
|000024e0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000024f0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00002500| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00002510| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00002520| 5f 5f 0a 0a 65 78 69 74 | 20 30 20 23 20 4a 75 73 |__..exit| 0 # Jus|
|00002530| 74 20 69 6e 20 63 61 73 | 65 2e 2e 2e 0a          |t in cas|e....   |
+--------+-------------------------+-------------------------+--------+--------+