home *** CD-ROM | disk | FTP | other *** search
/ Acorn User 10 / AU_CD10.iso / Updates / Perl / Docs / !PerlDocs / Chapter28 / Text
Unknown  |  1997-07-17  |  65.2 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 14 04 01 00 01 00 00 00 | 00 00 00 00 06 08 00 00 |........|........|
|00000010| 00 08 00 00 01 10 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 10 00 00 02 18 00 00 | c8 00 00 00 00 00 00 00 |........|........|
|00000030| 07 38 c1 00 00 00 00 00 | 00 18 00 00 a5 84 00 00 |.8......|........|
|00000040| 43 ac 3d 07 40 25 ff ff | 60 73 ff ff d8 3b 00 00 |C.=.@%..|`s...;..|
|00000050| 16 00 00 00 b0 fc 07 00 | 00 00 00 00 07 38 c1 00 |........|.....8..|
|00000060| 07 38 c1 00 07 38 c1 00 | 00 00 00 00 70 65 72 6c |.8...8..|....perl|
|00000070| 65 6d 62 65 64 20 2d 20 | 68 6f 77 20 74 6f 20 65 |embed - |how to e|
|00000080| 6d 62 65 64 20 05 05 70 | 65 72 6c 20 69 6e 20 79 |mbed ..p|erl in y|
|00000090| 6f 75 72 20 43 20 70 72 | 6f 67 72 61 6d 0d 08 61 |our C pr|ogram..a|
|000000a0| 07 38 c1 00 00 00 00 00 | 07 00 50 13 08 0b 9d 00 |.8......|..P.....|
|000000b0| 08 0b 9d 00 00 00 00 00 | 05 00 00 00 00 84 00 00 |........|........|
|000000c0| a5 40 00 00 40 a2 5f 01 | a0 98 fe ff f0 de fe ff |.@..@._.|........|
|000000d0| 68 37 00 00 44 65 73 63 | 72 69 70 74 69 6f 6e 0d |h7..Desc|ription.|
|000000e0| 08 65 73 63 08 0c 9d 00 | 00 00 00 00 07 60 01 00 |.esc....|.....`..|
|000000f0| 0a 0d 9d 00 0a 0d 9d 00 | 00 00 00 00 00 40 00 00 |........|.....@..|
|00000100| a5 3c 00 00 40 02 ea 00 | 6f 38 fe ff 1f 6f fe ff |.<..@...|o8...o..|
|00000110| 18 2b 00 f0 50 72 65 61 | 6d 62 6c 65 0d 08 00 00 |.+..Prea|mble....|
|00000120| 0a 0e 9d 00 00 00 00 00 | 07 40 00 00 14 0f 9d 00 |........|.@......|
|00000130| 14 0f 9d 00 00 00 00 00 | 00 3c 00 00 a5 70 00 00 |........|.<...p..|
|00000140| 40 60 2f 01 3a e3 fd ff | 1a 12 fe ff 20 22 00 f0 |@`/.:...|.... "..|
|00000150| 44 6f 20 79 6f 75 20 77 | 61 6e 74 20 74 6f 3a 0d |Do you w|ant to:.|
|00000160| 08 00 00 00 14 00 00 00 | 00 00 00 00 07 6d 20 50 |........|.....m P|
|00000170| 13 10 9d 00 13 10 9d 00 | 00 00 00 00 07 10 9d 00 |........|........|
|00000180| 09 11 9d 00 13 10 9d 00 | 09 11 9d 00 00 00 00 00 |........|........|
|00000190| 07 10 9d 00 10 12 9d 00 | 13 10 9d 00 09 11 9d 00 |........|........|
|000001a0| 10 12 9d 00 00 00 00 00 | 00 70 00 00 a5 4c 00 00 |........|.p...L..|
|000001b0| 40 b0 5a 01 63 74 fd ff | 43 a3 fd ff 28 23 00 f0 |@.Z.ct..|C...(#..|
|000001c0| 55 73 65 20 43 20 66 72 | 6f 6d 20 50 65 72 6c 3f |Use C fr|om Perl?|
|000001d0| 08 00 00 00 10 00 00 00 | 13 10 9d 00 09 11 9d 00 |........|........|
|000001e0| 00 00 00 00 0d 08 05 05 | 09 13 9d 00 13 10 9d 00 |........|........|
|000001f0| 00 00 00 00 00 4c 00 00 | a5 d0 00 00 44 68 f7 03 |.....L..|....Dh..|
|00000200| 3c 3c fd ff 1c 6b fd ff | 20 22 00 f0 12 0d 07 05 |<<...k..| "......|
|00000210| 50 46 00 00 00 00 00 00 | 12 16 9d 00 70 17 00 00 |PF......|....p...|
|00000220| 00 00 00 00 52 65 61 64 | 20 74 68 65 20 63 68 61 |....Read| the cha|
|00000230| 70 74 65 72 20 07 00 00 | 10 14 9d 00 13 10 9d 00 |pter ...|........|
|00000240| 10 14 9d 00 00 00 00 00 | 70 65 72 6c 63 61 6c 6c |........|perlcall|
|00000250| 08 65 72 6c 10 00 00 00 | 13 10 9d 00 00 00 00 00 |.erl....|........|
|00000260| 20 61 6e 64 20 74 68 65 | 20 63 68 61 70 74 65 72 | and the| chapter|
|00000270| 20 07 9d 00 10 15 9d 00 | 13 10 9d 00 10 15 9d 00 | .......|........|
|00000280| 00 00 00 00 70 65 72 6c | 78 73 08 75 10 00 00 00 |....perl|xs.u....|
|00000290| 13 10 9d 00 00 00 00 00 | 2e 0d 07 07 09 16 9d 00 |........|........|
|000002a0| 13 10 9d 00 09 16 9d 00 | 00 00 00 00 07 79 73 74 |........|.....yst|
|000002b0| 10 17 9d 00 13 10 9d 00 | 09 16 9d 00 10 17 9d 00 |........|........|
|000002c0| 00 00 00 00 00 d0 00 00 | a5 58 00 00 40 4c 78 02 |........|.X..@Lx.|
|000002d0| 65 cd fc ff 45 fc fc ff | 28 23 00 f0 55 73 65 20 |e...E...|(#..Use |
|000002e0| 61 20 55 6e 69 78 20 70 | 72 6f 67 72 61 6d 20 66 |a Unix p|rogram f|
|000002f0| 72 6f 6d 20 50 65 72 6c | 3f 08 72 20 10 00 00 00 |rom Perl|?.r ....|
|00000300| 13 10 9d 00 09 16 9d 00 | 00 00 00 00 0d 08 00 00 |........|........|
|00000310| 09 18 9d 00 13 10 9d 00 | 00 00 00 00 00 58 00 00 |........|.....X..|
|00000320| a5 0c 01 00 44 1c 2f 06 | 3e 95 fc ff 1e c4 fc ff |....D./.|>.......|
|00000330| 20 22 00 f0 12 1e 9d 00 | 50 46 00 00 00 00 00 00 | "......|PF......|
|00000340| 12 1f 9d 00 70 17 00 00 | 00 00 00 00 52 65 61 64 |....p...|....Read|
|00000350| 20 61 62 6f 75 74 20 62 | 61 63 6b 2d 71 75 6f 74 | about b|ack-quot|
|00000360| 65 73 20 61 6e 64 20 61 | 62 6f 75 74 20 07 9d 00 |es and a|bout ...|
|00000370| 0e 19 9d 00 13 10 9d 00 | 0e 19 9d 00 00 00 00 00 |........|........|
|00000380| 73 79 73 74 65 6d 08 00 | 0e 1a 9d 00 13 10 9d 00 |system..|........|
|00000390| 00 00 00 00 20 61 6e 64 | 20 07 64 6f 0e 1b 9d 00 |.... and| .do....|
|000003a0| 13 10 9d 00 0e 1b 9d 00 | 00 00 00 00 65 78 65 63 |........|....exec|
|000003b0| 08 72 20 07 0e 1c 9d 00 | 13 10 9d 00 00 00 00 00 |.r .....|........|
|000003c0| 20 69 6e 20 74 68 65 20 | 63 68 61 70 74 65 72 20 | in the |chapter |
|000003d0| 07 00 00 00 10 1d 9d 00 | 13 10 9d 00 10 1d 9d 00 |........|........|
|000003e0| 00 00 00 00 70 65 72 6c | 66 75 6e 63 08 6e 74 72 |....perl|func.ntr|
|000003f0| 10 00 00 00 13 10 9d 00 | 00 00 00 00 2e 0d 07 72 |........|.......r|
|00000400| 09 1e 9d 00 13 10 9d 00 | 09 1e 9d 00 00 00 00 00 |........|........|
|00000410| 07 00 00 00 10 1f 9d 00 | 13 10 9d 00 09 1e 9d 00 |........|........|
|00000420| 10 1f 9d 00 00 00 00 00 | 00 0c 01 00 a5 4c 00 00 |........|.....L..|
|00000430| 40 24 8c 01 67 26 fc ff | 47 55 fc ff 28 23 00 f0 |@$..g&..|GU..(#..|
|00000440| 55 73 65 20 50 65 72 6c | 20 66 72 6f 6d 20 50 65 |Use Perl| from Pe|
|00000450| 72 6c 3f 08 10 00 00 00 | 13 10 9d 00 09 1e 9d 00 |rl?.....|........|
|00000460| 00 00 00 00 0d 08 00 00 | 09 20 9d 00 13 10 9d 00 |........|. ......|
|00000470| 00 00 00 00 00 4c 00 00 | 85 e0 00 00 04 74 d8 07 |.....L..|.....t..|
|00000480| 40 ee fb ff 20 1d fc ff | 20 22 00 f0 12 22 20 65 |@... ...| "..." e|
|00000490| 50 46 00 00 00 00 00 00 | 12 68 65 20 70 17 00 00 |PF......|.he p...|
|000004a0| 00 00 00 00 52 65 61 64 | 20 61 62 6f 75 74 20 74 |....Read| about t|
|000004b0| 68 65 20 22 64 6f 22 20 | 65 6e 74 72 79 20 69 6e |he "do" |entry in|
|000004c0| 20 74 68 65 20 63 68 61 | 70 74 65 72 20 07 00 00 | the cha|pter ...|
|000004d0| 10 21 9d 00 13 10 9d 00 | 10 21 9d 00 00 00 00 00 |.!......|.!......|
|000004e0| 70 65 72 6c 66 75 6e 63 | 08 26 9d 00 10 00 00 00 |perlfunc|.&......|
|000004f0| 13 10 9d 00 00 00 00 00 | 20 61 6e 64 20 74 68 65 |........| and the|
|00000500| 20 22 65 76 61 6c 22 20 | 65 6e 74 72 79 20 69 6e | "eval" |entry in|
|00000510| 20 74 68 65 20 63 68 61 | 70 74 65 72 20 07 05 05 | the cha|pter ...|
|00000520| 10 22 9d 00 13 10 9d 00 | 10 22 9d 00 00 00 00 00 |."......|."......|
|00000530| 70 65 72 6c 66 75 6e 63 | 08 72 20 64 10 00 00 00 |perlfunc|.r d....|
|00000540| 13 10 9d 00 00 00 00 00 | 20 61 6e 64 20 74 68 65 |........| and the|
|00000550| 20 00 00 00 00 e0 00 00 | a5 dc 00 00 40 5c 13 06 | .......|....@\..|
|00000560| 19 b6 fb ff f9 e4 fb ff | 20 22 00 f0 22 72 65 71 |........| ".."req|
|00000570| 75 69 72 65 22 20 65 6e | 74 72 79 20 69 6e 20 74 |uire" en|try in t|
|00000580| 68 65 20 63 68 61 70 74 | 65 72 20 07 10 23 9d 00 |he chapt|er ..#..|
|00000590| 13 10 9d 00 10 23 9d 00 | 00 00 00 00 70 65 72 6c |.....#..|....perl|
|000005a0| 66 75 6e 63 08 64 20 6f | 10 00 00 00 13 10 9d 00 |func.d o|........|
|000005b0| 00 00 00 00 20 61 6e 64 | 20 74 68 65 20 22 75 73 |.... and| the "us|
|000005c0| 65 22 20 65 6e 74 72 79 | 20 69 6e 20 74 68 65 20 |e" entry| in the |
|000005d0| 63 68 61 70 74 65 72 20 | 07 00 00 00 10 24 9d 00 |chapter |.....$..|
|000005e0| 13 10 9d 00 10 24 9d 00 | 00 00 00 00 70 65 72 6c |.....$..|....perl|
|000005f0| 66 75 6e 63 08 00 00 00 | 10 00 00 00 13 10 9d 00 |func....|........|
|00000600| 00 00 00 00 2e 0d 07 43 | 09 25 9d 00 13 10 9d 00 |.......C|.%......|
|00000610| 09 25 9d 00 00 00 00 00 | 07 00 00 00 10 26 9d 00 |.%......|.....&..|
|00000620| 13 10 9d 00 09 25 9d 00 | 10 26 9d 00 00 00 00 00 |.....%..|.&......|
|00000630| 00 dc 00 00 a5 48 00 00 | 40 3c 29 01 42 47 fb ff |.....H..|@<).BG..|
|00000640| 22 76 fb ff 28 23 00 f0 | 55 73 65 20 43 20 66 72 |"v..(#..|Use C fr|
|00000650| 6f 6d 20 43 3f 08 65 63 | 10 00 00 00 13 10 9d 00 |om C?.ec|........|
|00000660| 09 25 9d 00 00 00 00 00 | 0d 08 65 20 09 27 9d 00 |.%......|..e .'..|
|00000670| 13 10 9d 00 00 00 00 00 | 00 48 00 00 a5 70 00 00 |........|.H...p..|
|00000680| 44 ac e5 01 1b 0f fb ff | fb 3d fb ff 20 22 00 f0 |D.......|.=.. "..|
|00000690| 12 20 69 6e 50 46 00 00 | 00 00 00 00 12 20 74 6f |. inPF..|..... to|
|000006a0| 70 17 00 00 00 00 00 00 | 52 65 74 68 69 6e 6b 20 |p.......|Rethink |
|000006b0| 79 6f 75 72 20 64 65 73 | 69 67 6e 2e 0d 07 68 61 |your des|ign...ha|
|000006c0| 09 28 9d 00 13 10 9d 00 | 09 28 9d 00 00 00 00 00 |.(......|.(......|
|000006d0| 07 00 00 00 10 29 9d 00 | 13 10 9d 00 09 28 9d 00 |.....)..|.....(..|
|000006e0| 10 29 9d 00 00 00 00 00 | 00 70 00 00 a5 4c 00 00 |.)......|.p...L..|
|000006f0| 40 b0 5a 01 44 a0 fa ff | 24 cf fa ff 28 23 00 f0 |@.Z.D...|$...(#..|
|00000700| 55 73 65 20 50 65 72 6c | 20 66 72 6f 6d 20 43 3f |Use Perl| from C?|
|00000710| 08 63 68 61 10 00 00 00 | 13 10 9d 00 09 28 9d 00 |.cha....|.....(..|
|00000720| 00 00 00 00 0d 08 00 00 | 09 2a 9d 00 13 10 9d 00 |........|.*......|
|00000730| 00 00 00 00 00 4c 00 00 | a5 54 00 00 44 d4 1b 01 |.....L..|.T..D...|
|00000740| 1d 68 fa ff fd 96 fa ff | 20 22 00 f0 12 20 43 20 |.h......| "... C |
|00000750| 50 46 00 00 00 00 00 00 | 12 00 00 00 70 17 00 00 |PF......|....p...|
|00000760| 00 00 00 00 52 65 61 64 | 20 6f 6e 2e 2e 2e 0d 08 |....Read| on.....|
|00000770| 13 2b 9d 00 00 00 00 00 | 07 00 00 00 0a 2c 9d 00 |.+......|.....,..|
|00000780| 0a 2c 9d 00 00 00 00 00 | 00 54 00 00 a5 2c 00 00 |.,......|.T...,..|
|00000790| 40 12 ed 00 76 f1 f9 ff | 26 28 fa ff 18 2b 00 f0 |@...v...|&(...+..|
|000007a0| 52 6f 61 64 6d 61 70 0d | 08 69 6f 6e 0a 2d 9d 00 |Roadmap.|.ion.-..|
|000007b0| 00 00 00 00 00 2c 00 00 | a5 68 00 00 40 c4 ff 02 |.....,..|.h..@...|
|000007c0| 41 9c f9 ff 21 cb f9 ff | 20 22 00 f0 74 68 65 20 |A...!...| "..the |
|000007d0| 63 68 61 70 74 65 72 20 | 07 07 05 05 10 2e 9d 00 |chapter |........|
|000007e0| 10 2e 9d 00 00 00 00 00 | 43 6f 6d 70 69 6c 69 6e |........|Compilin|
|000007f0| 67 20 79 6f 75 72 20 43 | 20 70 72 6f 67 72 61 6d |g your C| program|
|00000800| 08 61 63 6b 10 00 00 00 | 00 00 00 00 0d 07 20 43 |.ack....|...... C|
|00000810| 14 2f 9d 00 14 2f 9d 00 | 00 00 00 00 00 68 00 00 |./.../..|.....h..|
|00000820| a5 54 00 00 40 b8 a4 03 | 6a 2d f9 ff 4a 5c f9 ff |.T..@...|j-..J\..|
|00000830| 20 22 00 f0 54 68 65 72 | 65 27 73 20 6f 6e 65 20 | "..Ther|e's one |
|00000840| 65 78 61 6d 70 6c 65 20 | 69 6e 20 65 61 63 68 20 |example |in each |
|00000850| 6f 66 20 74 68 65 20 65 | 69 67 68 74 20 73 65 63 |of the e|ight sec|
|00000860| 74 69 6f 6e 73 3a 0d 08 | 14 00 00 00 00 00 00 00 |tions:..|........|
|00000870| 00 54 00 00 a5 6c 00 00 | 40 80 5d 04 93 be f8 ff |.T...l..|@.].....|
|00000880| 73 ed f8 ff 20 22 00 f0 | 74 68 65 20 63 68 61 70 |s... "..|the chap|
|00000890| 74 65 72 20 07 6e 67 20 | 10 30 9d 00 10 30 9d 00 |ter .ng |.0...0..|
|000008a0| 00 00 00 00 41 64 64 69 | 6e 67 20 61 20 50 65 72 |....Addi|ng a Per|
|000008b0| 6c 20 69 6e 74 65 72 70 | 72 65 74 65 72 20 74 6f |l interp|reter to|
|000008c0| 20 79 6f 75 72 20 43 20 | 70 72 6f 67 72 61 6d 08 | your C |program.|
|000008d0| 10 00 00 00 00 00 00 00 | 0d 00 00 00 00 6c 00 00 |........|.....l..|
|000008e0| a5 70 00 00 40 ac 91 04 | bc 4f f8 ff 9c 7e f8 ff |.p..@...|.O...~..|
|000008f0| 20 22 00 f0 74 68 65 20 | 63 68 61 70 74 65 72 20 | "..the |chapter |
|00000900| 07 75 73 65 10 31 9d 00 | 10 31 9d 00 00 00 00 00 |.use.1..|.1......|
|00000910| 43 61 6c 6c 69 6e 67 20 | 61 20 50 65 72 6c 20 73 |Calling |a Perl s|
|00000920| 75 62 72 6f 75 74 69 6e | 65 20 66 72 6f 6d 20 79 |ubroutin|e from y|
|00000930| 6f 75 72 20 43 20 70 72 | 6f 67 72 61 6d 08 61 74 |our C pr|ogram.at|
|00000940| 10 00 00 00 00 00 00 00 | 0d 00 00 00 00 70 00 00 |........|.....p..|
|00000950| a5 70 00 00 40 80 c6 04 | e5 e0 f7 ff c5 0f f8 ff |.p..@...|........|
|00000960| 20 22 00 f0 74 68 65 20 | 63 68 61 70 74 65 72 20 | "..the |chapter |
|00000970| 07 75 74 20 10 32 9d 00 | 10 32 9d 00 00 00 00 00 |.ut .2..|.2......|
|00000980| 45 76 61 6c 75 61 74 69 | 6e 67 20 61 20 50 65 72 |Evaluati|ng a Per|
|00000990| 6c 20 73 74 61 74 65 6d | 65 6e 74 20 66 72 6f 6d |l statem|ent from|
|000009a0| 20 79 6f 75 72 20 43 20 | 70 72 6f 67 72 61 6d 08 | your C |program.|
|000009b0| 10 00 00 00 00 00 00 00 | 0d 00 00 00 00 70 00 00 |........|.....p..|
|000009c0| a5 88 00 00 40 6c 93 06 | 0e 72 f7 ff ee a0 f7 ff |....@l..|.r......|
|000009d0| 20 22 00 f0 74 68 65 20 | 63 68 61 70 74 65 72 20 | "..the |chapter |
|000009e0| 07 3a 9d 00 10 33 9d 00 | 10 33 9d 00 00 00 00 00 |.:...3..|.3......|
|000009f0| 50 65 72 66 6f 72 6d 69 | 6e 67 20 50 65 72 6c 20 |Performi|ng Perl |
|00000a00| 70 61 74 74 65 72 6e 20 | 6d 61 74 63 68 65 73 20 |pattern |matches |
|00000a10| 61 6e 64 20 73 75 62 73 | 74 69 74 75 74 69 6f 6e |and subs|titution|
|00000a20| 73 20 66 72 6f 6d 20 79 | 6f 75 72 20 43 20 70 72 |s from y|our C pr|
|00000a30| 6f 67 72 61 6d 08 69 6e | 10 00 00 00 00 00 00 00 |ogram.in|........|
|00000a40| 0d 00 00 00 00 88 00 00 | a5 74 00 00 40 48 c5 04 |........|.t..@H..|
|00000a50| 37 03 f7 ff 17 32 f7 ff | 20 22 00 f0 74 68 65 20 |7....2..| "..the |
|00000a60| 63 68 61 70 74 65 72 20 | 07 6e 61 6c 10 34 9d 00 |chapter |.nal.4..|
|00000a70| 10 34 9d 00 00 00 00 00 | 46 69 64 64 6c 69 6e 67 |.4......|Fiddling|
|00000a80| 20 77 69 74 68 20 74 68 | 65 20 50 65 72 6c 20 73 | with th|e Perl s|
|00000a90| 74 61 63 6b 20 66 72 6f | 6d 20 79 6f 75 72 20 43 |tack fro|m your C|
|00000aa0| 20 70 72 6f 67 72 61 6d | 08 20 50 45 10 00 00 00 | program|. PE....|
|00000ab0| 00 00 00 00 0d 00 00 00 | 00 74 00 00 a5 68 00 00 |........|.t...h..|
|00000ac0| 40 68 ac 03 60 94 f6 ff | 40 c3 f6 ff 20 22 00 f0 |@h..`...|@... "..|
|00000ad0| 74 68 65 20 63 68 61 70 | 74 65 72 20 07 79 20 43 |the chap|ter .y C|
|00000ae0| 10 35 9d 00 10 35 9d 00 | 00 00 00 00 4d 61 69 6e |.5...5..|....Main|
|00000af0| 74 61 69 6e 69 6e 67 20 | 61 20 70 65 72 73 69 73 |taining |a persis|
|00000b00| 74 65 6e 74 20 69 6e 74 | 65 72 70 72 65 74 65 72 |tent int|erpreter|
|00000b10| 08 3c 9d 00 10 00 00 00 | 00 00 00 00 0d 00 00 00 |.<......|........|
|00000b20| 00 68 00 00 a5 6c 00 00 | 40 d4 2d 04 89 25 f6 ff |.h...l..|@.-..%..|
|00000b30| 69 54 f6 ff 20 22 00 f0 | 74 68 65 20 63 68 61 70 |iT.. "..|the chap|
|00000b40| 74 65 72 20 07 6b 3f 20 | 10 36 9d 00 10 36 9d 00 |ter .k? |.6...6..|
|00000b50| 00 00 00 00 4d 61 69 6e | 74 61 69 6e 69 6e 67 20 |....Main|taining |
|00000b60| 6d 75 6c 74 69 70 6c 65 | 20 69 6e 74 65 72 70 72 |multiple| interpr|
|00000b70| 65 74 65 72 20 69 6e 73 | 74 61 6e 63 65 73 08 6f |eter ins|tances.o|
|00000b80| 10 00 00 00 00 00 00 00 | 0d 00 00 00 00 6c 00 00 |........|.....l..|
|00000b90| a5 8c 00 00 40 c0 cc 06 | b2 b6 f5 ff 92 e5 f5 ff |....@...|........|
|00000ba0| 20 22 00 f0 74 68 65 20 | 63 68 61 70 74 65 72 20 | "..the |chapter |
|00000bb0| 07 20 63 72 10 37 9d 00 | 10 37 9d 00 00 00 00 00 |. cr.7..|.7......|
|00000bc0| 55 73 69 6e 67 20 50 65 | 72 6c 20 6d 6f 64 75 6c |Using Pe|rl modul|
|00000bd0| 65 73 2c 20 77 68 69 63 | 68 20 74 68 65 6d 73 65 |es, whic|h themse|
|00000be0| 6c 76 65 73 20 75 73 65 | 20 43 20 6c 69 62 72 61 |lves use| C libra|
|00000bf0| 72 69 65 73 2c 20 66 72 | 6f 6d 20 79 6f 75 72 20 |ries, fr|om your |
|00000c00| 43 20 70 72 6f 67 72 61 | 6d 08 6f 6c 10 00 00 00 |C progra|m.ol....|
|00000c10| 00 00 00 00 0d 00 00 00 | 00 8c 00 00 05 84 00 00 |........|........|
|00000c20| 00 84 ce 07 db 47 f5 ff | bb 76 f5 ff 20 22 00 f0 |.....G..|.v.. "..|
|00000c30| 54 68 69 73 20 64 6f 63 | 75 6d 65 6e 74 61 74 69 |This doc|umentati|
|00000c40| 6f 6e 20 69 73 20 55 6e | 69 78 20 73 70 65 63 69 |on is Un|ix speci|
|00000c50| 66 69 63 3b 20 69 66 20 | 79 6f 75 20 68 61 76 65 |fic; if |you have|
|00000c60| 20 69 6e 66 6f 72 6d 61 | 74 69 6f 6e 20 61 62 6f | informa|tion abo|
|00000c70| 75 74 20 68 6f 77 20 74 | 6f 20 65 6d 62 65 64 20 |ut how t|o embed |
|00000c80| 50 65 72 6c 20 6f 6e 20 | 6f 74 68 65 72 20 70 6c |Perl on |other pl|
|00000c90| 61 74 66 6f 72 6d 73 2c | 20 00 00 00 00 84 00 00 |atforms,| .......|
|00000ca0| a5 64 00 00 40 84 60 03 | b4 0f f5 ff 94 3e f5 ff |.d..@.`.|.....>..|
|00000cb0| 20 22 00 f0 70 6c 65 61 | 73 65 20 73 65 6e 64 20 | "..plea|se send |
|00000cc0| 65 2d 6d 61 69 6c 20 74 | 6f 20 3c 07 06 38 9d 00 |e-mail t|o <..8..|
|00000cd0| 06 38 9d 00 00 00 00 00 | 6f 72 77 61 6e 74 40 74 |.8......|orwant@t|
|00000ce0| 70 6a 2e 63 6f 6d 08 20 | 06 39 9d 00 00 00 00 00 |pj.com. |.9......|
|00000cf0| 3e 2e 0d 07 0a 3a 9d 00 | 0a 3a 9d 00 00 00 00 00 |>....:..|.:......|
|00000d00| 00 64 00 00 a5 3c 00 00 | 40 26 7e 02 0d 99 f4 ff |.d...<..|@&~.....|
|00000d10| bd cf f4 ff 18 2b 00 f0 | 43 6f 6d 70 69 6c 69 6e |.....+..|Compilin|
|00000d20| 67 20 79 6f 75 72 20 43 | 20 70 72 6f 67 72 61 6d |g your C| program|
|00000d30| 0d 08 70 72 0a 3b 9d 00 | 00 00 00 00 00 3c 00 00 |..pr.;..|.....<..|
|00000d40| 05 80 00 00 00 f4 4f 07 | d8 43 f4 ff b8 72 f4 ff |......O.|.C...r..|
|00000d50| 20 22 00 f0 49 66 20 79 | 6f 75 20 68 61 76 65 20 | "..If y|ou have |
|00000d60| 74 72 6f 75 62 6c 65 20 | 63 6f 6d 70 69 6c 69 6e |trouble |compilin|
|00000d70| 67 20 74 68 65 20 73 63 | 72 69 70 74 73 20 69 6e |g the sc|ripts in|
|00000d80| 20 74 68 69 73 20 64 6f | 63 75 6d 65 6e 74 61 74 | this do|cumentat|
|00000d90| 69 6f 6e 2c 20 79 6f 75 | 27 72 65 20 6e 6f 74 20 |ion, you|'re not |
|00000da0| 61 6c 6f 6e 65 2e 20 20 | 54 68 65 20 63 61 72 64 |alone. |The card|
|00000db0| 69 6e 61 6c 20 72 75 6c | 65 3a 20 00 00 80 00 00 |inal rul|e: .....|
|00000dc0| 01 10 00 00 00 04 c4 07 | 00 00 00 00 00 10 00 00 |........|........|
|00000dd0| 02 14 00 00 64 02 00 00 | 00 00 00 00 00 00 00 00 |....d...|........|
|00000de0| 00 14 00 00 05 70 00 00 | 00 04 c4 07 cf 44 f2 ff |.....p..|.....D..|
|00000df0| af 73 f2 ff 20 22 00 f0 | 16 00 00 00 b0 fc 07 00 |.s.. "..|........|
|00000e00| 00 00 00 00 43 4f 4d 50 | 49 4c 45 20 54 48 45 20 |....COMP|ILE THE |
|00000e10| 50 52 4f 47 52 41 4d 53 | 20 49 4e 20 45 58 41 43 |PROGRAMS| IN EXAC|
|00000e20| 54 4c 59 20 54 48 45 20 | 53 41 4d 45 20 57 41 59 |TLY THE |SAME WAY|
|00000e30| 20 54 48 41 54 20 59 4f | 55 52 20 50 45 52 4c 20 | THAT YO|UR PERL |
|00000e40| 57 41 53 20 43 4f 4d 50 | 49 4c 45 44 2e 20 20 00 |WAS COMP|ILED. .|
|00000e50| 00 70 00 00 25 30 00 00 | 40 68 63 01 a8 0c f2 ff |.p..%0..|@hc.....|
|00000e60| 88 3b f2 ff 20 22 00 f0 | 28 53 6f 72 72 79 20 66 |.;.. "..|(Sorry f|
|00000e70| 6f 72 20 79 65 6c 6c 69 | 6e 67 2e 29 0d 00 00 00 |or yelli|ng.)....|
|00000e80| 00 30 00 00 85 9c 00 00 | 00 38 66 07 d1 9d f1 ff |.0......|.8f.....|
|00000e90| b1 cc f1 ff 20 22 00 f0 | 41 6c 73 6f 2c 20 65 76 |.... "..|Also, ev|
|00000ea0| 65 72 79 20 43 20 70 72 | 6f 67 72 61 6d 20 74 68 |ery C pr|ogram th|
|00000eb0| 61 74 20 75 73 65 73 20 | 50 65 72 6c 20 6d 75 73 |at uses |Perl mus|
|00000ec0| 74 20 6c 69 6e 6b 20 69 | 6e 20 74 68 65 20 07 0d |t link i|n the ..|
|00000ed0| 11 3c 9d 00 11 3c 9d 00 | 00 00 00 00 70 65 72 6c |.<...<..|....perl|
|00000ee0| 20 6c 69 62 72 61 72 79 | 08 70 68 61 11 00 00 00 | library|.pha....|
|00000ef0| 00 00 00 00 2e 20 57 68 | 61 74 27 73 20 74 68 61 |..... Wh|at's tha|
|00000f00| 74 2c 20 79 6f 75 20 61 | 73 6b 3f 20 20 50 65 72 |t, you a|sk? Per|
|00000f10| 6c 20 69 73 20 69 74 73 | 65 6c 66 20 00 9c 00 00 |l is its|elf ....|
|00000f20| 05 84 00 00 00 18 95 07 | aa 65 f1 ff 8a 94 f1 ff |........|.e......|
|00000f30| 20 22 00 f0 77 72 69 74 | 74 65 6e 20 69 6e 20 43 | "..writ|ten in C|
|00000f40| 3b 20 74 68 65 20 70 65 | 72 6c 20 6c 69 62 72 61 |; the pe|rl libra|
|00000f50| 72 79 20 69 73 20 74 68 | 65 20 63 6f 6c 6c 65 63 |ry is th|e collec|
|00000f60| 74 69 6f 6e 20 6f 66 20 | 63 6f 6d 70 69 6c 65 64 |tion of |compiled|
|00000f70| 20 43 20 70 72 6f 67 72 | 61 6d 73 20 74 68 61 74 | C progr|ams that|
|00000f80| 20 77 65 72 65 20 75 73 | 65 64 20 74 6f 20 63 72 | were us|ed to cr|
|00000f90| 65 61 74 65 20 79 6f 75 | 72 20 70 65 72 6c 20 00 |eate you|r perl .|
|00000fa0| 00 84 00 00 85 a4 00 00 | 00 18 e9 07 83 2d f1 ff |........|.....-..|
|00000fb0| 63 5c f1 ff 20 22 00 f0 | 65 78 65 63 75 74 61 62 |c\.. "..|executab|
|00000fc0| 6c 65 20 28 07 69 67 75 | 11 3d 9d 00 11 3d 9d 00 |le (.igu|.=...=..|
|00000fd0| 00 00 00 00 2f 75 73 72 | 2f 62 69 6e 2f 70 65 72 |..../usr|/bin/per|
|00000fe0| 6c 08 69 6e 11 00 00 00 | 00 00 00 00 20 6f 72 20 |l.in....|.... or |
|00000ff0| 65 71 75 69 76 61 6c 65 | 6e 74 29 2e 20 20 28 43 |equivale|nt). (C|
|00001000| 6f 72 6f 6c 6c 61 72 79 | 3a 20 79 6f 75 20 63 61 |orollary|: you ca|
|00001010| 6e 27 74 20 75 73 65 20 | 50 65 72 6c 20 66 72 6f |n't use |Perl fro|
|00001020| 6d 20 79 6f 75 72 20 43 | 20 70 72 6f 67 72 61 6d |m your C| program|
|00001030| 20 75 6e 6c 65 73 73 20 | 50 65 72 6c 20 68 61 73 | unless |Perl has|
|00001040| 20 00 00 00 00 a4 00 00 | 05 7c 00 00 00 68 2a 07 | .......|.|...h*.|
|00001050| 5c f5 f0 ff 3c 24 f1 ff | 20 22 00 f0 62 65 65 6e |\...<$..| "..been|
|00001060| 20 63 6f 6d 70 69 6c 65 | 64 20 6f 6e 20 79 6f 75 | compile|d on you|
|00001070| 72 20 6d 61 63 68 69 6e | 65 2c 20 6f 72 20 69 6e |r machin|e, or in|
|00001080| 73 74 61 6c 6c 65 64 20 | 70 72 6f 70 65 72 6c 79 |stalled |properly|
|00001090| 2d 2d 74 68 61 74 27 73 | 20 77 68 79 20 79 6f 75 |--that's| why you|
|000010a0| 20 73 68 6f 75 6c 64 6e | 27 74 20 62 6c 69 74 68 | shouldn|'t blith|
|000010b0| 65 6c 79 20 63 6f 70 79 | 20 50 65 72 6c 20 00 00 |ely copy| Perl ..|
|000010c0| 00 7c 00 00 a5 80 00 00 | 40 28 ab 05 35 bd f0 ff |.|......|@(..5...|
|000010d0| 15 ec f0 ff 20 22 00 f0 | 65 78 65 63 75 74 61 62 |.... "..|executab|
|000010e0| 6c 65 73 20 66 72 6f 6d | 20 6d 61 63 68 69 6e 65 |les from| machine|
|000010f0| 20 74 6f 20 6d 61 63 68 | 69 6e 65 20 77 69 74 68 | to mach|ine with|
|00001100| 6f 75 74 20 61 6c 73 6f | 20 63 6f 70 79 69 6e 67 |out also| copying|
|00001110| 20 74 68 65 20 07 70 72 | 11 3e 9d 00 11 3e 9d 00 | the .pr|.>...>..|
|00001120| 00 00 00 00 6c 69 62 08 | 11 00 00 00 00 00 00 00 |....lib.|........|
|00001130| 20 64 69 72 65 63 74 6f | 72 79 2e 29 0d 00 00 00 | directo|ry.)....|
|00001140| 00 80 00 00 85 9c 00 00 | 00 60 ce 07 5e 4e f0 ff |........|.`..^N..|
|00001150| 3e 7d f0 ff 20 22 00 f0 | 57 68 65 6e 20 79 6f 75 |>}.. "..|When you|
|00001160| 20 75 73 65 20 50 65 72 | 6c 20 66 72 6f 6d 20 43 | use Per|l from C|
|00001170| 2c 20 79 6f 75 72 20 43 | 20 70 72 6f 67 72 61 6d |, your C| program|
|00001180| 20 77 69 6c 6c 2d 2d 75 | 73 75 61 6c 6c 79 2d 2d | will--u|sually--|
|00001190| 61 6c 6c 6f 63 61 74 65 | 2c 20 22 72 75 6e 22 2c |allocate|, "run",|
|000011a0| 20 61 6e 64 20 64 65 61 | 6c 6c 6f 63 61 74 65 20 | and dea|llocate |
|000011b0| 61 20 07 00 11 3f 9d 00 | 11 3f 9d 00 00 00 00 00 |a ...?..|.?......|
|000011c0| 50 65 72 6c 49 6e 74 65 | 72 70 72 65 74 65 72 08 |PerlInte|rpreter.|
|000011d0| 11 00 00 00 00 00 00 00 | 20 00 00 00 00 9c 00 00 |........| .......|
|000011e0| a5 54 00 00 40 68 25 03 | 37 16 f0 ff 17 45 f0 ff |.T..@h%.|7....E..|
|000011f0| 20 22 00 f0 6f 62 6a 65 | 63 74 2c 20 77 68 69 63 | "..obje|ct, whic|
|00001200| 68 20 69 73 20 64 65 66 | 69 6e 65 64 20 62 79 20 |h is def|ined by |
|00001210| 74 68 65 20 70 65 72 6c | 20 6c 69 62 72 61 72 79 |the perl| library|
|00001220| 2e 0d 07 74 14 40 9d 00 | 14 40 9d 00 00 00 00 00 |...t.@..|.@......|
|00001230| 00 54 00 00 05 84 00 00 | 00 04 a6 07 60 a7 ef ff |.T......|....`...|
|00001240| 40 d6 ef ff 20 22 00 f0 | 49 66 20 79 6f 75 72 20 |@... "..|If your |
|00001250| 63 6f 70 79 20 6f 66 20 | 50 65 72 6c 20 69 73 20 |copy of |Perl is |
|00001260| 72 65 63 65 6e 74 20 65 | 6e 6f 75 67 68 20 74 6f |recent e|nough to|
|00001270| 20 63 6f 6e 74 61 69 6e | 20 74 68 69 73 20 64 6f | contain| this do|
|00001280| 63 75 6d 65 6e 74 61 74 | 69 6f 6e 20 28 76 65 72 |cumentat|ion (ver|
|00001290| 73 69 6f 6e 20 35 2e 30 | 30 32 20 6f 72 20 6c 61 |sion 5.0|02 or la|
|000012a0| 74 65 72 29 2c 20 74 68 | 65 6e 20 74 68 65 20 70 |ter), th|en the p|
|000012b0| 65 72 6c 20 00 84 00 00 | a5 f4 00 00 40 f4 91 07 |erl ....|....@...|
|000012c0| 39 6f ef ff 19 9e ef ff | 20 22 00 f0 6c 69 62 72 |9o......| "..libr|
|000012d0| 61 72 79 20 28 61 6e 64 | 20 07 6e 64 11 41 9d 00 |ary (and| .nd.A..|
|000012e0| 14 40 9d 00 11 41 9d 00 | 00 00 00 00 45 58 54 45 |.@...A..|....EXTE|
|000012f0| 52 4e 2e 68 08 00 00 00 | 11 00 00 00 14 40 9d 00 |RN.h....|.....@..|
|00001300| 00 00 00 00 20 61 6e 64 | 20 07 63 68 11 42 9d 00 |.... and| .ch.B..|
|00001310| 14 40 9d 00 11 42 9d 00 | 00 00 00 00 70 65 72 6c |.@...B..|....perl|
|00001320| 2e 68 08 20 11 00 00 00 | 14 40 9d 00 00 00 00 00 |.h. ....|.@......|
|00001330| 2c 20 77 68 69 63 68 20 | 79 6f 75 27 6c 6c 20 61 |, which |you'll a|
|00001340| 6c 73 6f 20 6e 65 65 64 | 29 20 77 69 6c 6c 20 72 |lso need|) will r|
|00001350| 65 73 69 64 65 20 69 6e | 20 61 20 64 69 72 65 63 |eside in| a direc|
|00001360| 74 6f 72 79 20 74 68 61 | 74 20 6c 6f 6f 6b 73 20 |tory tha|t looks |
|00001370| 6c 69 6b 65 20 74 68 69 | 73 3a 0d 08 14 00 00 00 |like thi|s:......|
|00001380| 00 00 00 00 07 70 73 20 | 12 43 9d 00 12 43 9d 00 |.....ps |.C...C..|
|00001390| 00 00 00 00 07 20 62 79 | 0c 44 9d 00 12 43 9d 00 |..... by|.D...C..|
|000013a0| 0c 44 9d 00 00 00 00 00 | 00 f4 00 00 a5 74 00 00 |.D......|.....t..|
|000013b0| 40 00 65 04 32 08 ef ff | 42 2f ef ff 70 1a 00 f0 |@.e.2...|B/..p...|
|000013c0| 2f 75 73 72 2f 6c 6f 63 | 61 6c 2f 6c 69 62 2f 70 |/usr/loc|al/lib/p|
|000013d0| 65 72 6c 35 2f 79 6f 75 | 72 5f 61 72 63 68 69 74 |erl5/you|r_archit|
|000013e0| 65 63 74 75 72 65 5f 68 | 65 72 65 2f 43 4f 52 45 |ecture_h|ere/CORE|
|000013f0| 0d 08 05 05 0c 45 9d 00 | 12 43 9d 00 00 00 00 00 |.....E..|.C......|
|00001400| 08 76 9d 00 12 00 00 00 | 00 00 00 00 07 08 05 05 |.v......|........|
|00001410| 18 46 9d 00 18 46 9d 00 | 00 00 00 00 00 74 00 00 |.F...F..|.....t..|
|00001420| a5 24 00 00 40 00 00 00 | a2 f3 ee ff 62 00 ef ff |.$..@...|....b...|
|00001430| 00 00 00 f0 0d 08 70 65 | 18 47 9d 00 00 00 00 00 |......pe|.G......|
|00001440| 00 24 00 00 a5 4c 00 00 | 40 00 14 01 d2 9a ee ff |.$...L..|@.......|
|00001450| b2 c9 ee ff 20 22 00 f0 | 6f 72 20 70 65 72 68 61 |.... "..|or perha|
|00001460| 70 73 20 6a 75 73 74 0d | 07 68 65 20 12 48 9d 00 |ps just.|.he .H..|
|00001470| 12 48 9d 00 00 00 00 00 | 07 79 9d 00 0c 49 9d 00 |.H......|.y...I..|
|00001480| 12 48 9d 00 0c 49 9d 00 | 00 00 00 00 00 4c 00 00 |.H...I..|.....L..|
|00001490| a5 5c 00 00 40 f0 49 02 | cb 33 ee ff db 5a ee ff |.\..@.I.|.3...Z..|
|000014a0| 70 1a 00 f0 2f 75 73 72 | 2f 6c 6f 63 61 6c 2f 6c |p.../usr|/local/l|
|000014b0| 69 62 2f 70 65 72 6c 35 | 2f 43 4f 52 45 0d 08 69 |ib/perl5|/CORE..i|
|000014c0| 0c 4a 9d 00 12 48 9d 00 | 00 00 00 00 08 72 20 79 |.J...H..|.....r y|
|000014d0| 12 00 00 00 00 00 00 00 | 07 00 00 00 18 4b 9d 00 |........|.....K..|
|000014e0| 18 4b 9d 00 00 00 00 00 | 00 5c 00 00 a5 24 00 00 |.K......|.\...$..|
|000014f0| 40 00 00 00 3b 1f ee ff | fb 2b ee ff 00 00 00 f0 |@...;...|.+......|
|00001500| 0d 08 00 00 18 4c 9d 00 | 00 00 00 00 00 24 00 00 |.....L..|.....$..|
|00001510| a5 54 00 00 40 d0 d0 01 | 6b c6 ed ff 4b f5 ed ff |.T..@...|k...K...|
|00001520| 20 22 00 f0 6f 72 20 6d | 61 79 62 65 20 73 6f 6d | "..or m|aybe som|
|00001530| 65 74 68 69 6e 67 20 6c | 69 6b 65 0d 07 20 2d 65 |ething l|ike.. -e|
|00001540| 12 4d 9d 00 12 4d 9d 00 | 00 00 00 00 07 7c 9d 00 |.M...M..|.....|..|
|00001550| 0c 4e 9d 00 12 4d 9d 00 | 0c 4e 9d 00 00 00 00 00 |.N...M..|.N......|
|00001560| 00 54 00 00 a5 58 00 00 | 40 50 bd 01 64 5f ed ff |.T...X..|@P..d_..|
|00001570| 74 86 ed ff 70 1a 00 f0 | 2f 75 73 72 2f 6f 70 74 |t...p...|/usr/opt|
|00001580| 2f 70 65 72 6c 35 2f 43 | 4f 52 45 0d 08 7f 9d 00 |/perl5/C|ORE.....|
|00001590| 0c 4f 9d 00 12 4d 9d 00 | 00 00 00 00 08 3a 45 6d |.O...M..|.....:Em|
|000015a0| 12 00 00 00 00 00 00 00 | 07 00 00 00 18 50 9d 00 |........|.....P..|
|000015b0| 18 50 9d 00 00 00 00 00 | 00 58 00 00 a5 34 00 00 |.P......|.X...4..|
|000015c0| 40 00 00 00 d4 4a ed ff | 94 57 ed ff 00 00 00 f0 |@....J..|.W......|
|000015d0| 0d 08 62 75 18 51 9d 00 | 00 00 00 00 07 20 63 61 |..bu.Q..|..... ca|
|000015e0| 14 52 9d 00 14 52 9d 00 | 00 00 00 00 00 34 00 00 |.R...R..|.....4..|
|000015f0| a5 84 00 00 40 b0 6c 04 | 04 f2 ec ff e4 20 ed ff |....@.l.|..... ..|
|00001600| 20 22 00 f0 45 78 65 63 | 75 74 65 20 74 68 69 73 | "..Exec|ute this|
|00001610| 20 73 74 61 74 65 6d 65 | 6e 74 20 66 6f 72 20 61 | stateme|nt for a|
|00001620| 20 68 69 6e 74 20 61 62 | 6f 75 74 20 77 68 65 72 | hint ab|out wher|
|00001630| 65 20 74 6f 20 66 69 6e | 64 20 43 4f 52 45 3a 0d |e to fin|d CORE:.|
|00001640| 08 75 6d 65 14 00 00 00 | 00 00 00 00 07 61 6d 65 |.ume....|.....ame|
|00001650| 12 53 9d 00 12 53 9d 00 | 00 00 00 00 07 72 6c 20 |.S...S..|.....rl |
|00001660| 0c 54 9d 00 12 53 9d 00 | 0c 54 9d 00 00 00 00 00 |.T...S..|.T......|
|00001670| 00 84 00 00 a5 6c 00 00 | 40 f0 c0 03 fd 8a ec ff |.....l..|@.......|
|00001680| 0d b2 ec ff 70 1a 00 f0 | 70 65 72 6c 20 2d 4d 43 |....p...|perl -MC|
|00001690| 6f 6e 66 69 67 20 2d 65 | 20 27 70 72 69 6e 74 20 |onfig -e| 'print |
|000016a0| 24 43 6f 6e 66 69 67 7b | 61 72 63 68 6c 69 62 7d |$Config{|archlib}|
|000016b0| 27 0d 08 05 0c 55 9d 00 | 12 53 9d 00 00 00 00 00 |'....U..|.S......|
|000016c0| 08 78 74 55 12 00 00 00 | 00 00 00 00 07 65 64 08 |.xtU....|.....ed.|
|000016d0| 18 56 9d 00 18 56 9d 00 | 00 00 00 00 00 6c 00 00 |.V...V..|.....l..|
|000016e0| a5 34 00 00 40 00 00 00 | 6d 76 ec ff 2d 83 ec ff |.4..@...|mv..-...|
|000016f0| 00 00 00 f0 0d 08 20 73 | 18 57 9d 00 00 00 00 00 |...... s|.W......|
|00001700| 07 65 20 66 14 58 9d 00 | 14 58 9d 00 00 00 00 00 |.e f.X..|.X......|
|00001710| 00 34 00 00 85 94 00 00 | 00 88 f1 07 9d 1d ec ff |.4......|........|
|00001720| 7d 4c ec ff 20 22 00 f0 | 48 65 72 65 27 73 20 68 |}L.. "..|Here's h|
|00001730| 6f 77 20 79 6f 75 27 64 | 20 63 6f 6d 70 69 6c 65 |ow you'd| compile|
|00001740| 20 74 68 65 20 65 78 61 | 6d 70 6c 65 20 69 6e 20 | the exa|mple in |
|00001750| 74 68 65 20 6e 65 78 74 | 20 73 65 63 74 69 6f 6e |the next| section|
|00001760| 2c 20 74 68 65 20 63 68 | 61 70 74 65 72 20 07 05 |, the ch|apter ..|
|00001770| 10 59 9d 00 14 58 9d 00 | 10 59 9d 00 00 00 00 00 |.Y...X..|.Y......|
|00001780| 41 64 64 69 6e 67 20 61 | 20 50 65 72 6c 20 69 6e |Adding a| Perl in|
|00001790| 74 65 72 70 72 65 74 65 | 72 20 74 6f 20 79 6f 75 |terprete|r to you|
|000017a0| 72 20 43 20 00 94 00 00 | a5 6c 00 00 40 e8 18 02 |r C ....|.l..@...|
|000017b0| 76 e5 eb ff 56 14 ec ff | 28 23 00 f0 70 72 6f 67 |v...V...|(#..prog|
|000017c0| 72 61 6d 08 10 00 00 00 | 14 58 9d 00 00 00 00 00 |ram.....|.X......|
|000017d0| 2c 20 6f 6e 20 6d 79 20 | 4c 69 6e 75 78 20 62 6f |, on my |Linux bo|
|000017e0| 78 3a 0d 08 14 00 00 00 | 00 00 00 00 07 64 20 65 |x:......|.....d e|
|000017f0| 12 5a 9d 00 12 5a 9d 00 | 00 00 00 00 07 65 64 64 |.Z...Z..|.....edd|
|00001800| 0c 5b 9d 00 12 5a 9d 00 | 0c 5b 9d 00 00 00 00 00 |.[...Z..|.[......|
|00001810| 00 6c 00 00 25 50 00 00 | 40 30 da 04 6f 7e eb ff |.l..%P..|@0..o~..|
|00001820| 7f a5 eb ff 70 1a 00 f0 | 25 20 67 63 63 20 2d 4f |....p...|% gcc -O|
|00001830| 32 20 2d 44 62 6f 6f 6c | 3d 63 68 61 72 20 2d 44 |2 -Dbool|=char -D|
|00001840| 48 41 53 5f 42 4f 4f 4c | 20 2d 49 2f 75 73 72 2f |HAS_BOOL| -I/usr/|
|00001850| 6c 6f 63 61 6c 2f 69 6e | 63 6c 75 64 65 0d 00 00 |local/in|clude...|
|00001860| 00 50 00 00 25 48 00 00 | 40 40 07 04 8f 4f eb ff |.P..%H..|@@...O..|
|00001870| 9f 76 eb ff 70 1a 00 f0 | 2d 49 2f 75 73 72 2f 6c |.v..p...|-I/usr/l|
|00001880| 6f 63 61 6c 2f 6c 69 62 | 2f 70 65 72 6c 35 2f 69 |ocal/lib|/perl5/i|
|00001890| 35 38 36 2d 6c 69 6e 75 | 78 2f 35 2e 30 30 33 2f |586-linu|x/5.003/|
|000018a0| 43 4f 52 45 0d 00 00 00 | 00 48 00 00 25 48 00 00 |CORE....|.H..%H..|
|000018b0| 40 40 07 04 af 20 eb ff | bf 47 eb ff 70 1a 00 f0 |@@... ..|.G..p...|
|000018c0| 2d 4c 2f 75 73 72 2f 6c | 6f 63 61 6c 2f 6c 69 62 |-L/usr/l|ocal/lib|
|000018d0| 2f 70 65 72 6c 35 2f 69 | 35 38 36 2d 6c 69 6e 75 |/perl5/i|586-linu|
|000018e0| 78 2f 35 2e 30 30 33 2f | 43 4f 52 45 0d 00 00 00 |x/5.003/|CORE....|
|000018f0| 00 48 00 00 a5 60 00 00 | 40 b0 a7 02 cf f1 ea ff |.H...`..|@.......|
|00001900| df 18 eb ff 70 1a 00 f0 | 2d 6f 20 69 6e 74 65 72 |....p...|-o inter|
|00001910| 70 20 69 6e 74 65 72 70 | 2e 63 20 2d 6c 70 65 72 |p interp|.c -lper|
|00001920| 6c 20 2d 6c 6d 0d 08 00 | 0c 5c 9d 00 12 5a 9d 00 |l -lm...|.\...Z..|
|00001930| 00 00 00 00 08 86 9d 00 | 12 00 00 00 00 00 00 00 |........|........|
|00001940| 07 69 6e 63 18 5d 9d 00 | 18 5d 9d 00 00 00 00 00 |.inc.]..|.]......|
|00001950| 00 60 00 00 a5 34 00 00 | 40 00 00 00 3f dd ea ff |.`...4..|@...?...|
|00001960| ff e9 ea ff 00 00 00 f0 | 0d 08 74 68 18 5e 9d 00 |........|..th.^..|
|00001970| 00 00 00 00 07 73 74 72 | 14 5f 9d 00 14 5f 9d 00 |.....str|._..._..|
|00001980| 00 00 00 00 00 34 00 00 | a5 a4 00 00 40 e8 bc 06 |.....4..|....@...|
|00001990| 6f 84 ea ff 4f b3 ea ff | 20 22 00 f0 28 54 68 61 |o...O...| "..(Tha|
|000019a0| 74 27 73 20 61 6c 6c 20 | 6f 6e 65 20 6c 69 6e 65 |t's all |one line|
|000019b0| 2e 29 20 20 4f 6e 20 6d | 79 20 44 45 43 20 41 6c |.) On m|y DEC Al|
|000019c0| 70 68 61 20 72 75 6e 6e | 69 6e 67 20 35 2e 30 30 |pha runn|ing 5.00|
|000019d0| 33 5f 30 35 2c 20 74 68 | 65 20 69 6e 63 61 6e 74 |3_05, th|e incant|
|000019e0| 61 74 69 6f 6e 20 69 73 | 20 61 20 62 69 74 20 64 |ation is| a bit d|
|000019f0| 69 66 66 65 72 65 6e 74 | 3a 0d 08 05 14 00 00 00 |ifferent|:.......|
|00001a00| 00 00 00 00 07 05 05 05 | 12 60 9d 00 12 60 9d 00 |........|.`...`..|
|00001a10| 00 00 00 00 07 05 05 05 | 0c 61 9d 00 12 60 9d 00 |........|.a...`..|
|00001a20| 0c 61 9d 00 00 00 00 00 | 00 a4 00 00 25 50 00 00 |.a......|....%P..|
|00001a30| 40 10 09 05 68 1d ea ff | 78 44 ea ff 70 1a 00 f0 |@...h...|xD..p...|
|00001a40| 25 20 63 63 20 2d 4f 32 | 20 2d 4f 6c 69 6d 69 74 |% cc -O2| -Olimit|
|00001a50| 20 32 39 30 30 20 2d 44 | 53 54 41 4e 44 41 52 44 | 2900 -D|STANDARD|
|00001a60| 5f 43 20 2d 49 2f 75 73 | 72 2f 6c 6f 63 61 6c 2f |_C -I/us|r/local/|
|00001a70| 69 6e 63 6c 75 64 65 0d | 00 50 00 00 25 4c 00 00 |include.|.P..%L..|
|00001a80| 40 70 7c 04 88 ee e9 ff | 98 15 ea ff 70 1a 00 f0 |@p|.....|....p...|
|00001a90| 2d 49 2f 75 73 72 2f 6c | 6f 63 61 6c 2f 6c 69 62 |-I/usr/l|ocal/lib|
|00001aa0| 2f 70 65 72 6c 35 2f 61 | 6c 70 68 61 2d 64 65 63 |/perl5/a|lpha-dec|
|00001ab0| 5f 6f 73 66 2f 35 2e 30 | 30 33 30 35 2f 43 4f 52 |_osf/5.0|0305/COR|
|00001ac0| 45 0d 00 00 00 4c 00 00 | 25 5c 00 00 40 e0 0a 06 |E....L..|%\..@...|
|00001ad0| a8 bf e9 ff b8 e6 e9 ff | 70 1a 00 f0 2d 4c 2f 75 |........|p...-L/u|
|00001ae0| 73 72 2f 6c 6f 63 61 6c | 2f 6c 69 62 2f 70 65 72 |sr/local|/lib/per|
|00001af0| 6c 35 2f 61 6c 70 68 61 | 2d 64 65 63 5f 6f 73 66 |l5/alpha|-dec_osf|
|00001b00| 2f 35 2e 30 30 33 30 35 | 2f 43 4f 52 45 20 2d 4c |/5.00305|/CORE -L|
|00001b10| 2f 75 73 72 2f 6c 6f 63 | 61 6c 2f 6c 69 62 0d 00 |/usr/loc|al/lib..|
|00001b20| 00 5c 00 00 a5 7c 00 00 | 40 60 4f 05 c8 90 e9 ff |.\...|..|@`O.....|
|00001b30| d8 b7 e9 ff 70 1a 00 f0 | 2d 44 5f 5f 4c 41 4e 47 |....p...|-D__LANG|
|00001b40| 55 41 47 45 5f 43 5f 5f | 20 2d 44 5f 4e 4f 5f 50 |UAGE_C__| -D_NO_P|
|00001b50| 52 4f 54 4f 20 2d 6f 20 | 69 6e 74 65 72 70 20 69 |ROTO -o |interp i|
|00001b60| 6e 74 65 72 70 2e 63 20 | 2d 6c 70 65 72 6c 20 2d |nterp.c |-lperl -|
|00001b70| 6c 6d 0d 08 0c 62 9d 00 | 12 60 9d 00 00 00 00 00 |lm...b..|.`......|
|00001b80| 08 20 20 20 12 00 00 00 | 00 00 00 00 07 72 75 63 |. ....|.....ruc|
|00001b90| 18 63 9d 00 18 63 9d 00 | 00 00 00 00 00 7c 00 00 |.c...c..|.....|..|
|00001ba0| a5 24 00 00 40 00 00 00 | 38 7c e9 ff f8 88 e9 ff |.$..@...|8|......|
|00001bb0| 00 00 00 f0 0d 08 08 05 | 18 64 9d 00 00 00 00 00 |........|.d......|
|00001bc0| 00 24 00 00 85 98 00 00 | 00 f8 ed 07 68 23 e9 ff |.$......|....h#..|
|00001bd0| 48 52 e9 ff 20 22 00 f0 | 48 6f 77 20 63 61 6e 20 |HR.. "..|How can |
|00001be0| 79 6f 75 20 66 69 67 75 | 72 65 20 6f 75 74 20 77 |you figu|re out w|
|00001bf0| 68 61 74 20 74 6f 20 61 | 64 64 3f 20 20 41 73 73 |hat to a|dd? Ass|
|00001c00| 75 6d 69 6e 67 20 79 6f | 75 72 20 50 65 72 6c 20 |uming yo|ur Perl |
|00001c10| 69 73 20 70 6f 73 74 2d | 35 2e 30 30 31 2c 20 65 |is post-|5.001, e|
|00001c20| 78 65 63 75 74 65 20 61 | 20 07 65 72 0e 65 9d 00 |xecute a| .er.e..|
|00001c30| 0e 65 9d 00 00 00 00 00 | 70 65 72 6c 20 2d 56 08 |.e......|perl -V.|
|00001c40| 0e 66 9d 00 00 00 00 00 | 20 63 6f 6d 6d 61 6e 64 |.f......| command|
|00001c50| 20 61 6e 64 20 00 00 00 | 00 98 00 00 25 58 00 00 | and ...|....%X..|
|00001c60| 40 0c 4d 04 41 eb e8 ff | 21 1a e9 ff 20 22 00 f0 |@.M.A...|!... "..|
|00001c70| 70 61 79 20 73 70 65 63 | 69 61 6c 20 61 74 74 65 |pay spec|ial atte|
|00001c80| 6e 74 69 6f 6e 20 74 6f | 20 74 68 65 20 22 63 63 |ntion to| the "cc|
|00001c90| 22 20 61 6e 64 20 22 63 | 63 66 6c 61 67 73 22 20 |" and "c|cflags" |
|00001ca0| 69 6e 66 6f 72 6d 61 74 | 69 6f 6e 2e 0d 00 00 00 |informat|ion.....|
|00001cb0| 00 58 00 00 85 c0 00 00 | 00 4c b2 07 6a 7c e8 ff |.X......|.L..j|..|
|00001cc0| 4a ab e8 ff 20 22 00 f0 | 59 6f 75 27 6c 6c 20 68 |J... "..|You'll h|
|00001cd0| 61 76 65 20 74 6f 20 63 | 68 6f 6f 73 65 20 74 68 |ave to c|hoose th|
|00001ce0| 65 20 61 70 70 72 6f 70 | 72 69 61 74 65 20 63 6f |e approp|riate co|
|00001cf0| 6d 70 69 6c 65 72 20 28 | 07 6c 6c 20 11 67 9d 00 |mpiler (|.ll .g..|
|00001d00| 11 67 9d 00 00 00 00 00 | 63 63 08 00 11 00 00 00 |.g......|cc......|
|00001d10| 00 00 00 00 2c 20 07 20 | 11 68 9d 00 11 68 9d 00 |...., . |.h...h..|
|00001d20| 00 00 00 00 67 63 63 08 | 11 00 00 00 00 00 00 00 |....gcc.|........|
|00001d30| 2c 20 65 74 20 61 6c 2e | 29 20 66 6f 72 20 79 6f |, et al.|) for yo|
|00001d40| 75 72 20 6d 61 63 68 69 | 6e 65 3a 20 07 6e 74 65 |ur machi|ne: .nte|
|00001d50| 0e 69 9d 00 0e 69 9d 00 | 00 00 00 00 70 65 72 6c |.i...i..|....perl|
|00001d60| 20 2d 4d 43 6f 6e 66 69 | 67 20 2d 65 20 00 00 00 | -MConfi|g -e ...|
|00001d70| 00 c0 00 00 a5 50 00 00 | 40 a4 f1 03 43 44 e8 ff |.....P..|@...CD..|
|00001d80| 23 73 e8 ff ba 1f 00 f0 | 27 70 72 69 6e 74 20 24 |#s......|'print $|
|00001d90| 43 6f 6e 66 69 67 7b 63 | 63 7d 27 08 0e 6a 9d 00 |Config{c|c}'..j..|
|00001da0| 00 00 00 00 20 77 69 6c | 6c 20 74 65 6c 6c 20 79 |.... wil|l tell y|
|00001db0| 6f 75 20 77 68 61 74 20 | 74 6f 20 75 73 65 2e 0d |ou what |to use..|
|00001dc0| 00 50 00 00 85 a0 00 00 | 00 d0 8b 07 6c d5 e7 ff |.P......|....l...|
|00001dd0| 4c 04 e8 ff 20 22 00 f0 | 59 6f 75 27 6c 6c 20 61 |L... "..|You'll a|
|00001de0| 6c 73 6f 20 68 61 76 65 | 20 74 6f 20 63 68 6f 6f |lso have| to choo|
|00001df0| 73 65 20 74 68 65 20 61 | 70 70 72 6f 70 72 69 61 |se the a|ppropria|
|00001e00| 74 65 20 6c 69 62 72 61 | 72 79 20 64 69 72 65 63 |te libra|ry direc|
|00001e10| 74 6f 72 79 20 28 07 00 | 11 6b 9d 00 11 6b 9d 00 |tory (..|.k...k..|
|00001e20| 00 00 00 00 2f 75 73 72 | 2f 6c 6f 63 61 6c 2f 6c |..../usr|/local/l|
|00001e30| 69 62 2f 2e 2e 2e 08 65 | 11 00 00 00 00 00 00 00 |ib/....e|........|
|00001e40| 29 20 66 6f 72 20 79 6f | 75 72 20 6d 61 63 68 69 |) for yo|ur machi|
|00001e50| 6e 65 2e 20 20 49 66 20 | 79 6f 75 72 20 00 00 00 |ne. If |your ...|
|00001e60| 00 a0 00 00 85 9c 00 00 | 00 58 6d 07 45 9d e7 ff |........|.Xm.E...|
|00001e70| 25 cc e7 ff 20 22 00 f0 | 63 6f 6d 70 69 6c 65 72 |%... "..|compiler|
|00001e80| 20 63 6f 6d 70 6c 61 69 | 6e 73 20 74 68 61 74 20 | complai|ns that |
|00001e90| 63 65 72 74 61 69 6e 20 | 66 75 6e 63 74 69 6f 6e |certain |function|
|00001ea0| 73 20 61 72 65 20 75 6e | 64 65 66 69 6e 65 64 2c |s are un|defined,|
|00001eb0| 20 6f 72 20 74 68 61 74 | 20 69 74 20 63 61 6e 27 | or that| it can'|
|00001ec0| 74 20 6c 6f 63 61 74 65 | 20 07 9d 00 11 6c 9d 00 |t locate| ....l..|
|00001ed0| 11 6c 9d 00 00 00 00 00 | 2d 6c 70 65 72 6c 08 70 |.l......|-lperl.p|
|00001ee0| 11 00 00 00 00 00 00 00 | 2c 20 74 68 65 6e 20 79 |........|, then y|
|00001ef0| 6f 75 20 6e 65 65 64 20 | 74 6f 20 00 00 9c 00 00 |ou need |to .....|
|00001f00| 85 cc 00 00 00 c4 6d 07 | 1e 65 e7 ff fe 93 e7 ff |......m.|.e......|
|00001f10| 20 22 00 f0 63 68 61 6e | 67 65 20 74 68 65 20 70 | "..chan|ge the p|
|00001f20| 61 74 68 20 66 6f 6c 6c | 6f 77 69 6e 67 20 74 68 |ath foll|owing th|
|00001f30| 65 20 07 74 0e 6d 9d 00 | 0e 6d 9d 00 00 00 00 00 |e .t.m..|.m......|
|00001f40| 2d 4c 08 39 0e 6e 9d 00 | 00 00 00 00 2e 20 20 49 |-L.9.n..|..... I|
|00001f50| 66 20 69 74 20 63 6f 6d | 70 6c 61 69 6e 73 20 74 |f it com|plains t|
|00001f60| 68 61 74 20 69 74 20 63 | 61 6e 27 74 20 66 69 6e |hat it c|an't fin|
|00001f70| 64 20 07 05 11 6f 9d 00 | 11 6f 9d 00 00 00 00 00 |d ...o..|.o......|
|00001f80| 45 58 54 45 52 4e 2e 68 | 08 00 00 00 11 00 00 00 |EXTERN.h|........|
|00001f90| 00 00 00 00 20 61 6e 64 | 20 07 00 00 11 70 9d 00 |.... and| ....p..|
|00001fa0| 11 70 9d 00 00 00 00 00 | 70 65 72 6c 2e 68 08 00 |.p......|perl.h..|
|00001fb0| 11 00 00 00 00 00 00 00 | 2c 20 79 6f 75 20 6e 65 |........|, you ne|
|00001fc0| 65 64 20 74 6f 20 00 00 | 00 cc 00 00 a5 54 00 00 |ed to ..|.....T..|
|00001fd0| 40 e4 7c 02 f7 2c e7 ff | d7 5b e7 ff 20 22 00 f0 |@.|..,..|.[.. "..|
|00001fe0| 63 68 61 6e 67 65 20 74 | 68 65 20 70 61 74 68 20 |change t|he path |
|00001ff0| 66 6f 6c 6c 6f 77 69 6e | 67 20 74 68 65 20 07 20 |followin|g the . |
|00002000| 0e 71 9d 00 0e 71 9d 00 | 00 00 00 00 2d 49 08 74 |.q...q..|....-I.t|
|00002010| 0e 72 9d 00 00 00 00 00 | 2e 0d 00 00 00 54 00 00 |.r......|.....T..|
|00002020| 01 10 00 00 40 e0 19 06 | 00 00 00 00 00 10 00 00 |....@...|........|
|00002030| 02 14 00 00 00 04 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002040| 00 14 00 00 a5 98 00 00 | 40 e0 19 06 1e 45 e5 ff |........|@....E..|
|00002050| fe 73 e5 ff 20 22 00 f0 | 16 00 00 00 b0 fc 07 00 |.s.. "..|........|
|00002060| 00 00 00 00 59 6f 75 20 | 6d 61 79 20 68 61 76 65 |....You |may have|
|00002070| 20 74 6f 20 61 64 64 20 | 65 78 74 72 61 20 6c 69 | to add |extra li|
|00002080| 62 72 61 72 69 65 73 20 | 61 73 20 77 65 6c 6c 2e |braries |as well.|
|00002090| 20 20 57 68 69 63 68 20 | 6f 6e 65 73 3f 20 50 65 | Which |ones? Pe|
|000020a0| 72 68 61 70 73 20 74 68 | 6f 73 65 20 70 72 69 6e |rhaps th|ose prin|
|000020b0| 74 65 64 20 62 79 0d 07 | 12 73 9d 00 12 73 9d 00 |ted by..|.s...s..|
|000020c0| 00 00 00 00 07 65 20 70 | 0c 74 9d 00 12 73 9d 00 |.....e p|.t...s..|
|000020d0| 0c 74 9d 00 00 00 00 00 | 00 98 00 00 a5 68 00 00 |.t......|.....h..|
|000020e0| 40 a0 7a 03 17 de e4 ff | 27 05 e5 ff 70 1a 00 00 |@.z.....|'...p...|
|000020f0| 70 65 72 6c 20 2d 4d 43 | 6f 6e 66 69 67 20 2d 65 |perl -MC|onfig -e|
|00002100| 20 27 70 72 69 6e 74 20 | 24 43 6f 6e 66 69 67 7b | 'print |$Config{|
|00002110| 6c 69 62 73 7d 27 0d 08 | 0c 75 9d 00 12 73 9d 00 |libs}'..|.u...s..|
|00002120| 00 00 00 00 08 b3 9d 00 | 12 00 00 00 00 00 00 00 |........|........|
|00002130| 07 6c 6c 20 18 76 9d 00 | 18 76 9d 00 00 00 00 00 |.ll .v..|.v......|
|00002140| 00 68 00 00 a5 34 00 00 | 40 00 00 00 87 c9 e4 ff |.h...4..|@.......|
|00002150| 47 d6 e4 ff 00 00 00 00 | 0d 08 73 65 18 77 9d 00 |G.......|..se.w..|
|00002160| 00 00 00 00 07 68 65 20 | 14 78 9d 00 14 78 9d 00 |.....he |.x...x..|
|00002170| 00 00 00 00 00 34 00 00 | 85 9c 00 00 00 28 43 07 |.....4..|.....(C.|
|00002180| b7 70 e4 ff 97 9f e4 ff | 20 22 00 00 50 72 6f 76 |.p......| "..Prov|
|00002190| 69 64 65 64 20 79 6f 75 | 72 20 70 65 72 6c 20 62 |ided you|r perl b|
|000021a0| 69 6e 61 72 79 20 77 61 | 73 20 70 72 6f 70 65 72 |inary wa|s proper|
|000021b0| 6c 79 20 63 6f 6e 66 69 | 67 75 72 65 64 20 61 6e |ly confi|gured an|
|000021c0| 64 20 69 6e 73 74 61 6c | 6c 65 64 20 74 68 65 20 |d instal|led the |
|000021d0| 07 00 00 00 10 79 9d 00 | 14 78 9d 00 10 79 9d 00 |.....y..|.x...y..|
|000021e0| 00 00 00 00 45 78 74 55 | 74 69 6c 73 3a 3a 45 6d |....ExtU|tils::Em|
|000021f0| 62 65 64 08 10 00 00 00 | 14 78 9d 00 00 00 00 00 |bed.....|.x......|
|00002200| 20 6d 6f 64 75 6c 65 20 | 77 69 6c 6c 20 00 00 00 | module |will ...|
|00002210| 00 9c 00 00 a5 70 00 00 | 40 c4 02 03 90 38 e4 ff |.....p..|@....8..|
|00002220| 70 67 e4 ff 20 22 00 00 | 64 65 74 65 72 6d 69 6e |pg.. "..|determin|
|00002230| 65 20 61 6c 6c 20 6f 66 | 20 74 68 69 73 20 69 6e |e all of| this in|
|00002240| 66 6f 72 6d 61 74 69 6f | 6e 20 66 6f 72 20 79 6f |formatio|n for yo|
|00002250| 75 3a 0d 08 14 00 00 00 | 00 00 00 00 07 00 00 00 |u:......|........|
|00002260| 12 7a 9d 00 12 7a 9d 00 | 00 00 00 00 07 00 00 00 |.z...z..|........|
|00002270| 0c 7b 9d 00 12 7a 9d 00 | 0c 7b 9d 00 00 00 00 00 |.{...z..|.{......|
|00002280| 00 70 00 00 a5 88 00 00 | 40 c0 39 06 89 d1 e3 ff |.p......|@.9.....|
|00002290| 99 f8 e3 ff 70 1a 00 00 | 25 20 63 63 20 2d 6f 20 |....p...|% cc -o |
|000022a0| 69 6e 74 65 72 70 20 69 | 6e 74 65 72 70 2e 63 20 |interp i|nterp.c |
|000022b0| 60 70 65 72 6c 20 2d 4d | 45 78 74 55 74 69 6c 73 |`perl -M|ExtUtils|
|000022c0| 3a 3a 45 6d 62 65 64 20 | 2d 65 20 63 63 6f 70 74 |::Embed |-e ccopt|
|000022d0| 73 20 2d 65 20 6c 64 6f | 70 74 73 60 0d 08 9d 00 |s -e ldo|pts`....|
|000022e0| 0c 7c 9d 00 12 7a 9d 00 | 00 00 00 00 08 bc 9d 00 |.|...z..|........|
|000022f0| 12 00 00 00 00 00 00 00 | 07 bd 9d 00 18 7d 9d 00 |........|.....}..|
|00002300| 18 7d 9d 00 00 00 00 00 | 00 88 00 00 a5 24 00 00 |.}......|.....$..|
|00002310| 40 00 00 00 f9 bc e3 ff | b9 c9 e3 ff 00 00 00 00 |@.......|........|
|00002320| 0d 08 6c 49 18 7e 9d 00 | 00 00 00 00 00 24 00 00 |..lI.~..|.....$..|
|00002330| 85 94 00 00 00 a4 24 07 | 29 64 e3 ff 09 93 e3 ff |......$.|)d......|
|00002340| 20 22 00 00 49 66 20 74 | 68 65 20 07 10 7f 9d 00 | "..If t|he .....|
|00002350| 10 7f 9d 00 00 00 00 00 | 45 78 74 55 74 69 6c 73 |........|ExtUtils|
|00002360| 3a 3a 45 6d 62 65 64 08 | 10 00 00 00 00 00 00 00 |::Embed.|........|
|00002370| 20 6d 6f 64 75 6c 65 20 | 69 73 6e 27 74 20 70 61 | module |isn't pa|
|00002380| 72 74 20 6f 66 20 79 6f | 75 72 20 50 65 72 6c 20 |rt of yo|ur Perl |
|00002390| 64 69 73 74 72 69 62 75 | 74 69 6f 6e 2c 20 79 6f |distribu|tion, yo|
|000023a0| 75 20 63 61 6e 20 72 65 | 74 72 69 65 76 65 20 69 |u can re|trieve i|
|000023b0| 74 20 66 72 6f 6d 20 68 | 74 74 70 3a 2f 2f 00 00 |t from h|ttp://..|
|000023c0| 00 94 00 00 05 7c 00 00 | 00 48 b6 07 02 2c e3 ff |.....|..|.H...,..|
|000023d0| e2 5a e3 ff 20 22 00 00 | 77 77 77 2e 70 65 72 6c |.Z.. "..|www.perl|
|000023e0| 2e 63 6f 6d 2f 70 65 72 | 6c 2f 43 50 41 4e 2f 6d |.com/per|l/CPAN/m|
|000023f0| 6f 64 75 6c 65 73 2f 62 | 79 2d 6d 6f 64 75 6c 65 |odules/b|y-module|
|00002400| 2f 45 78 74 55 74 69 6c | 73 3a 3a 45 6d 62 65 64 |/ExtUtil|s::Embed|
|00002410| 2e 20 20 28 49 66 20 74 | 68 69 73 20 64 6f 63 75 |. (If t|his docu|
|00002420| 6d 65 6e 74 61 74 69 6f | 6e 20 63 61 6d 65 20 66 |mentatio|n came f|
|00002430| 72 6f 6d 20 79 6f 75 72 | 20 00 00 00 00 7c 00 00 |rom your| ....|..|
|00002440| 25 6c 00 00 40 dc ae 05 | db f3 e2 ff bb 22 e3 ff |%l..@...|....."..|
|00002450| 20 22 00 00 50 65 72 6c | 20 64 69 73 74 72 69 62 | "..Perl| distrib|
|00002460| 75 74 69 6f 6e 2c 20 74 | 68 65 6e 20 79 6f 75 27 |ution, t|hen you'|
|00002470| 72 65 20 72 75 6e 6e 69 | 6e 67 20 35 2e 30 30 34 |re runni|ng 5.004|
|00002480| 20 6f 72 20 62 65 74 74 | 65 72 20 61 6e 64 20 79 | or bett|er and y|
|00002490| 6f 75 20 61 6c 72 65 61 | 64 79 20 68 61 76 65 20 |ou alrea|dy have |
|000024a0| 69 74 2e 29 0d 00 00 00 | 00 6c 00 00 85 9c 00 00 |it.)....|.l......|
|000024b0| 00 50 c6 07 04 85 e2 ff | e4 b3 e2 ff 20 22 00 00 |.P......|.... "..|
|000024c0| 54 68 65 20 07 ca 9d 00 | 10 80 9d 00 10 80 9d 00 |The ....|........|
|000024d0| 00 00 00 00 45 78 74 55 | 74 69 6c 73 3a 3a 45 6d |....ExtU|tils::Em|
|000024e0| 62 65 64 08 10 00 00 00 | 00 00 00 00 20 6b 69 74 |bed.....|.... kit|
|000024f0| 20 6f 6e 20 43 50 41 4e | 20 61 6c 73 6f 20 63 6f | on CPAN| also co|
|00002500| 6e 74 61 69 6e 73 20 61 | 6c 6c 20 73 6f 75 72 63 |ntains a|ll sourc|
|00002510| 65 20 63 6f 64 65 20 66 | 6f 72 20 74 68 65 20 65 |e code f|or the e|
|00002520| 78 61 6d 70 6c 65 73 20 | 69 6e 20 74 68 69 73 20 |xamples |in this |
|00002530| 64 6f 63 75 6d 65 6e 74 | 2c 20 74 65 73 74 73 2c |document|, tests,|
|00002540| 20 00 00 00 00 9c 00 00 | a5 64 00 00 40 7c ac 04 | .......|.d..@|..|
|00002550| dd 4c e2 ff bd 7b e2 ff | 20 22 00 00 61 64 64 69 |.L...{..| "..addi|
|00002560| 74 69 6f 6e 61 6c 20 65 | 78 61 6d 70 6c 65 73 20 |tional e|xamples |
|00002570| 61 6e 64 20 6f 74 68 65 | 72 20 69 6e 66 6f 72 6d |and othe|r inform|
|00002580| 61 74 69 6f 6e 20 79 6f | 75 20 6d 61 79 20 66 69 |ation yo|u may fi|
|00002590| 6e 64 20 75 73 65 66 75 | 6c 2e 0d 07 0a 81 9d 00 |nd usefu|l.......|
|000025a0| 0a 81 9d 00 00 00 00 00 | 00 64 00 00 a5 60 00 00 |........|.d...`..|
|000025b0| 40 94 18 04 36 d6 e1 ff | e6 0c e2 ff 18 2b 00 00 |@...6...|.....+..|
|000025c0| 41 64 64 69 6e 67 20 61 | 20 50 65 72 6c 20 69 6e |Adding a| Perl in|
|000025d0| 74 65 72 70 72 65 74 65 | 72 20 74 6f 20 79 6f 75 |terprete|r to you|
|000025e0| 72 20 43 20 70 72 6f 67 | 72 61 6d 0d 08 d6 9d 00 |r C prog|ram.....|
|000025f0| 0a 82 9d 00 00 00 00 00 | 07 d7 9d 00 14 83 9d 00 |........|........|
|00002600| 14 83 9d 00 00 00 00 00 | 00 60 00 00 05 84 00 00 |........|.`......|
|00002610| 00 60 a1 07 01 81 e1 ff | e1 af e1 ff 20 22 00 00 |.`......|.... "..|
|00002620| 49 6e 20 61 20 73 65 6e | 73 65 2c 20 70 65 72 6c |In a sen|se, perl|
|00002630| 20 28 74 68 65 20 43 20 | 70 72 6f 67 72 61 6d 29 | (the C |program)|
|00002640| 20 69 73 20 61 20 67 6f | 6f 64 20 65 78 61 6d 70 | is a go|od examp|
|00002650| 6c 65 20 6f 66 20 65 6d | 62 65 64 64 69 6e 67 20 |le of em|bedding |
|00002660| 50 65 72 6c 20 28 74 68 | 65 20 6c 61 6e 67 75 61 |Perl (th|e langua|
|00002670| 67 65 29 2c 20 73 6f 20 | 49 27 6c 6c 20 64 65 6d |ge), so |I'll dem|
|00002680| 6f 6e 73 74 72 61 74 65 | 20 00 00 00 00 84 00 00 |onstrate| .......|
|00002690| 85 b4 00 00 00 3c d4 07 | da 48 e1 ff ba 77 e1 ff |.....<..|.H...w..|
|000026a0| 20 22 00 00 65 6d 62 65 | 64 64 69 6e 67 20 77 69 | "..embe|dding wi|
|000026b0| 74 68 20 07 11 84 9d 00 | 14 83 9d 00 11 84 9d 00 |th .....|........|
|000026c0| 00 00 00 00 6d 69 6e 69 | 70 65 72 6c 6d 61 69 6e |....mini|perlmain|
|000026d0| 2e 63 08 68 11 00 00 00 | 14 83 9d 00 00 00 00 00 |.c.h....|........|
|000026e0| 2c 20 66 72 6f 6d 20 74 | 68 65 20 73 6f 75 72 63 |, from t|he sourc|
|000026f0| 65 20 64 69 73 74 72 69 | 62 75 74 69 6f 6e 2e 20 |e distri|bution. |
|00002700| 20 48 65 72 65 27 73 20 | 61 20 62 61 73 74 61 72 | Here's |a bastar|
|00002710| 64 69 7a 65 64 2c 20 6e | 6f 6e 70 6f 72 74 61 62 |dized, n|onportab|
|00002720| 6c 65 20 76 65 72 73 69 | 6f 6e 20 6f 66 20 07 65 |le versi|on of .e|
|00002730| 11 85 9d 00 14 83 9d 00 | 11 85 9d 00 00 00 00 00 |........|........|
|00002740| 00 b4 00 00 a5 8c 00 00 | 40 fc 0e 04 b3 10 e1 ff |........|@.......|
|00002750| 93 3f e1 ff f8 22 00 00 | 6d 69 6e 69 70 65 72 6c |.?..."..|miniperl|
|00002760| 6d 61 69 6e 2e 63 08 64 | 11 00 00 00 14 83 9d 00 |main.c.d|........|
|00002770| 00 00 00 00 20 63 6f 6e | 74 61 69 6e 69 6e 67 20 |.... con|taining |
|00002780| 74 68 65 20 65 73 73 65 | 6e 74 69 61 6c 73 20 6f |the esse|ntials o|
|00002790| 66 20 65 6d 62 65 64 64 | 69 6e 67 3a 0d 08 72 6c |f embedd|ing:..rl|
|000027a0| 14 00 00 00 00 00 00 00 | 07 00 00 00 12 86 9d 00 |........|........|
|000027b0| 12 86 9d 00 00 00 00 00 | 07 df 9d 00 0c 87 9d 00 |........|........|
|000027c0| 12 86 9d 00 0c 87 9d 00 | 00 00 00 00 00 8c 00 00 |........|........|
|000027d0| 25 60 00 00 40 a0 68 06 | ac a9 e0 ff bc d0 e0 ff |%`..@.h.|........|
|000027e0| 70 1a 00 00 23 69 6e 63 | 6c 75 64 65 20 3c 45 58 |p...#inc|lude <EX|
|000027f0| 54 45 52 4e 2e 68 3e 20 | 20 20 20 20 20 20 20 20 |TERN.h> | |
|00002800| 20 20 20 20 20 20 2f 2a | 20 66 72 6f 6d 20 74 68 | /*| from th|
|00002810| 65 20 50 65 72 6c 20 64 | 69 73 74 72 69 62 75 74 |e Perl d|istribut|
|00002820| 69 6f 6e 20 20 20 20 20 | 2a 2f 0d 00 00 60 00 00 |ion |*/...`..|
|00002830| a5 88 00 00 40 a0 68 06 | cc 7a e0 ff dc a1 e0 ff |....@.h.|.z......|
|00002840| 70 1a 00 00 23 69 6e 63 | 6c 75 64 65 20 3c 70 65 |p...#inc|lude <pe|
|00002850| 72 6c 2e 68 3e 20 20 20 | 20 20 20 20 20 20 20 20 |rl.h> | |
|00002860| 20 20 20 20 20 20 2f 2a | 20 66 72 6f 6d 20 74 68 | /*| from th|
|00002870| 65 20 50 65 72 6c 20 64 | 69 73 74 72 69 62 75 74 |e Perl d|istribut|
|00002880| 69 6f 6e 20 20 20 20 20 | 2a 2f 0d 08 0c 88 9d 00 |ion |*/......|
|00002890| 12 86 9d 00 00 00 00 00 | 08 e2 9d 00 12 00 00 00 |........|........|
|000028a0| 00 00 00 00 07 00 00 00 | 18 89 9d 00 18 89 9d 00 |........|........|
|000028b0| 00 00 00 00 00 88 00 00 | a5 48 00 00 40 00 00 00 |........|.H..@...|
|000028c0| 3c 66 e0 ff fc 72 e0 ff | 00 00 00 00 0d 08 9d 00 |<f...r..|........|
|000028d0| 18 8a 9d 00 00 00 00 00 | 07 05 05 05 12 8b 9d 00 |........|........|
|000028e0| 12 8b 9d 00 00 00 00 00 | 07 00 00 00 0c 8c 9d 00 |........|........|
|000028f0| 12 8b 9d 00 0c 8c 9d 00 | 00 00 00 00 00 48 00 00 |........|.....H..|
|00002900| a5 88 00 00 40 a0 68 06 | 3c 15 e0 ff 4c 3c e0 ff |....@.h.|<...L<..|
|00002910| 70 1a 00 00 73 74 61 74 | 69 63 20 50 65 72 6c 49 |p...stat|ic PerlI|
|00002920| 6e 74 65 72 70 72 65 74 | 65 72 20 2a 6d 79 5f 70 |nterpret|er *my_p|
|00002930| 65 72 6c 3b 20 20 2f 2a | 2a 2a 20 20 20 20 54 68 |erl; /*|** Th|
|00002940| 65 20 50 65 72 6c 20 69 | 6e 74 65 72 70 72 65 74 |e Perl i|nterpret|
|00002950| 65 72 20 20 20 20 2a 2a | 2a 2f 0d 08 0c 8d 9d 00 |er **|*/......|
|00002960| 12 8b 9d 00 00 00 00 00 | 08 6f 6d 70 12 00 00 00 |........|.omp....|
|00002970| 00 00 00 00 07 75 6e 3a | 18 8e 9d 00 18 8e 9d 00 |.....un:|........|
|00002980| 00 00 00 00 00 88 00 00 | a5 48 00 00 40 00 00 00 |........|.H..@...|
|00002990| ac 00 e0 ff 6c 0d e0 ff | 00 00 00 00 0d 08 9d 00 |....l...|........|
|000029a0| 18 8f 9d 00 00 00 00 00 | 07 20 63 63 12 90 9d 00 |........|. cc....|
|000029b0| 12 90 9d 00 00 00 00 00 | 07 73 68 6f 0c 91 9d 00 |........|.sho....|
|000029c0| 12 90 9d 00 0c 91 9d 00 | 00 00 00 00 00 48 00 00 |........|.....H..|
|000029d0| 25 44 00 00 40 d0 ef 03 | ac af df ff bc d6 df ff |%D..@...|........|
|000029e0| 70 1a 00 00 69 6e 74 20 | 6d 61 69 6e 28 69 6e 74 |p...int |main(int|
|000029f0| 20 61 72 67 63 2c 20 63 | 68 61 72 20 2a 2a 61 72 | argc, c|har **ar|
|00002a00| 67 76 2c 20 63 68 61 72 | 20 2a 2a 65 6e 76 29 0d |gv, char| **env).|
|00002a10| 00 44 00 00 25 1c 00 00 | 40 70 17 00 cc 80 df ff |.D..%...|@p......|
|00002a20| dc a7 df ff 70 1a 00 00 | 7b 0d 00 00 00 1c 00 00 |....p...|{.......|
|00002a30| 25 34 00 00 40 d0 78 02 | ec 51 df ff fc 78 df ff |%4..@.x.|.Q...x..|
|00002a40| 70 1a 00 00 20 20 20 20 | 6d 79 5f 70 65 72 6c 20 |p... |my_perl |
|00002a50| 3d 20 70 65 72 6c 5f 61 | 6c 6c 6f 63 28 29 3b 0d |= perl_a|lloc();.|
|00002a60| 00 34 00 00 25 38 00 00 | 40 40 90 02 0c 23 df ff |.4..%8..|@@...#..|
|00002a70| 1c 4a df ff 70 1a 00 00 | 20 20 20 20 70 65 72 6c |.J..p...| perl|
|00002a80| 5f 63 6f 6e 73 74 72 75 | 63 74 28 6d 79 5f 70 65 |_constru|ct(my_pe|
|00002a90| 72 6c 29 3b 0d 00 00 00 | 00 38 00 00 25 54 00 00 |rl);....|.8..%T..|
|00002aa0| 40 f0 37 05 2c f4 de ff | 3c 1b df ff 70 1a 00 00 |@.7.,...|<...p...|
|00002ab0| 20 20 20 20 70 65 72 6c | 5f 70 61 72 73 65 28 6d | perl|_parse(m|
|00002ac0| 79 5f 70 65 72 6c 2c 20 | 4e 55 4c 4c 2c 20 61 72 |y_perl, |NULL, ar|
|00002ad0| 67 63 2c 20 61 72 67 76 | 2c 20 28 63 68 61 72 20 |gc, argv|, (char |
|00002ae0| 2a 2a 29 4e 55 4c 4c 29 | 3b 0d 00 00 00 54 00 00 |**)NULL)|;....T..|
|00002af0| 25 30 00 00 40 a0 03 02 | 4c c5 de ff 5c ec de ff |%0..@...|L...\...|
|00002b00| 70 1a 00 00 20 20 20 20 | 70 65 72 6c 5f 72 75 6e |p... |perl_run|
|00002b10| 28 6d 79 5f 70 65 72 6c | 29 3b 0d 00 00 30 00 00 |(my_perl|);...0..|
|00002b20| 25 34 00 00 40 d0 78 02 | 6c 96 de ff 7c bd de ff |%4..@.x.|l...|...|
|00002b30| 70 1a 00 00 20 20 20 20 | 70 65 72 6c 5f 64 65 73 |p... |perl_des|
|00002b40| 74 72 75 63 74 28 6d 79 | 5f 70 65 72 6c 29 3b 0d |truct(my|_perl);.|
|00002b50| 00 34 00 00 25 30 00 00 | 40 10 1b 02 8c 67 de ff |.4..%0..|@....g..|
|00002b60| 9c 8e de ff 70 1a 00 00 | 20 20 20 20 70 65 72 6c |....p...| perl|
|00002b70| 5f 66 72 65 65 28 6d 79 | 5f 70 65 72 6c 29 3b 0d |_free(my|_perl);.|
|00002b80| 00 30 00 00 a5 44 00 00 | 40 70 17 00 ac 38 de ff |.0...D..|@p...8..|
|00002b90| bc 5f de ff 70 1a 00 00 | 7d 0d 08 27 0c 92 9d 00 |._..p...|}..'....|
|00002ba0| 12 90 9d 00 00 00 00 00 | 08 67 6f 6f 12 00 00 00 |........|.goo....|
|00002bb0| 00 00 00 00 07 65 20 74 | 18 93 9d 00 18 93 9d 00 |.....e t|........|
|00002bc0| 00 00 00 00 00 44 00 00 | a5 24 00 00 40 00 00 00 |.....D..|.$..@...|
|00002bd0| 1c 24 de ff dc 30 de ff | 00 00 00 00 0d 08 61 72 |.$...0..|......ar|
|00002be0| 18 94 9d 00 00 00 00 00 | 00 24 00 00 85 c8 00 00 |........|.$......|
|00002bf0| 00 58 a9 07 4c cb dd ff | 2c fa dd ff 20 22 00 00 |.X..L...|,... "..|
|00002c00| 4e 6f 74 69 63 65 20 74 | 68 61 74 20 77 65 20 64 |Notice t|hat we d|
|00002c10| 6f 6e 27 74 20 75 73 65 | 20 74 68 65 20 07 59 08 |on't use| the .Y.|
|00002c20| 0e 95 9d 00 0e 95 9d 00 | 00 00 00 00 65 6e 76 08 |........|....env.|
|00002c30| 0e 96 9d 00 00 00 00 00 | 20 70 6f 69 6e 74 65 72 |........| pointer|
|00002c40| 2e 20 20 4e 6f 72 6d 61 | 6c 6c 79 20 68 61 6e 64 |. Norma|lly hand|
|00002c50| 65 64 20 74 6f 20 07 00 | 0e 97 9d 00 0e 97 9d 00 |ed to ..|........|
|00002c60| 00 00 00 00 70 65 72 6c | 5f 70 61 72 73 65 08 74 |....perl|_parse.t|
|00002c70| 0e 98 9d 00 00 00 00 00 | 20 61 73 20 69 74 73 20 |........| as its |
|00002c80| 66 69 6e 61 6c 20 61 72 | 67 75 6d 65 6e 74 2c 20 |final ar|gument, |
|00002c90| 07 62 72 6f 0e 99 9d 00 | 0e 99 9d 00 00 00 00 00 |.bro....|........|
|00002ca0| 65 6e 76 08 0e 9a 9d 00 | 00 00 00 00 20 00 00 00 |env.....|.... ...|
|00002cb0| 00 c8 00 00 a5 94 00 00 | 40 98 04 06 25 93 dd ff |........|@...%...|
|00002cc0| 05 c2 dd ff 20 22 00 00 | 68 65 72 65 20 69 73 20 |.... "..|here is |
|00002cd0| 72 65 70 6c 61 63 65 64 | 20 62 79 20 07 65 64 20 |replaced| by .ed |
|00002ce0| 0e 9b 9d 00 0e 9b 9d 00 | 00 00 00 00 4e 55 4c 4c |........|....NULL|
|00002cf0| 08 72 67 73 0e 9c 9d 00 | 00 00 00 00 2c 20 77 68 |.rgs....|...., wh|
|00002d00| 69 63 68 20 6d 65 61 6e | 73 20 74 68 61 74 20 74 |ich mean|s that t|
|00002d10| 68 65 20 63 75 72 72 65 | 6e 74 20 65 6e 76 69 72 |he curre|nt envir|
|00002d20| 6f 6e 6d 65 6e 74 20 77 | 69 6c 6c 20 62 65 20 75 |onment w|ill be u|
|00002d30| 73 65 64 2e 0d 07 00 00 | 14 9d 9d 00 14 9d 9d 00 |sed.....|........|
|00002d40| 00 00 00 00 00 94 00 00 | a5 ac 00 00 40 24 d4 04 |........|....@$..|
|00002d50| 4e 24 dd ff 2e 53 dd ff | 20 22 00 00 4e 6f 77 20 |N$...S..| "..Now |
|00002d60| 63 6f 6d 70 69 6c 65 20 | 74 68 69 73 20 70 72 6f |compile |this pro|
|00002d70| 67 72 61 6d 20 28 49 27 | 6c 6c 20 63 61 6c 6c 20 |gram (I'|ll call |
|00002d80| 69 74 20 07 11 9e 9d 00 | 14 9d 9d 00 11 9e 9d 00 |it .....|........|
|00002d90| 00 00 00 00 69 6e 74 65 | 72 70 2e 63 08 00 00 00 |....inte|rp.c....|
|00002da0| 11 00 00 00 14 9d 9d 00 | 00 00 00 00 29 20 69 6e |........|....) in|
|00002db0| 74 6f 20 61 6e 20 65 78 | 65 63 75 74 61 62 6c 65 |to an ex|ecutable|
|00002dc0| 3a 0d 08 00 14 00 00 00 | 00 00 00 00 07 65 72 6c |:.......|.....erl|
|00002dd0| 12 9f 9d 00 12 9f 9d 00 | 00 00 00 00 07 6f 20 65 |........|.....o e|
|00002de0| 0c a0 9d 00 12 9f 9d 00 | 0c a0 9d 00 00 00 00 00 |........|........|
|00002df0| 00 ac 00 00 a5 88 00 00 | 40 c0 39 06 47 bd dc ff |........|@.9.G...|
|00002e00| 57 e4 dc ff 70 1a 00 00 | 25 20 63 63 20 2d 6f 20 |W...p...|% cc -o |
|00002e10| 69 6e 74 65 72 70 20 69 | 6e 74 65 72 70 2e 63 20 |interp i|nterp.c |
|00002e20| 60 70 65 72 6c 20 2d 4d | 45 78 74 55 74 69 6c 73 |`perl -M|ExtUtils|
|00002e30| 3a 3a 45 6d 62 65 64 20 | 2d 65 20 63 63 6f 70 74 |::Embed |-e ccopt|
|00002e40| 73 20 2d 65 20 6c 64 6f | 70 74 73 60 0d 08 9d 00 |s -e ldo|pts`....|
|00002e50| 0c a1 9d 00 12 9f 9d 00 | 00 00 00 00 08 0f 9d 00 |........|........|
|00002e60| 12 00 00 00 00 00 00 00 | 07 75 20 77 18 a2 9d 00 |........|.u w....|
|00002e70| 18 a2 9d 00 00 00 00 00 | 00 88 00 00 a5 34 00 00 |........|.....4..|
|00002e80| 40 00 00 00 b7 a8 dc ff | 77 b5 dc ff 00 00 00 00 |@.......|w.......|
|00002e90| 0d 08 05 05 18 a3 9d 00 | 00 00 00 00 07 11 9d 00 |........|........|
|00002ea0| 14 a4 9d 00 14 a4 9d 00 | 00 00 00 00 00 34 00 00 |........|.....4..|
|00002eb0| a5 bc 00 00 40 38 b0 05 | e7 4f dc ff c7 7e dc ff |....@8..|.O...~..|
|00002ec0| 20 22 00 00 41 66 74 65 | 72 20 61 20 73 75 63 63 | "..Afte|r a succ|
|00002ed0| 65 73 73 66 75 6c 20 63 | 6f 6d 70 69 6c 61 74 69 |essful c|ompilati|
|00002ee0| 6f 6e 2c 20 79 6f 75 27 | 6c 6c 20 62 65 20 61 62 |on, you'|ll be ab|
|00002ef0| 6c 65 20 74 6f 20 75 73 | 65 20 07 63 11 a5 9d 00 |le to us|e .c....|
|00002f00| 14 a4 9d 00 11 a5 9d 00 | 00 00 00 00 69 6e 74 65 |........|....inte|
|00002f10| 72 70 08 00 11 00 00 00 | 14 a4 9d 00 00 00 00 00 |rp......|........|
|00002f20| 20 6a 75 73 74 20 6c 69 | 6b 65 20 70 65 72 6c 20 | just li|ke perl |
|00002f30| 69 74 73 65 6c 66 3a 0d | 08 74 65 72 14 00 00 00 |itself:.|.ter....|
|00002f40| 00 00 00 00 07 10 9d 00 | 12 a6 9d 00 12 a6 9d 00 |........|........|
|00002f50| 00 00 00 00 07 73 08 05 | 0c a7 9d 00 12 a6 9d 00 |.....s..|........|
|00002f60| 0c a7 9d 00 00 00 00 00 | 00 bc 00 00 25 24 00 00 |........|....%$..|
|00002f70| 40 80 bb 00 e0 e8 db ff | f0 0f dc ff 70 1a 00 00 |@.......|....p...|
|00002f80| 25 20 69 6e 74 65 72 70 | 0d 00 00 00 00 24 00 00 |% interp|.....$..|
|00002f90| 25 38 00 00 40 40 90 02 | 00 ba db ff 10 e1 db ff |%8..@@..|........|
|00002fa0| 70 1a 00 00 70 72 69 6e | 74 20 22 50 72 65 74 74 |p...prin|t "Prett|
|00002fb0| 79 20 47 6f 6f 64 20 50 | 65 72 6c 20 5c 6e 22 3b |y Good P|erl \n";|
|00002fc0| 0d 00 00 00 00 38 00 00 | 25 40 00 00 40 10 92 03 |.....8..|%@..@...|
|00002fd0| 20 8b db ff 30 b2 db ff | 70 1a 00 00 70 72 69 6e | ...0...|p...prin|
|00002fe0| 74 20 22 31 30 38 39 30 | 20 2d 20 39 38 30 31 20 |t "10890| - 9801 |
|00002ff0| 69 73 20 22 2c 20 31 30 | 38 39 30 20 2d 20 39 38 |is ", 10|890 - 98|
|00003000| 30 31 3b 0d 00 40 00 00 | 25 24 00 00 40 80 bb 00 |01;..@..|%$..@...|
|00003010| 40 5c db ff 50 83 db ff | 70 1a 00 00 3c 43 54 52 |@\..P...|p...<CTR|
|00003020| 4c 2d 44 3e 0d 00 00 00 | 00 24 00 00 25 2c 00 00 |L-D>....|.$..%,..|
|00003030| 40 00 77 01 60 2d db ff | 70 54 db ff 70 1a 00 00 |@.w.`-..|pT..p...|
|00003040| 50 72 65 74 74 79 20 47 | 6f 6f 64 20 50 65 72 6c |Pretty G|ood Perl|
|00003050| 0d 00 00 00 00 2c 00 00 | a5 58 00 00 40 c0 d4 01 |.....,..|.X..@...|
|00003060| 80 fe da ff 90 25 db ff | 70 1a 00 00 31 30 38 39 |.....%..|p...1089|
|00003070| 30 20 2d 20 39 38 30 31 | 20 69 73 20 31 30 38 39 |0 - 9801| is 1089|
|00003080| 0d 08 07 05 0c a8 9d 00 | 12 a6 9d 00 00 00 00 00 |........|........|
|00003090| 08 00 00 00 12 00 00 00 | 00 00 00 00 07 10 9d 00 |........|........|
|000030a0| 18 a9 9d 00 18 a9 9d 00 | 00 00 00 00 00 58 00 00 |........|.....X..|
|000030b0| a5 24 00 00 40 00 00 00 | f0 e9 da ff b0 f6 da ff |.$..@...|........|
|000030c0| 00 00 00 00 0d 08 9d 00 | 18 aa 9d 00 00 00 00 00 |........|........|
|000030d0| 00 24 00 00 a5 3c 00 00 | 40 0c 27 00 20 91 da ff |.$...<..|@.'. ...|
|000030e0| 00 c0 da ff 20 22 00 00 | 6f 72 0d 07 12 ab 9d 00 |.... "..|or......|
|000030f0| 12 ab 9d 00 00 00 00 00 | 07 72 79 20 0c ac 9d 00 |........|.ry ....|
|00003100| 12 ab 9d 00 0c ac 9d 00 | 00 00 00 00 00 3c 00 00 |........|.....<..|
|00003110| 01 10 00 00 41 a0 7a 03 | 00 00 00 00 00 10 00 00 |....A.z.|........|
|00003120| 02 1c 00 00 9c 05 00 00 | 00 00 00 00 12 ab 9d 00 |........|........|
|00003130| 0c ac 9d 00 00 00 00 00 | 00 1c 00 00 25 4c 00 00 |........|....%L..|
|00003140| 40 a0 7a 03 3d 4d d8 ff | 4d 74 d8 ff 70 1a 00 00 |@.z.=M..|Mt..p...|
|00003150| 16 00 00 00 b0 fc 07 00 | 00 00 00 00 25 20 69 6e |........|....% in|
|00003160| 74 65 72 70 20 2d 65 20 | 27 70 72 69 6e 74 66 28 |terp -e |'printf(|
|00003170| 22 25 78 22 2c 20 33 37 | 33 35 39 32 38 35 35 39 |"%x", 37|35928559|
|00003180| 29 27 0d 00 00 4c 00 00 | a5 4c 00 00 40 80 bb 00 |)'...L..|.L..@...|
|00003190| 5d 1e d8 ff 6d 45 d8 ff | 70 1a 00 00 64 65 61 64 |]...mE..|p...dead|
|000031a0| 62 65 65 66 0d 08 00 00 | 0c ad 9d 00 12 ab 9d 00 |beef....|........|
|000031b0| 00 00 00 00 08 10 9d 00 | 12 00 00 00 00 00 00 00 |........|........|
|000031c0| 07 65 72 6c 18 ae 9d 00 | 18 ae 9d 00 00 00 00 00 |.erl....|........|
|000031d0| 00 4c 00 00 a5 24 00 00 | 40 00 00 00 cd 09 d8 ff |.L...$..|@.......|
|000031e0| 8d 16 d8 ff 00 00 00 00 | 0d 08 72 79 18 af 9d 00 |........|..ry....|
|000031f0| 00 00 00 00 00 24 00 00 | 05 84 00 00 00 18 d4 07 |.....$..|........|
|00003200| fd b0 d7 ff dd df d7 ff | 20 22 00 00 59 6f 75 20 |........| "..You |
|00003210| 63 61 6e 20 61 6c 73 6f | 20 72 65 61 64 20 61 6e |can also| read an|
|00003220| 64 20 65 78 65 63 75 74 | 65 20 50 65 72 6c 20 73 |d execut|e Perl s|
|00003230| 74 61 74 65 6d 65 6e 74 | 73 20 66 72 6f 6d 20 61 |tatement|s from a|
|00003240| 20 66 69 6c 65 20 77 68 | 69 6c 65 20 69 6e 20 74 | file wh|ile in t|
|00003250| 68 65 20 6d 69 64 73 74 | 20 6f 66 20 79 6f 75 72 |he midst| of your|
|00003260| 20 43 20 70 72 6f 67 72 | 61 6d 2c 20 62 79 20 70 | C progr|am, by p|
|00003270| 6c 61 63 69 6e 67 20 00 | 00 84 00 00 a5 8c 00 00 |lacing .|........|
|00003280| 40 7c 9e 03 d6 78 d7 ff | b6 a7 d7 ff 20 22 00 00 |@|...x..|.... "..|
|00003290| 74 68 65 20 66 69 6c 65 | 6e 61 6d 65 20 69 6e 20 |the file|name in |
|000032a0| 07 10 9d 00 11 b0 9d 00 | 11 b0 9d 00 00 00 00 00 |........|........|
|000032b0| 61 72 67 76 5b 31 5d 08 | 11 00 00 00 00 00 00 00 |argv[1].|........|
|000032c0| 20 62 65 66 6f 72 65 20 | 63 61 6c 6c 69 6e 67 20 | before |calling |
|000032d0| 07 20 43 3f 11 b1 9d 00 | 11 b1 9d 00 00 00 00 00 |. C?....|........|
|000032e0| 70 65 72 6c 5f 72 75 6e | 28 29 08 05 11 00 00 00 |perl_run|()......|
|000032f0| 00 00 00 00 2e 0d 07 00 | 0a b2 9d 00 0a b2 9d 00 |........|........|
|00003300| 00 00 00 00 00 8c 00 00 | a5 50 00 00 40 5a 5b 04 |........|.P..@Z[.|
|00003310| 2f 02 d7 ff df 38 d7 ff | 18 2b 00 00 43 61 6c 6c |/....8..|.+..Call|
|00003320| 69 6e 67 20 61 20 50 65 | 72 6c 20 73 75 62 72 6f |ing a Pe|rl subro|
|00003330| 75 74 69 6e 65 20 66 72 | 6f 6d 20 79 6f 75 72 20 |utine fr|om your |
|00003340| 43 20 70 72 6f 67 72 61 | 6d 0d 08 00 0a b3 9d 00 |C progra|m.......|
|00003350| 00 00 00 00 00 50 00 00 | 85 9c 00 00 00 54 8f 07 |.....P..|.....T..|
|00003360| fa ac d6 ff da db d6 ff | 20 22 00 00 54 6f 20 63 |........| "..To c|
|00003370| 61 6c 6c 20 69 6e 64 69 | 76 69 64 75 61 6c 20 50 |all indi|vidual P|
|00003380| 65 72 6c 20 73 75 62 72 | 6f 75 74 69 6e 65 73 2c |erl subr|outines,|
|00003390| 20 79 6f 75 20 63 61 6e | 20 75 73 65 20 61 6e 79 | you can| use any|
|000033a0| 20 6f 66 20 74 68 65 20 | 07 67 68 74 10 b4 9d 00 | of the |.ght....|
|000033b0| 10 b4 9d 00 00 00 00 00 | 70 65 72 6c 5f 63 61 6c |........|perl_cal|
|000033c0| 6c 5f 2a 08 10 00 00 00 | 00 00 00 00 20 66 75 6e |l_*.....|.... fun|
|000033d0| 63 74 69 6f 6e 73 20 64 | 6f 63 75 6d 65 6e 74 65 |ctions d|ocumente|
|000033e0| 64 20 69 6e 20 74 68 65 | 20 74 68 65 20 00 00 00 |d in the| the ...|
|000033f0| 00 9c 00 00 a5 94 00 00 | 40 84 f5 04 d3 74 d6 ff |........|@....t..|
|00003400| b3 a3 d6 ff 20 22 00 00 | 63 68 61 70 74 65 72 20 |.... "..|chapter |
|00003410| 07 74 68 65 10 b5 9d 00 | 10 b5 9d 00 00 00 00 00 |.the....|........|
|00003420| 70 65 72 6c 63 61 6c 6c | 08 00 00 00 10 00 00 00 |perlcall|........|
|00003430| 00 00 00 00 20 6d 61 6e | 70 61 67 65 2e 20 49 6e |.... man|page. In|
|00003440| 20 74 68 69 73 20 65 78 | 61 6d 70 6c 65 20 77 65 | this ex|ample we|
|00003450| 27 6c 6c 20 75 73 65 20 | 07 08 05 05 11 b6 9d 00 |'ll use |........|
|00003460| 11 b6 9d 00 00 00 00 00 | 70 65 72 6c 5f 63 61 6c |........|perl_cal|
|00003470| 6c 5f 61 72 67 76 08 00 | 11 00 00 00 00 00 00 00 |l_argv..|........|
|00003480| 2e 0d 00 00 00 94 00 00 | a5 88 00 00 40 34 ef 03 |........|....@4..|
|00003490| fc 05 d6 ff dc 34 d6 ff | 20 22 00 00 54 68 61 74 |.....4..| "..That|
|000034a0| 27 73 20 73 68 6f 77 6e | 20 62 65 6c 6f 77 2c 20 |'s shown| below, |
|000034b0| 69 6e 20 61 20 70 72 6f | 67 72 61 6d 20 49 27 6c |in a pro|gram I'l|
|000034c0| 6c 20 63 61 6c 6c 20 07 | 11 b7 9d 00 11 b7 9d 00 |l call .|........|
|000034d0| 00 00 00 00 73 68 6f 77 | 74 69 6d 65 2e 63 08 50 |....show|time.c.P|
|000034e0| 11 00 00 00 00 00 00 00 | 2e 0d 07 20 12 b8 9d 00 |........|... ....|
|000034f0| 12 b8 9d 00 00 00 00 00 | 07 75 62 73 0c b9 9d 00 |........|.ubs....|
|00003500| 12 b8 9d 00 0c b9 9d 00 | 00 00 00 00 00 88 00 00 |........|........|
|00003510| 25 2c 00 00 40 50 bd 01 | f5 9e d5 ff 05 c6 d5 ff |%,..@P..|........|
|00003520| 70 1a 00 00 23 69 6e 63 | 6c 75 64 65 20 3c 45 58 |p...#inc|lude <EX|
|00003530| 54 45 52 4e 2e 68 3e 0d | 00 2c 00 00 a5 54 00 00 |TERN.h>.|.,...T..|
|00003540| 40 70 8e 01 15 70 d5 ff | 25 97 d5 ff 70 1a 00 00 |@p...p..|%...p...|
|00003550| 23 69 6e 63 6c 75 64 65 | 20 3c 70 65 72 6c 2e 68 |#include| <perl.h|
|00003560| 3e 0d 08 6f 0c ba 9d 00 | 12 b8 9d 00 00 00 00 00 |>..o....|........|
|00003570| 08 05 05 05 12 00 00 00 | 00 00 00 00 07 74 68 65 |........|.....the|
|00003580| 18 bb 9d 00 18 bb 9d 00 | 00 00 00 00 00 54 00 00 |........|.....T..|
|00003590| a5 48 00 00 40 00 00 00 | 85 5b d5 ff 45 68 d5 ff |.H..@...|.[..Eh..|
|000035a0| 00 00 00 00 0d 08 70 65 | 18 bc 9d 00 00 00 00 00 |......pe|........|
|000035b0| 07 69 6e 74 12 bd 9d 00 | 12 bd 9d 00 00 00 00 00 |.int....|........|
|000035c0| 07 00 00 00 0c be 9d 00 | 12 bd 9d 00 0c be 9d 00 |........|........|
|000035d0| 00 00 00 00 00 48 00 00 | a5 64 00 00 40 00 ee 02 |.....H..|.d..@...|
|000035e0| 85 0a d5 ff 95 31 d5 ff | 70 1a 00 00 73 74 61 74 |.....1..|p...stat|
|000035f0| 69 63 20 50 65 72 6c 49 | 6e 74 65 72 70 72 65 74 |ic PerlI|nterpret|
|00003600| 65 72 20 2a 6d 79 5f 70 | 65 72 6c 3b 0d 08 08 05 |er *my_p|erl;....|
|00003610| 0c bf 9d 00 12 bd 9d 00 | 00 00 00 00 08 63 68 61 |........|.....cha|
|00003620| 12 00 00 00 00 00 00 00 | 07 37 9d 00 18 c0 9d 00 |........|.7......|
|00003630| 18 c0 9d 00 00 00 00 00 | 00 64 00 00 a5 48 00 00 |........|.d...H..|
|00003640| 40 00 00 00 f5 f5 d4 ff | b5 02 d5 ff 00 00 00 00 |@.......|........|
|00003650| 0d 08 73 65 18 c1 9d 00 | 00 00 00 00 07 43 20 6c |..se....|.....C l|
|00003660| 12 c2 9d 00 12 c2 9d 00 | 00 00 00 00 07 6d 20 79 |........|.....m y|
|00003670| 0c c3 9d 00 12 c2 9d 00 | 0c c3 9d 00 00 00 00 00 |........|........|
|00003680| 00 48 00 00 25 44 00 00 | 40 d0 ef 03 f5 a4 d4 ff |.H..%D..|@.......|
|00003690| 05 cc d4 ff 70 1a 00 00 | 69 6e 74 20 6d 61 69 6e |....p...|int main|
|000036a0| 28 69 6e 74 20 61 72 67 | 63 2c 20 63 68 61 72 20 |(int arg|c, char |
|000036b0| 2a 2a 61 72 67 76 2c 20 | 63 68 61 72 20 2a 2a 65 |**argv, |char **e|
|000036c0| 6e 76 29 0d 00 44 00 00 | 25 1c 00 00 40 70 17 00 |nv)..D..|%...@p..|
|000036d0| 15 76 d4 ff 25 9d d4 ff | 70 1a 00 00 7b 0d 00 00 |.v..%...|p...{...|
|000036e0| 00 1c 00 00 25 38 00 00 | 40 40 90 02 35 47 d4 ff |....%8..|@@..5G..|
|000036f0| 45 6e d4 ff 70 1a 00 00 | 20 20 20 20 63 68 61 72 |En..p...| char|
|00003700| 20 2a 61 72 67 73 5b 5d | 20 3d 20 7b 20 4e 55 4c | *args[]| = { NUL|
|00003710| 4c 20 7d 3b 0d 00 00 00 | 00 38 00 00 25 34 00 00 |L };....|.8..%4..|
|00003720| 40 d0 78 02 55 18 d4 ff | 65 3f d4 ff 70 1a 00 00 |@.x.U...|e?..p...|
|00003730| 20 20 20 20 6d 79 5f 70 | 65 72 6c 20 3d 20 70 65 | my_p|erl = pe|
|00003740| 72 6c 5f 61 6c 6c 6f 63 | 28 29 3b 0d 00 34 00 00 |rl_alloc|();..4..|
|00003750| a5 60 00 00 40 40 90 02 | 75 e9 d3 ff 85 10 d4 ff |.`..@@..|u.......|
|00003760| 70 1a 00 00 20 20 20 20 | 70 65 72 6c 5f 63 6f 6e |p... |perl_con|
|00003770| 73 74 72 75 63 74 28 6d | 79 5f 70 65 72 6c 29 3b |struct(m|y_perl);|
|00003780| 0d 08 74 68 0c c4 9d 00 | 12 c2 9d 00 00 00 00 00 |..th....|........|
|00003790| 08 74 68 69 12 00 00 00 | 00 00 00 00 07 74 61 74 |.thi....|.....tat|
|000037a0| 18 c5 9d 00 18 c5 9d 00 | 00 00 00 00 00 60 00 00 |........|.....`..|
|000037b0| a5 48 00 00 40 00 00 00 | e5 d4 d3 ff a5 e1 d3 ff |.H..@...|........|
|000037c0| 00 00 00 00 0d 08 75 6c | 18 c6 9d 00 00 00 00 00 |......ul|........|
|000037d0| 07 45 20 54 12 c7 9d 00 | 12 c7 9d 00 00 00 00 00 |.E T....|........|
|000037e0| 07 4e 20 45 0c c8 9d 00 | 12 c7 9d 00 0c c8 9d 00 |.N E....|........|
|000037f0| 00 00 00 00 00 48 00 00 | a5 70 00 00 40 40 07 04 |.....H..|.p..@@..|
|00003800| e5 83 d3 ff f5 aa d3 ff | 70 1a 00 00 70 65 72 6c |........|p...perl|
|00003810| 5f 70 61 72 73 65 28 6d | 79 5f 70 65 72 6c 2c 20 |_parse(m|y_perl, |
|00003820| 4e 55 4c 4c 2c 20 61 72 | 67 63 2c 20 61 72 67 76 |NULL, ar|gc, argv|
|00003830| 2c 20 4e 55 4c 4c 29 3b | 0d 08 72 6f 0c c9 9d 00 |, NULL);|..ro....|
|00003840| 12 c7 9d 00 00 00 00 00 | 08 73 20 50 12 00 00 00 |........|.s P....|
|00003850| 00 00 00 00 07 6c 69 6e | 18 ca 9d 00 18 ca 9d 00 |.....lin|........|
|00003860| 00 00 00 00 00 70 00 00 | a5 48 00 00 40 00 00 00 |.....p..|.H..@...|
|00003870| 55 6f d3 ff 15 7c d3 ff | 00 00 00 00 0d 08 05 05 |Uo...|..|........|
|00003880| 18 cb 9d 00 00 00 00 00 | 07 20 57 68 12 cc 9d 00 |........|. Wh....|
|00003890| 12 cc 9d 00 00 00 00 00 | 07 75 20 61 0c cd 9d 00 |........|.u a....|
|000038a0| 12 cc 9d 00 0c cd 9d 00 | 00 00 00 00 00 48 00 00 |........|.....H..|
|000038b0| a5 60 00 00 40 b0 a7 02 | 55 1e d3 ff 65 45 d3 ff |.`..@...|U...eE..|
|000038c0| 70 1a 00 00 2f 2a 2a 2a | 20 73 6b 69 70 70 69 6e |p.../***| skippin|
|000038d0| 67 20 70 65 72 6c 5f 72 | 75 6e 28 29 20 2a 2a 2a |g perl_r|un() ***|
|000038e0| 2f 0d 08 20 0c ce 9d 00 | 12 cc 9d 00 00 00 00 00 |/.. ....|........|
|000038f0| 08 6f 67 72 12 00 00 00 | 00 00 00 00 07 77 65 72 |.ogr....|.....wer|
|00003900| 18 cf 9d 00 18 cf 9d 00 | 00 00 00 00 00 60 00 00 |........|.....`..|
|00003910| a5 48 00 00 40 00 00 00 | c5 09 d3 ff 85 16 d3 ff |.H..@...|........|
|00003920| 00 00 00 00 0d 08 28 07 | 18 d0 9d 00 00 00 00 00 |......(.|........|
|00003930| 07 00 00 00 12 d1 9d 00 | 12 d1 9d 00 00 00 00 00 |........|........|
|00003940| 07 08 05 05 0c d2 9d 00 | 12 d1 9d 00 0c d2 9d 00 |........|........|
|00003950| 00 00 00 00 00 48 00 00 | a5 7c 00 00 40 10 09 05 |.....H..|.|..@...|
|00003960| c5 b8 d2 ff d5 df d2 ff | 70 1a 00 00 70 65 72 6c |........|p...perl|
|00003970| 5f 63 61 6c 6c 5f 61 72 | 67 76 28 22 73 68 6f 77 |_call_ar|gv("show|
|00003980| 74 69 6d 65 22 2c 20 47 | 5f 44 49 53 43 41 52 44 |time", G|_DISCARD|
|00003990| 20 7c 20 47 5f 4e 4f 41 | 52 47 53 2c 20 61 72 67 | | G_NOA|RGS, arg|
|000039a0| 73 29 3b 0d 08 20 63 6f | 0c d3 9d 00 12 d1 9d 00 |s);.. co|........|
|000039b0| 00 00 00 00 08 72 20 6d | 12 00 00 00 00 00 00 00 |.....r m|........|
|000039c0| 07 72 20 69 18 d4 9d 00 | 18 d4 9d 00 00 00 00 00 |.r i....|........|
|000039d0| 00 7c 00 00 a5 48 00 00 | 40 00 00 00 35 a4 d2 ff |.|...H..|@...5...|
|000039e0| f5 b0 d2 ff 00 00 00 00 | 0d 08 6c 64 18 d5 9d 00 |........|..ld....|
|000039f0| 00 00 00 00 07 65 6c 79 | 12 d6 9d 00 12 d6 9d 00 |.....ely|........|
|00003a00| 00 00 00 00 07 65 63 75 | 0c d7 9d 00 12 d6 9d 00 |.....ecu|........|
|00003a10| 0c d7 9d 00 00 00 00 00 | 00 48 00 00 25 34 00 00 |........|.H..%4..|
|00003a20| 40 d0 78 02 35 53 d2 ff | 45 7a d2 ff 70 1a 00 00 |@.x.5S..|Ez..p...|
|00003a30| 20 20 20 20 70 65 72 6c | 5f 64 65 73 74 72 75 63 | perl|_destruc|
|00003a40| 74 28 6d 79 5f 70 65 72 | 6c 29 3b 0d 00 34 00 00 |t(my_per|l);..4..|
|00003a50| 25 30 00 00 40 10 1b 02 | 55 24 d2 ff 65 4b d2 ff |%0..@...|U$..eK..|
|00003a60| 70 1a 00 00 20 20 20 20 | 70 65 72 6c 5f 66 72 65 |p... |perl_fre|
|00003a70| 65 28 6d 79 5f 70 65 72 | 6c 29 3b 0d 00 30 00 00 |e(my_per|l);..0..|
|00003a80| a5 44 00 00 40 70 17 00 | 75 f5 d1 ff 85 1c d2 ff |.D..@p..|u.......|
|00003a90| 70 1a 00 00 7d 0d 08 2d | 0c d8 9d 00 12 d6 9d 00 |p...}..-|........|
|00003aa0| 00 00 00 00 08 63 61 74 | 12 00 00 00 00 00 00 00 |.....cat|........|
|00003ab0| 07 20 61 6e 18 d9 9d 00 | 18 d9 9d 00 00 00 00 00 |. an....|........|
|00003ac0| 00 44 00 00 a5 24 00 00 | 40 00 00 00 e5 e0 d1 ff |.D...$..|@.......|
|00003ad0| a5 ed d1 ff 00 00 00 00 | 0d 08 72 65 18 da 9d 00 |........|..re....|
|00003ae0| 00 00 00 00 00 24 00 00 | 85 b4 00 00 00 04 82 07 |.....$..|........|
|00003af0| 15 88 d1 ff f5 b6 d1 ff | 20 22 00 00 77 68 65 72 |........| "..wher|
|00003b00| 65 20 07 79 11 db 9d 00 | 11 db 9d 00 00 00 00 00 |e .y....|........|
|00003b10| 73 68 6f 77 74 69 6d 65 | 08 40 9d 00 11 00 00 00 |showtime|.@......|
|00003b20| 00 00 00 00 20 69 73 20 | 61 20 50 65 72 6c 20 73 |.... is |a Perl s|
|00003b30| 75 62 72 6f 75 74 69 6e | 65 20 74 68 61 74 20 74 |ubroutin|e that t|
|00003b40| 61 6b 65 73 20 6e 6f 20 | 61 72 67 75 6d 65 6e 74 |akes no |argument|
|00003b50| 73 20 28 74 68 61 74 27 | 73 20 74 68 65 20 07 65 |s (that'|s the .e|
|00003b60| 11 dc 9d 00 11 dc 9d 00 | 00 00 00 00 47 5f 4e 4f |........|....G_NO|
|00003b70| 41 52 47 53 08 32 20 6f | 11 00 00 00 00 00 00 00 |ARGS.2 o|........|
|00003b80| 29 20 61 6e 64 20 66 6f | 72 20 77 68 69 63 68 20 |) and fo|r which |
|00003b90| 49 27 6c 6c 20 00 00 00 | 00 b4 00 00 85 a8 00 00 |I'll ...|........|
|00003ba0| 00 ec 72 07 ee 4f d1 ff | ce 7e d1 ff 20 22 00 00 |..r..O..|.~.. "..|
|00003bb0| 69 67 6e 6f 72 65 20 74 | 68 65 20 72 65 74 75 72 |ignore t|he retur|
|00003bc0| 6e 20 76 61 6c 75 65 20 | 28 74 68 61 74 27 73 20 |n value |(that's |
|00003bd0| 74 68 65 20 07 40 9d 00 | 11 dd 9d 00 11 dd 9d 00 |the .@..|........|
|00003be0| 00 00 00 00 47 5f 44 49 | 53 43 41 52 44 08 9d 00 |....G_DI|SCARD...|
|00003bf0| 11 00 00 00 00 00 00 00 | 29 2e 20 20 54 68 6f 73 |........|). Thos|
|00003c00| 65 20 66 6c 61 67 73 2c | 20 61 6e 64 20 6f 74 68 |e flags,| and oth|
|00003c10| 65 72 73 2c 20 61 72 65 | 20 64 69 73 63 75 73 73 |ers, are| discuss|
|00003c20| 65 64 20 69 6e 20 74 68 | 65 20 63 68 61 70 74 65 |ed in th|e chapte|
|00003c30| 72 20 07 20 10 de 9d 00 | 10 de 9d 00 00 00 00 00 |r . ....|........|
|00003c40| 00 a8 00 00 a5 3c 00 00 | 40 c0 a2 00 c7 17 d1 ff |.....<..|@.......|
|00003c50| a7 46 d1 ff 28 23 00 00 | 70 65 72 6c 63 61 6c 6c |.F..(#..|perlcall|
|00003c60| 08 43 9d 00 10 00 00 00 | 00 00 00 00 2e 0d 07 72 |.C......|.......r|
|00003c70| 14 df 9d 00 14 df 9d 00 | 00 00 00 00 00 3c 00 00 |........|.....<..|
|00003c80| a5 cc 00 00 40 04 97 04 | f0 a8 d0 ff d0 d7 d0 ff |....@...|........|
|00003c90| 20 22 00 00 49 27 6c 6c | 20 64 65 66 69 6e 65 20 | "..I'll| define |
|00003ca0| 74 68 65 20 07 43 9d 00 | 11 e0 9d 00 14 df 9d 00 |the .C..|........|
|00003cb0| 11 e0 9d 00 00 00 00 00 | 73 68 6f 77 74 69 6d 65 |........|showtime|
|00003cc0| 08 46 9d 00 11 00 00 00 | 14 df 9d 00 00 00 00 00 |.F......|........|
|00003cd0| 20 73 75 62 72 6f 75 74 | 69 6e 65 20 69 6e 20 61 | subrout|ine in a|
|00003ce0| 20 66 69 6c 65 20 63 61 | 6c 6c 65 64 20 07 9d 00 | file ca|lled ...|
|00003cf0| 11 e1 9d 00 14 df 9d 00 | 11 e1 9d 00 00 00 00 00 |........|........|
|00003d00| 73 68 6f 77 74 69 6d 65 | 2e 70 6c 08 11 00 00 00 |showtime|.pl.....|
|00003d10| 14 df 9d 00 00 00 00 00 | 3a 0d 08 35 14 00 00 00 |........|:..5....|
|00003d20| 00 00 00 00 07 4a 9d 00 | 12 e2 9d 00 12 e2 9d 00 |.....J..|........|
|00003d30| 00 00 00 00 07 00 00 00 | 0c e3 9d 00 12 e2 9d 00 |........|........|
|00003d40| 0c e3 9d 00 00 00 00 00 | 00 cc 00 00 a5 60 00 00 |........|.....`..|
|00003d50| 40 b0 a7 02 e9 41 d0 ff | f9 68 d0 ff 70 1a 00 00 |@....A..|.h..p...|
|00003d60| 70 72 69 6e 74 20 22 49 | 20 73 68 61 6e 27 74 20 |print "I| shan't |
|00003d70| 62 65 20 70 72 69 6e 74 | 65 64 2e 22 3b 0d 08 00 |be print|ed.";...|
|00003d80| 0c e4 9d 00 12 e2 9d 00 | 00 00 00 00 08 4e 9d 00 |........|.....N..|
|00003d90| 12 00 00 00 00 00 00 00 | 07 6f 70 74 18 e5 9d 00 |........|.opt....|
|00003da0| 18 e5 9d 00 00 00 00 00 | 00 60 00 00 a5 48 00 00 |........|.`...H..|
|00003db0| 40 00 00 00 59 2d d0 ff | 19 3a d0 ff 00 00 00 00 |@...Y-..|.:......|
|00003dc0| 0d 08 00 00 18 e6 9d 00 | 00 00 00 00 07 50 9d 00 |........|.....P..|
|00003dd0| 12 e7 9d 00 12 e7 9d 00 | 00 00 00 00 07 00 00 00 |........|........|
|00003de0| 0c e8 9d 00 12 e7 9d 00 | 0c e8 9d 00 00 00 00 00 |........|........|
|00003df0| 00 48 00 00 25 28 00 00 | 40 20 48 01 59 dc cf ff |.H..%(..|@ H.Y...|
|00003e00| 69 03 d0 ff 70 1a 00 00 | 73 75 62 20 73 68 6f 77 |i...p...|sub show|
|00003e10| 74 69 6d 65 20 7b 0d 00 | 00 28 00 00 25 28 00 00 |time {..|.(..%(..|
|00003e20| 40 90 5f 01 79 ad cf ff | 89 d4 cf ff 70 1a 00 00 |@._.y...|....p...|
|00003e30| 20 20 20 20 70 72 69 6e | 74 20 74 69 6d 65 3b 0d | prin|t time;.|
|00003e40| 00 28 00 00 a5 44 00 00 | 40 70 17 00 99 7e cf ff |.(...D..|@p...~..|
|00003e50| a9 a5 cf ff 70 1a 00 00 | 7d 0d 08 00 0c e9 9d 00 |....p...|}.......|
|00003e60| 12 e7 9d 00 00 00 00 00 | 08 20 2d 65 12 00 00 00 |........|. -e....|
|00003e70| 00 00 00 00 07 43 6f 6e | 18 ea 9d 00 18 ea 9d 00 |.....Con|........|
|00003e80| 00 00 00 00 00 44 00 00 | a5 34 00 00 40 00 00 00 |.....D..|.4..@...|
|00003e90| 09 6a cf ff c9 76 cf ff | 00 00 00 00 0d 08 00 00 |.j...v..|........|
|00003ea0| 18 eb 9d 00 00 00 00 00 | 07 56 9d 00 14 ec 9d 00 |........|.V......|
|00003eb0| 14 ec 9d 00 00 00 00 00 | 00 34 00 00 a5 6c 00 00 |........|.4...l..|
|00003ec0| 40 3c e2 02 39 11 cf ff | 19 40 cf ff 20 22 00 00 |@<..9...|.@.. "..|
|00003ed0| 53 69 6d 70 6c 65 20 65 | 6e 6f 75 67 68 2e 20 20 |Simple e|nough. |
|00003ee0| 4e 6f 77 20 63 6f 6d 70 | 69 6c 65 20 61 6e 64 20 |Now comp|ile and |
|00003ef0| 72 75 6e 3a 0d 08 65 20 | 14 00 00 00 00 00 00 00 |run:..e |........|
|00003f00| 07 69 6f 6e 12 ed 9d 00 | 12 ed 9d 00 00 00 00 00 |.ion....|........|
|00003f10| 07 20 07 05 0c ee 9d 00 | 12 ed 9d 00 0c ee 9d 00 |. ......|........|
|00003f20| 00 00 00 00 00 6c 00 00 | a5 8c 00 00 40 80 97 06 |.....l..|....@...|
|00003f30| 32 aa ce ff 42 d1 ce ff | 70 1a 00 00 25 20 63 63 |2...B...|p...% cc|
|00003f40| 20 2d 6f 20 73 68 6f 77 | 74 69 6d 65 20 73 68 6f | -o show|time sho|
|00003f50| 77 74 69 6d 65 2e 63 20 | 60 70 65 72 6c 20 2d 4d |wtime.c |`perl -M|
|00003f60| 45 78 74 55 74 69 6c 73 | 3a 3a 45 6d 62 65 64 20 |ExtUtils|::Embed |
|00003f70| 2d 65 20 63 63 6f 70 74 | 73 20 2d 65 20 6c 64 6f |-e ccopt|s -e ldo|
|00003f80| 70 74 73 60 0d 08 00 00 | 0c ef 9d 00 12 ed 9d 00 |pts`....|........|
|00003f90| 00 00 00 00 08 5b 9d 00 | 12 00 00 00 00 00 00 00 |.....[..|........|
|00003fa0| 07 20 2d 4f 18 f0 9d 00 | 18 f0 9d 00 00 00 00 00 |. -O....|........|
|00003fb0| 00 8c 00 00 a5 48 00 00 | 40 00 00 00 a2 95 ce ff |.....H..|@.......|
|00003fc0| 62 a2 ce ff 00 00 00 00 | 0d 08 69 6e 18 f1 9d 00 |b.......|..in....|
|00003fd0| 00 00 00 00 07 75 73 72 | 12 f2 9d 00 12 f2 9d 00 |.....usr|........|
|00003fe0| 00 00 00 00 07 72 6c 35 | 0c f3 9d 00 12 f2 9d 00 |.....rl5|........|
|00003ff0| 0c f3 9d 00 00 00 00 00 | 00 48 00 00 25 30 00 00 |........|.H..%0..|
|00004000| 40 a0 03 02 a2 44 ce ff | b2 6b ce ff 70 1a 00 00 |@....D..|.k..p...|
|00004010| 25 20 73 68 6f 77 74 69 | 6d 65 20 73 68 6f 77 74 |% showti|me showt|
|00004020| 69 6d 65 2e 70 6c 0d 00 | 00 30 00 00 a5 4c 00 00 |ime.pl..|.0...L..|
|00004030| 40 f0 d2 00 c2 15 ce ff | d2 3c ce ff 70 1a 00 00 |@.......|.<..p...|
|00004040| 38 31 38 32 38 34 35 39 | 30 0d 08 05 0c f4 9d 00 |81828459|0.......|
|00004050| 12 f2 9d 00 00 00 00 00 | 08 05 05 05 12 00 00 00 |........|........|
|00004060| 00 00 00 00 07 05 05 05 | 18 f5 9d 00 18 f5 9d 00 |........|........|
|00004070| 00 00 00 00 00 4c 00 00 | a5 24 00 00 40 00 00 00 |.....L..|.$..@...|
|00004080| 32 01 ce ff f2 0d ce ff | 00 00 00 00 0d 08 00 00 |2.......|........|
|00004090| 18 f6 9d 00 00 00 00 00 | 00 24 00 00 05 80 00 00 |........|.$......|
|000040a0| 00 98 a8 07 62 a8 cd ff | 42 d7 cd ff 20 22 00 00 |....b...|B... "..|
|000040b0| 79 69 65 6c 64 69 6e 67 | 20 74 68 65 20 6e 75 6d |yielding| the num|
|000040c0| 62 65 72 20 6f 66 20 73 | 65 63 6f 6e 64 73 20 74 |ber of s|econds t|
|000040d0| 68 61 74 20 65 6c 61 70 | 73 65 64 20 62 65 74 77 |hat elap|sed betw|
|000040e0| 65 65 6e 20 4a 61 6e 75 | 61 72 79 20 31 2c 20 31 |een Janu|ary 1, 1|
|000040f0| 39 37 30 20 28 74 68 65 | 20 62 65 67 69 6e 6e 69 |970 (the| beginni|
|00004100| 6e 67 20 6f 66 20 74 68 | 65 20 55 6e 69 78 20 65 |ng of th|e Unix e|
|00004110| 70 6f 63 68 29 2c 20 00 | 00 80 00 00 25 48 00 00 |poch), .|....%H..|
|00004120| 40 78 60 03 3b 70 cd ff | 1b 9f cd ff 20 22 00 00 |@x`.;p..|.... "..|
|00004130| 61 6e 64 20 74 68 65 20 | 6d 6f 6d 65 6e 74 20 49 |and the |moment I|
|00004140| 20 62 65 67 61 6e 20 77 | 72 69 74 69 6e 67 20 74 | began w|riting t|
|00004150| 68 69 73 20 73 65 6e 74 | 65 6e 63 65 2e 0d 00 00 |his sent|ence....|
|00004160| 00 48 00 00 01 10 00 00 | 00 f0 bf 07 00 00 00 00 |.H......|........|
|00004170| 00 10 00 00 02 14 00 00 | 38 07 00 00 00 00 00 00 |........|8.......|
|00004180| 00 00 00 00 00 14 00 00 | 85 b0 00 00 00 f0 bf 07 |........|........|
|00004190| bc 45 cb ff 9c 74 cb ff | 20 22 00 00 16 00 00 00 |.E...t..| "......|
|000041a0| b0 fc 07 00 00 00 00 00 | 49 6e 20 74 68 69 73 20 |........|In this |
|000041b0| 70 61 72 74 69 63 75 6c | 61 72 20 63 61 73 65 20 |particul|ar case |
|000041c0| 77 65 20 64 6f 6e 27 74 | 20 68 61 76 65 20 74 6f |we don't| have to|
|000041d0| 20 63 61 6c 6c 20 07 00 | 11 f7 9d 00 11 f7 9d 00 | call ..|........|
|000041e0| 00 00 00 00 70 65 72 6c | 5f 72 75 6e 08 6e 61 72 |....perl|_run.nar|
|000041f0| 11 00 00 00 00 00 00 00 | 2c 20 62 75 74 20 69 6e |........|, but in|
|00004200| 20 67 65 6e 65 72 61 6c | 20 69 74 27 73 20 63 6f | general| it's co|
|00004210| 6e 73 69 64 65 72 65 64 | 20 67 6f 6f 64 20 70 72 |nsidered| good pr|
|00004220| 61 63 74 69 63 65 20 74 | 6f 20 65 6e 73 75 72 65 |actice t|o ensure|
|00004230| 20 00 00 00 00 b0 00 00 | 85 a8 00 00 00 d4 d8 07 | .......|........|
|00004240| 95 0d cb ff 75 3c cb ff | 20 22 00 00 70 72 6f 70 |....u<..| "..prop|
|00004250| 65 72 20 69 6e 69 74 69 | 61 6c 69 7a 61 74 69 6f |er initi|alizatio|
|00004260| 6e 20 6f 66 20 6c 69 62 | 72 61 72 79 20 63 6f 64 |n of lib|rary cod|
|00004270| 65 2c 20 69 6e 63 6c 75 | 64 69 6e 67 20 65 78 65 |e, inclu|ding exe|
|00004280| 63 75 74 69 6f 6e 20 6f | 66 20 61 6c 6c 20 6f 62 |cution o|f all ob|
|00004290| 6a 65 63 74 20 07 9d 00 | 0e f8 9d 00 0e f8 9d 00 |ject ...|........|
|000042a0| 00 00 00 00 44 45 53 54 | 52 4f 59 08 0e f9 9d 00 |....DEST|ROY.....|
|000042b0| 00 00 00 00 20 6d 65 74 | 68 6f 64 73 20 61 6e 64 |.... met|hods and|
|000042c0| 20 70 61 63 6b 61 67 65 | 20 07 63 20 0e fa 9d 00 | package| .c ....|
|000042d0| 0e fa 9d 00 00 00 00 00 | 45 4e 44 20 00 a8 00 00 |........|END ....|
|000042e0| a5 30 00 00 40 14 ca 00 | 6e d5 ca ff 4e 04 cb ff |.0..@...|n...N...|
|000042f0| ba 1f 00 00 7b 7d 08 60 | 0e fb 9d 00 00 00 00 00 |....{}.`|........|
|00004300| 20 62 6c 6f 63 6b 73 2e | 0d 00 00 00 00 30 00 00 | blocks.|.....0..|
|00004310| 85 bc 00 00 00 5c de 07 | 97 66 ca ff 77 95 ca ff |.....\..|.f..w...|
|00004320| 20 22 00 00 49 66 20 79 | 6f 75 20 77 61 6e 74 20 | "..If y|ou want |
|00004330| 74 6f 20 70 61 73 73 20 | 61 72 67 75 6d 65 6e 74 |to pass |argument|
|00004340| 73 20 74 6f 20 74 68 65 | 20 50 65 72 6c 20 73 75 |s to the| Perl su|
|00004350| 62 72 6f 75 74 69 6e 65 | 2c 20 79 6f 75 20 63 61 |broutine|, you ca|
|00004360| 6e 20 61 64 64 20 73 74 | 72 69 6e 67 73 20 74 6f |n add st|rings to|
|00004370| 20 74 68 65 20 07 20 50 | 0e fc 9d 00 0e fc 9d 00 | the . P|........|
|00004380| 00 00 00 00 4e 55 4c 4c | 08 20 79 6f 0e fd 9d 00 |....NULL|. yo....|
|00004390| 00 00 00 00 2d 74 65 72 | 6d 69 6e 61 74 65 64 20 |....-ter|minated |
|000043a0| 07 6d 20 68 0e fe 9d 00 | 0e fe 9d 00 00 00 00 00 |.m h....|........|
|000043b0| 61 72 67 73 08 6d 2f 70 | 0e ff 9d 00 00 00 00 00 |args.m/p|........|
|000043c0| 20 6c 69 73 74 20 00 00 | 00 bc 00 00 85 9c 00 00 | list ..|........|
|000043d0| 00 98 b4 07 70 2e ca ff | 50 5d ca ff 20 22 00 00 |....p...|P].. "..|
|000043e0| 70 61 73 73 65 64 20 74 | 6f 20 07 69 11 00 9e 00 |passed t|o .i....|
|000043f0| 11 00 9e 00 00 00 00 00 | 70 65 72 6c 5f 63 61 6c |........|perl_cal|
|00004400| 6c 5f 61 72 67 76 08 6f | 11 00 00 00 00 00 00 00 |l_argv.o|........|
|00004410| 2e 20 20 46 6f 72 20 6f | 74 68 65 72 20 64 61 74 |. For o|ther dat|
|00004420| 61 20 74 79 70 65 73 2c | 20 6f 72 20 74 6f 20 65 |a types,| or to e|
|00004430| 78 61 6d 69 6e 65 20 72 | 65 74 75 72 6e 20 76 61 |xamine r|eturn va|
|00004440| 6c 75 65 73 2c 20 79 6f | 75 27 6c 6c 20 6e 65 65 |lues, yo|u'll nee|
|00004450| 64 20 74 6f 20 6d 61 6e | 69 70 75 6c 61 74 65 20 |d to man|ipulate |
|00004460| 74 68 65 20 00 9c 00 00 | 85 90 00 00 00 5c 96 07 |the ....|.....\..|
|00004470| 49 f6 c9 ff 29 25 ca ff | 20 22 00 00 50 65 72 6c |I...)%..| "..Perl|
|00004480| 20 73 74 61 63 6b 2e 20 | 20 54 68 61 74 27 73 20 | stack. | That's |
|00004490| 64 65 6d 6f 6e 73 74 72 | 61 74 65 64 20 69 6e 20 |demonstr|ated in |
|000044a0| 74 68 65 20 6c 61 73 74 | 20 73 65 63 74 69 6f 6e |the last| section|
|000044b0| 20 6f 66 20 74 68 69 73 | 20 64 6f 63 75 6d 65 6e | of this| documen|
|000044c0| 74 3a 20 74 68 65 20 63 | 68 61 70 74 65 72 20 07 |t: the c|hapter .|
|000044d0| 10 01 9e 00 10 01 9e 00 | 00 00 00 00 46 69 64 64 |........|....Fidd|
|000044e0| 6c 69 6e 67 20 77 69 74 | 68 20 74 68 65 20 50 65 |ling wit|h the Pe|
|000044f0| 72 6c 20 00 00 90 00 00 | a5 4c 00 00 40 c4 33 02 |rl .....|.L..@.3.|
|00004500| 22 be c9 ff 02 ed c9 ff | 28 23 00 00 73 74 61 63 |".......|(#..stac|
|00004510| 6b 20 66 72 6f 6d 20 79 | 6f 75 72 20 43 20 70 72 |k from y|our C pr|
|00004520| 6f 67 72 61 6d 08 9d 00 | 10 00 00 00 00 00 00 00 |ogram...|........|
|00004530| 2e 0d 07 61 0a 02 9e 00 | 0a 02 9e 00 00 00 00 00 |...a....|........|
|00004540| 00 4c 00 00 a5 54 00 00 | 40 5c a4 04 7b 47 c9 ff |.L...T..|@\..{G..|
|00004550| 2b 7e c9 ff 18 2b 00 00 | 45 76 61 6c 75 61 74 69 |+~...+..|Evaluati|
|00004560| 6e 67 20 61 20 50 65 72 | 6c 20 73 74 61 74 65 6d |ng a Per|l statem|
|00004570| 65 6e 74 20 66 72 6f 6d | 20 79 6f 75 72 20 43 20 |ent from| your C |
|00004580| 70 72 6f 67 72 61 6d 0d | 08 20 43 20 0a 03 9e 00 |program.|. C ....|
|00004590| 00 00 00 00 00 54 00 00 | 05 88 00 00 00 28 d3 07 |.....T..|.....(..|
|000045a0| 46 f2 c8 ff 26 21 c9 ff | 20 22 00 00 50 65 72 6c |F...&!..| "..Perl|
|000045b0| 20 70 72 6f 76 69 64 65 | 73 20 74 77 6f 20 41 50 | provide|s two AP|
|000045c0| 49 20 66 75 6e 63 74 69 | 6f 6e 73 20 74 6f 20 65 |I functi|ons to e|
|000045d0| 76 61 6c 75 61 74 65 20 | 70 69 65 63 65 73 20 6f |valuate |pieces o|
|000045e0| 66 20 50 65 72 6c 20 63 | 6f 64 65 2e 20 54 68 65 |f Perl c|ode. The|
|000045f0| 73 65 20 61 72 65 20 74 | 68 65 20 22 70 65 72 6c |se are t|he "perl|
|00004600| 5f 65 76 61 6c 5f 73 76 | 28 29 22 20 65 6e 74 72 |_eval_sv|()" entr|
|00004610| 79 20 69 6e 20 74 68 65 | 20 00 00 00 00 88 00 00 |y in the| .......|
|00004620| a5 98 00 00 40 78 46 05 | 1f ba c8 ff ff e8 c8 ff |....@xF.|........|
|00004630| 20 22 00 00 63 68 61 70 | 74 65 72 20 07 48 65 72 | "..chap|ter .Her|
|00004640| 10 04 9e 00 10 04 9e 00 | 00 00 00 00 70 65 72 6c |........|....perl|
|00004650| 67 75 74 73 08 6e 70 6f | 10 00 00 00 00 00 00 00 |guts.npo|........|
|00004660| 20 61 6e 64 20 74 68 65 | 20 22 70 65 72 6c 5f 65 | and the| "perl_e|
|00004670| 76 61 6c 5f 70 76 28 29 | 22 20 65 6e 74 72 79 20 |val_pv()|" entry |
|00004680| 69 6e 20 74 68 65 20 63 | 68 61 70 74 65 72 20 07 |in the c|hapter .|
|00004690| 10 05 9e 00 10 05 9e 00 | 00 00 00 00 70 65 72 6c |........|....perl|
|000046a0| 67 75 74 73 08 68 65 20 | 10 00 00 00 00 00 00 00 |guts.he |........|
|000046b0| 2e 0d 00 00 00 98 00 00 | 05 84 00 00 00 7c bb 07 |........|.....|..|
|000046c0| 48 4b c8 ff 28 7a c8 ff | 20 22 00 00 41 72 67 75 |HK..(z..| "..Argu|
|000046d0| 61 62 6c 79 2c 20 74 68 | 65 73 65 20 61 72 65 20 |ably, th|ese are |
|000046e0| 74 68 65 20 6f 6e 6c 79 | 20 72 6f 75 74 69 6e 65 |the only| routine|
|000046f0| 73 20 79 6f 75 27 6c 6c | 20 65 76 65 72 20 6e 65 |s you'll| ever ne|
|00004700| 65 64 20 74 6f 20 65 78 | 65 63 75 74 65 20 73 6e |ed to ex|ecute sn|
|00004710| 69 70 70 65 74 73 20 6f | 66 20 50 65 72 6c 20 63 |ippets o|f Perl c|
|00004720| 6f 64 65 20 66 72 6f 6d | 20 77 69 74 68 69 6e 20 |ode from| within |
|00004730| 79 6f 75 72 20 43 20 00 | 00 84 00 00 05 84 00 00 |your C .|........|
|00004740| 00 10 dc 07 21 13 c8 ff | 01 42 c8 ff 20 22 00 00 |....!...|.B.. "..|
|00004750| 70 72 6f 67 72 61 6d 2e | 20 20 59 6f 75 72 20 63 |program.| Your c|
|00004760| 6f 64 65 20 63 61 6e 20 | 62 65 20 61 73 20 6c 6f |ode can |be as lo|
|00004770| 6e 67 20 61 73 20 79 6f | 75 20 77 69 73 68 3b 20 |ng as yo|u wish; |
|00004780| 69 74 20 63 61 6e 20 63 | 6f 6e 74 61 69 6e 20 6d |it can c|ontain m|
|00004790| 75 6c 74 69 70 6c 65 20 | 73 74 61 74 65 6d 65 6e |ultiple |statemen|
|000047a0| 74 73 3b 20 69 74 20 63 | 61 6e 20 65 6d 70 6c 6f |ts; it c|an emplo|
|000047b0| 79 20 74 68 65 20 22 75 | 73 65 22 20 00 84 00 00 |y the "u|se" ....|
|000047c0| 85 c8 00 00 00 a8 bf 07 | fa da c7 ff da 09 c8 ff |........|........|
|000047d0| 20 22 00 00 65 6e 74 72 | 79 20 69 6e 20 74 68 65 | "..entr|y in the|
|000047e0| 20 63 68 61 70 74 65 72 | 20 07 65 74 10 06 9e 00 | chapter| .et....|
|000047f0| 10 06 9e 00 00 00 00 00 | 70 65 72 6c 66 75 6e 63 |........|perlfunc|
|00004800| 08 20 54 68 10 00 00 00 | 00 00 00 00 2c 20 74 68 |. Th....|...., th|
|00004810| 65 20 22 72 65 71 75 69 | 72 65 22 20 65 6e 74 72 |e "requi|re" entr|
|00004820| 79 20 69 6e 20 74 68 65 | 20 63 68 61 70 74 65 72 |y in the| chapter|
|00004830| 20 07 00 00 10 07 9e 00 | 10 07 9e 00 00 00 00 00 | .......|........|
|00004840| 70 65 72 6c 66 75 6e 63 | 08 08 05 05 10 00 00 00 |perlfunc|........|
|00004850| 00 00 00 00 20 61 6e 64 | 20 74 68 65 20 22 64 6f |.... and| the "do|
|00004860| 22 20 65 6e 74 72 79 20 | 69 6e 20 74 68 65 20 63 |" entry |in the c|
|00004870| 68 61 70 74 65 72 20 07 | 10 08 9e 00 10 08 9e 00 |hapter .|........|
|00004880| 00 00 00 00 00 c8 00 00 | a5 5c 00 00 40 44 d1 02 |........|.\..@D..|
|00004890| d3 a2 c7 ff b3 d1 c7 ff | 28 23 00 00 70 65 72 6c |........|(#..perl|
|000048a0| 66 75 6e 63 08 0d 20 20 | 10 00 00 00 00 00 00 00 |func.. |........|
|000048b0| 20 74 6f 20 69 6e 63 6c | 75 64 65 20 65 78 74 65 | to incl|ude exte|
|000048c0| 72 6e 61 6c 20 50 65 72 | 6c 20 66 69 6c 65 73 2e |rnal Per|l files.|
|000048d0| 0d 07 63 74 11 09 9e 00 | 11 09 9e 00 00 00 00 00 |..ct....|........|
|000048e0| 00 5c 00 00 85 94 00 00 | 00 2c c9 07 fc 33 c7 ff |.\......|.,...3..|
|000048f0| dc 62 c7 ff f8 22 00 00 | 70 65 72 6c 5f 65 76 61 |.b..."..|perl_eva|
|00004900| 6c 5f 70 76 28 29 08 2c | 11 00 00 00 00 00 00 00 |l_pv().,|........|
|00004910| 20 6c 65 74 73 20 75 73 | 20 65 76 61 6c 75 61 74 | lets us| evaluat|
|00004920| 65 20 69 6e 64 69 76 69 | 64 75 61 6c 20 50 65 72 |e indivi|dual Per|
|00004930| 6c 20 73 74 72 69 6e 67 | 73 2c 20 61 6e 64 20 74 |l string|s, and t|
|00004940| 68 65 6e 20 65 78 74 72 | 61 63 74 20 76 61 72 69 |hen extr|act vari|
|00004950| 61 62 6c 65 73 20 66 6f | 72 20 63 6f 65 72 63 69 |ables fo|r coerci|
|00004960| 6f 6e 20 69 6e 74 6f 20 | 43 20 74 79 70 65 73 2e |on into |C types.|
|00004970| 20 20 00 00 00 94 00 00 | 85 cc 00 00 00 a8 8f 07 | ......|........|
|00004980| d5 fb c6 ff b5 2a c7 ff | 20 22 00 00 54 68 65 20 |.....*..| "..The |
|00004990| 66 6f 6c 6c 6f 77 69 6e | 67 20 70 72 6f 67 72 61 |followin|g progra|
|000049a0| 6d 2c 20 07 11 0a 9e 00 | 11 0a 9e 00 00 00 00 00 |m, .....|........|
|000049b0| 73 74 72 69 6e 67 2e 63 | 08 07 05 05 11 00 00 00 |string.c|........|
|000049c0| 00 00 00 00 2c 20 65 78 | 65 63 75 74 65 73 20 74 |...., ex|ecutes t|
|000049d0| 68 72 65 65 20 50 65 72 | 6c 20 73 74 72 69 6e 67 |hree Per|l string|
|000049e0| 73 2c 20 65 78 74 72 61 | 63 74 69 6e 67 20 61 6e |s, extra|cting an|
|000049f0| 20 07 07 05 0e 0b 9e 00 | 0e 0b 9e 00 00 00 00 00 | .......|........|
|00004a00| 69 6e 74 08 0e 0c 9e 00 | 00 00 00 00 20 66 72 6f |int.....|.... fro|
|00004a10| 6d 20 74 68 65 20 66 69 | 72 73 74 2c 20 61 20 07 |m the fi|rst, a .|
|00004a20| 0e 0d 9e 00 0e 0d 9e 00 | 00 00 00 00 66 6c 6f 61 |........|....floa|
|00004a30| 74 08 9d 00 0e 0e 9e 00 | 00 00 00 00 20 00 00 00 |t.......|.... ...|
|00004a40| 00 cc 00 00 a5 80 00 00 | 40 f8 79 03 ae c3 c6 ff |........|@.y.....|
|00004a50| 8e f2 c6 ff 20 22 00 00 | 66 72 6f 6d 20 74 68 65 |.... "..|from the|
|00004a60| 20 73 65 63 6f 6e 64 2c | 20 61 6e 64 20 61 20 07 | second,| and a .|
|00004a70| 0e 0f 9e 00 0e 0f 9e 00 | 00 00 00 00 63 68 61 72 |........|....char|
|00004a80| 20 2a 08 20 0e 10 9e 00 | 00 00 00 00 20 66 72 6f | *. ....|.... fro|
|00004a90| 6d 20 74 68 65 20 74 68 | 69 72 64 2e 0d 07 69 72 |m the th|ird...ir|
|00004aa0| 12 11 9e 00 12 11 9e 00 | 00 00 00 00 07 65 20 75 |........|.....e u|
|00004ab0| 0c 12 9e 00 12 11 9e 00 | 0c 12 9e 00 00 00 00 00 |........|........|
|00004ac0| 00 80 00 00 25 2c 00 00 | 40 50 bd 01 a7 5c c6 ff |....%,..|@P...\..|
|00004ad0| b7 83 c6 ff 70 1a 00 00 | 23 69 6e 63 6c 75 64 65 |....p...|#include|
|00004ae0| 20 3c 45 58 54 45 52 4e | 2e 68 3e 0d 00 2c 00 00 | <EXTERN|.h>..,..|
|00004af0| a5 54 00 00 40 70 8e 01 | c7 2d c6 ff d7 54 c6 ff |.T..@p..|.-...T..|
|00004b00| 70 1a 00 00 23 69 6e 63 | 6c 75 64 65 20 3c 70 65 |p...#inc|lude <pe|
|00004b10| 72 6c 2e 68 3e 0d 08 6e | 0c 13 9e 00 12 11 9e 00 |rl.h>..n|........|
|00004b20| 00 00 00 00 08 62 6c 65 | 12 00 00 00 00 00 00 00 |.....ble|........|
|00004b30| 07 00 00 00 18 14 9e 00 | 18 14 9e 00 00 00 00 00 |........|........|
|00004b40| 00 54 00 00 a5 48 00 00 | 40 00 00 00 37 19 c6 ff |.T...H..|@...7...|
|00004b50| f7 25 c6 ff 00 00 00 00 | 0d 08 63 63 18 15 9e 00 |.%......|..cc....|
|00004b60| 00 00 00 00 07 70 20 69 | 12 16 9e 00 12 16 9e 00 |.....p i|........|
|00004b70| 00 00 00 00 07 20 2d 4d | 0c 17 9e 00 12 16 9e 00 |..... -M|........|
|00004b80| 0c 17 9e 00 00 00 00 00 | 00 48 00 00 a5 64 00 00 |........|.H...d..|
|00004b90| 40 00 ee 02 37 c8 c5 ff | 47 ef c5 ff 70 1a 00 00 |@...7...|G...p...|
|00004ba0| 73 74 61 74 69 63 20 50 | 65 72 6c 49 6e 74 65 72 |static P|erlInter|
|00004bb0| 70 72 65 74 65 72 20 2a | 6d 79 5f 70 65 72 6c 3b |preter *|my_perl;|
|00004bc0| 0d 08 9d 00 0c 18 9e 00 | 12 16 9e 00 00 00 00 00 |........|........|
|00004bd0| 08 00 00 00 12 00 00 00 | 00 00 00 00 07 a4 9d 00 |........|........|
|00004be0| 18 19 9e 00 18 19 9e 00 | 00 00 00 00 00 64 00 00 |........|.....d..|
|00004bf0| a5 48 00 00 40 00 00 00 | a7 b3 c5 ff 67 c0 c5 ff |.H..@...|....g...|
|00004c00| 00 00 00 00 0d 08 75 27 | 18 1a 9e 00 00 00 00 00 |......u'|........|
|00004c10| 07 65 20 74 12 1b 9e 00 | 12 1b 9e 00 00 00 00 00 |.e t....|........|
|00004c20| 07 a4 9d 00 0c 1c 9e 00 | 12 1b 9e 00 0c 1c 9e 00 |........|........|
|00004c30| 00 00 00 00 00 48 00 00 | 25 44 00 00 40 80 a9 03 |.....H..|%D..@...|
|00004c40| a7 62 c5 ff b7 89 c5 ff | 70 1a 00 00 6d 61 69 6e |.b......|p...main|
|00004c50| 20 28 69 6e 74 20 61 72 | 67 63 2c 20 63 68 61 72 | (int ar|gc, char|
|00004c60| 20 2a 2a 61 72 67 76 2c | 20 63 68 61 72 20 2a 2a | **argv,| char **|
|00004c70| 65 6e 76 29 0d 00 00 00 | 00 44 00 00 25 1c 00 00 |env)....|.D..%...|
|00004c80| 40 70 17 00 c7 33 c5 ff | d7 5a c5 ff 70 1a 00 00 |@p...3..|.Z..p...|
|00004c90| 7b 0d 00 00 00 1c 00 00 | a5 6c 00 00 40 60 d8 03 |{.......|.l..@`..|
|00004ca0| e7 04 c5 ff f7 2b c5 ff | 70 1a 00 00 20 20 20 20 |.....+..|p... |
|00004cb0| 63 68 61 72 20 2a 65 6d | 62 65 64 64 69 6e 67 5b |char *em|bedding[|
|00004cc0| 5d 20 3d 20 7b 20 22 22 | 2c 20 22 2d 65 22 2c 20 |] = { ""|, "-e", |
|00004cd0| 22 30 22 20 7d 3b 0d 08 | 0c 1d 9e 00 12 1b 9e 00 |"0" };..|........|
|00004ce0| 00 00 00 00 08 20 47 6f | 12 00 00 00 00 00 00 00 |..... Go|........|
|00004cf0| 07 30 38 39 18 1e 9e 00 | 18 1e 9e 00 00 00 00 00 |.089....|........|
|00004d00| 00 6c 00 00 a5 48 00 00 | 40 00 00 00 57 f0 c4 ff |.l...H..|@...W...|
|00004d10| 17 fd c4 ff 00 00 00 00 | 0d 08 00 00 18 1f 9e 00 |........|........|
|00004d20| 00 00 00 00 07 a9 9d 00 | 12 20 9e 00 12 20 9e 00 |........|. ... ..|
|00004d30| 00 00 00 00 07 aa 9d 00 | 0c 21 9e 00 12 20 9e 00 |........|.!... ..|
|00004d40| 0c 21 9e 00 00 00 00 00 | 00 48 00 00 25 30 00 00 |.!......|.H..%0..|
|00004d50| 40 10 1b 02 57 9f c4 ff | 67 c6 c4 ff 70 1a 00 00 |@...W...|g...p...|
|00004d60| 6d 79 5f 70 65 72 6c 20 | 3d 20 70 65 72 6c 5f 61 |my_perl |= perl_a|
|00004d70| 6c 6c 6f 63 28 29 3b 0d | 00 30 00 00 a5 5c 00 00 |lloc();.|.0...\..|
|00004d80| 40 60 61 02 77 70 c4 ff | 87 97 c4 ff 70 1a 00 00 |@`a.wp..|....p...|
|00004d90| 70 65 72 6c 5f 63 6f 6e | 73 74 72 75 63 74 28 20 |perl_con|struct( |
|00004da0| 6d 79 5f 70 65 72 6c 20 | 29 3b 0d 08 0c 22 9e 00 |my_perl |);..."..|
|00004db0| 12 20 9e 00 00 00 00 00 | 08 00 00 00 12 00 00 00 |. ......|........|
|00004dc0| 00 00 00 00 07 00 00 00 | 18 23 9e 00 18 23 9e 00 |........|.#...#..|
|00004dd0| 00 00 00 00 00 5c 00 00 | a5 48 00 00 40 00 00 00 |.....\..|.H..@...|
|00004de0| e7 5b c4 ff a7 68 c4 ff | 00 00 00 00 0d 08 74 65 |.[...h..|......te|
|00004df0| 18 24 9e 00 00 00 00 00 | 07 6d 20 61 12 25 9e 00 |.$......|.m a.%..|
|00004e00| 12 25 9e 00 00 00 00 00 | 07 6e 20 74 0c 26 9e 00 |.%......|.n t.&..|
|00004e10| 12 25 9e 00 0c 26 9e 00 | 00 00 00 00 00 48 00 00 |.%...&..|.....H..|
|00004e20| 25 48 00 00 40 20 36 04 | e7 0a c4 ff f7 31 c4 ff |%H..@ 6.|.....1..|
|00004e30| 70 1a 00 00 70 65 72 6c | 5f 70 61 72 73 65 28 6d |p...perl|_parse(m|
|00004e40| 79 5f 70 65 72 6c 2c 20 | 4e 55 4c 4c 2c 20 33 2c |y_perl, |NULL, 3,|
|00004e50| 20 65 6d 62 65 64 64 69 | 6e 67 2c 20 4e 55 4c 4c | embeddi|ng, NULL|
|00004e60| 29 3b 0d 00 00 48 00 00 | a5 54 00 00 40 e0 a5 01 |);...H..|.T..@...|
|00004e70| 07 dc c3 ff 17 03 c4 ff | 70 1a 00 00 70 65 72 6c |........|p...perl|
|00004e80| 5f 72 75 6e 28 6d 79 5f | 70 65 72 6c 29 3b 0d 08 |_run(my_|perl);..|
|00004e90| 0c 27 9e 00 12 25 9e 00 | 00 00 00 00 08 b2 9d 00 |.'...%..|........|
|00004ea0| 12 00 00 00 00 00 00 00 | 07 6e 67 20 18 28 9e 00 |........|.ng .(..|
|00004eb0| 18 28 9e 00 00 00 00 00 | 00 54 00 00 a5 48 00 00 |.(......|.T...H..|
|00004ec0| 40 00 00 00 77 c7 c3 ff | 37 d4 c3 ff 00 00 00 00 |@...w...|7.......|
|00004ed0| 0d 08 08 05 18 29 9e 00 | 00 00 00 00 07 6f 20 63 |.....)..|.....o c|
|00004ee0| 12 2a 9e 00 12 2a 9e 00 | 00 00 00 00 07 6c 20 50 |.*...*..|.....l P|
|00004ef0| 0c 2b 9e 00 12 2a 9e 00 | 0c 2b 9e 00 00 00 00 00 |.+...*..|.+......|
|00004f00| 00 48 00 00 25 38 00 00 | 40 20 bf 02 77 76 c3 ff |.H..%8..|@ ..wv..|
|00004f10| 87 9d c3 ff 70 1a 00 00 | 2f 2a 2a 20 54 72 65 61 |....p...|/** Trea|
|00004f20| 74 20 24 61 20 61 73 20 | 61 6e 20 69 6e 74 65 67 |t $a as |an integ|
|00004f30| 65 72 20 2a 2a 2f 0d 00 | 00 38 00 00 25 40 00 00 |er **/..|.8..%@..|
|00004f40| 40 10 92 03 97 47 c3 ff | a7 6e c3 ff 70 1a 00 00 |@....G..|.n..p...|
|00004f50| 70 65 72 6c 5f 65 76 61 | 6c 5f 70 76 28 22 24 61 |perl_eva|l_pv("$a|
|00004f60| 20 3d 20 33 3b 20 24 61 | 20 2a 2a 3d 20 32 22 2c | = 3; $a| **= 2",|
|00004f70| 20 54 52 55 45 29 3b 0d | 00 40 00 00 a5 74 00 00 | TRUE);.|.@...t..|
|00004f80| 40 e0 93 04 b7 18 c3 ff | c7 3f c3 ff 70 1a 00 00 |@.......|.?..p...|
|00004f90| 70 72 69 6e 74 66 28 22 | 61 20 3d 20 25 64 5c 6e |printf("|a = %d\n|
|00004fa0| 22 2c 20 53 76 49 56 28 | 70 65 72 6c 5f 67 65 74 |", SvIV(|perl_get|
|00004fb0| 5f 73 76 28 22 61 22 2c | 20 46 41 4c 53 45 29 29 |_sv("a",| FALSE))|
|00004fc0| 29 3b 0d 08 0c 2c 9e 00 | 12 2a 9e 00 00 00 00 00 |);...,..|.*......|
|00004fd0| 08 00 00 00 12 00 00 00 | 00 00 00 00 07 73 68 6f |........|.....sho|
|00004fe0| 18 2d 9e 00 18 2d 9e 00 | 00 00 00 00 00 74 00 00 |.-...-..|.....t..|
|00004ff0| a5 48 00 00 40 00 00 00 | 27 04 c3 ff e7 10 c3 ff |.H..@...|'.......|
|00005000| 00 00 00 00 0d 08 9d 00 | 18 2e 9e 00 00 00 00 00 |........|........|
|00005010| 07 68 6f 77 12 2f 9e 00 | 12 2f 9e 00 00 00 00 00 |.how./..|./......|
|00005020| 07 00 00 00 0c 30 9e 00 | 12 2f 9e 00 0c 30 9e 00 |.....0..|./...0..|
|00005030| 00 00 00 00 00 48 00 00 | 25 34 00 00 40 d0 78 02 |.....H..|%4..@.x.|
|00005040| 27 b3 c2 ff 37 da c2 ff | 70 1a 00 00 2f 2a 2a 20 |'...7...|p.../** |
|00005050| 54 72 65 61 74 20 24 61 | 20 61 73 20 61 20 66 6c |Treat $a| as a fl|
|00005060| 6f 61 74 20 2a 2a 2f 0d | 00 34 00 00 25 44 00 00 |oat **/.|.4..%D..|
|00005070| 40 60 d8 03 47 84 c2 ff | 57 ab c2 ff 70 1a 00 00 |@`..G...|W...p...|
|00005080| 70 65 72 6c 5f 65 76 61 | 6c 5f 70 76 28 22 24 61 |perl_eva|l_pv("$a|
|00005090| 20 3d 20 33 2e 31 34 3b | 20 24 61 20 2a 2a 3d 20 | = 3.14;| $a **= |
|000050a0| 32 22 2c 20 54 52 55 45 | 29 3b 0d 00 00 44 00 00 |2", TRUE|);...D..|
|000050b0| a5 74 00 00 40 e0 93 04 | 67 55 c2 ff 77 7c c2 ff |.t..@...|gU..w|..|
|000050c0| 70 1a 00 00 70 72 69 6e | 74 66 28 22 61 20 3d 20 |p...prin|tf("a = |
|000050d0| 25 66 5c 6e 22 2c 20 53 | 76 4e 56 28 70 65 72 6c |%f\n", S|vNV(perl|
|000050e0| 5f 67 65 74 5f 73 76 28 | 22 61 22 2c 20 46 41 4c |_get_sv(|"a", FAL|
|000050f0| 53 45 29 29 29 3b 0d 08 | 0c 31 9e 00 12 2f 9e 00 |SE)));..|.1.../..|
|00005100| 00 00 00 00 08 05 05 05 | 12 00 00 00 00 00 00 00 |........|........|
|00005110| 07 00 00 00 18 32 9e 00 | 18 32 9e 00 00 00 00 00 |.....2..|.2......|
|00005120| 00 74 00 00 a5 48 00 00 | 40 00 00 00 d7 40 c2 ff |.t...H..|@....@..|
|00005130| 97 4d c2 ff 00 00 00 00 | 0d 08 9d 00 18 33 9e 00 |.M......|.....3..|
|00005140| 00 00 00 00 07 6e 74 20 | 12 34 9e 00 12 34 9e 00 |.....nt |.4...4..|
|00005150| 00 00 00 00 07 2c 20 63 | 0c 35 9e 00 12 34 9e 00 |....., c|.5...4..|
|00005160| 0c 35 9e 00 00 00 00 00 | 00 48 00 00 25 38 00 00 |.5......|.H..%8..|
|00005170| 40 40 90 02 d7 ef c1 ff | e7 16 c2 ff 70 1a 00 00 |@@......|....p...|
|00005180| 2f 2a 2a 20 54 72 65 61 | 74 20 24 61 20 61 73 20 |/** Trea|t $a as |
|00005190| 61 20 73 74 72 69 6e 67 | 20 2a 2a 2f 0d 00 00 00 |a string| **/....|
|000051a0| 00 38 00 00 25 64 00 00 | 40 f0 ae 06 f7 c0 c1 ff |.8..%d..|@.......|
|000051b0| 07 e8 c1 ff 70 1a 00 00 | 70 65 72 6c 5f 65 76 61 |....p...|perl_eva|
|000051c0| 6c 5f 70 76 28 22 24 61 | 20 3d 20 27 72 65 6b 63 |l_pv("$a| = 'rekc|
|000051d0| 61 48 20 6c 72 65 50 20 | 72 65 68 74 6f 6e 41 20 |aH lreP |rehtonA |
|000051e0| 74 73 75 4a 27 3b 20 24 | 61 20 3d 20 72 65 76 65 |tsuJ'; $|a = reve|
|000051f0| 72 73 65 28 24 61 29 3b | 22 2c 20 54 52 55 45 29 |rse($a);|", TRUE)|
|00005200| 3b 0d 00 00 00 64 00 00 | a5 78 00 00 40 a0 f1 04 |;....d..|.x..@...|
|00005210| 17 92 c1 ff 27 b9 c1 ff | 70 1a 00 00 70 72 69 6e |....'...|p...prin|
|00005220| 74 66 28 22 61 20 3d 20 | 25 73 5c 6e 22 2c 20 53 |tf("a = |%s\n", S|
|00005230| 76 50 56 28 70 65 72 6c | 5f 67 65 74 5f 73 76 28 |vPV(perl|_get_sv(|
|00005240| 22 61 22 2c 20 46 41 4c | 53 45 29 2c 20 6e 61 29 |"a", FAL|SE), na)|
|00005250| 29 3b 0d 08 0c 36 9e 00 | 12 34 9e 00 00 00 00 00 |);...6..|.4......|
|00005260| 08 05 05 05 12 00 00 00 | 00 00 00 00 07 05 05 05 |........|........|
|00005270| 18 37 9e 00 18 37 9e 00 | 00 00 00 00 00 78 00 00 |.7...7..|.....x..|
|00005280| a5 48 00 00 40 00 00 00 | 87 7d c1 ff 47 8a c1 ff |.H..@...|.}..G...|
|00005290| 00 00 00 00 0d 08 00 00 | 18 38 9e 00 00 00 00 00 |........|.8......|
|000052a0| 07 cc 9d 00 12 39 9e 00 | 12 39 9e 00 00 00 00 00 |.....9..|.9......|
|000052b0| 07 73 6b 69 0c 3a 9e 00 | 12 39 9e 00 0c 3a 9e 00 |.ski.:..|.9...:..|
|000052c0| 00 00 00 00 00 48 00 00 | 25 34 00 00 40 d0 78 02 |.....H..|%4..@.x.|
|000052d0| 87 2c c1 ff 97 53 c1 ff | 70 1a 00 00 20 20 20 20 |.,...S..|p... |
|000052e0| 70 65 72 6c 5f 64 65 73 | 74 72 75 63 74 28 6d 79 |perl_des|truct(my|
|000052f0| 5f 70 65 72 6c 29 3b 0d | 00 34 00 00 25 30 00 00 |_perl);.|.4..%0..|
|00005300| 40 10 1b 02 a7 fd c0 ff | b7 24 c1 ff 70 1a 00 00 |@.......|.$..p...|
|00005310| 20 20 20 20 70 65 72 6c | 5f 66 72 65 65 28 6d 79 | perl|_free(my|
|00005320| 5f 70 65 72 6c 29 3b 0d | 00 30 00 00 a5 44 00 00 |_perl);.|.0...D..|
|00005330| 40 70 17 00 c7 ce c0 ff | d7 f5 c0 ff 70 1a 00 00 |@p......|....p...|
|00005340| 7d 0d 08 53 0c 3b 9e 00 | 12 39 9e 00 00 00 00 00 |}..S.;..|.9......|
|00005350| 08 47 53 2c 12 00 00 00 | 00 00 00 00 07 05 05 05 |.GS,....|........|
|00005360| 18 3c 9e 00 18 3c 9e 00 | 00 00 00 00 00 44 00 00 |.<...<..|.....D..|
|00005370| a5 24 00 00 40 00 00 00 | 37 ba c0 ff f7 c6 c0 ff |.$..@...|7.......|
|00005380| 00 00 00 00 0d 08 00 00 | 18 3d 9e 00 00 00 00 00 |........|.=......|
|00005390| 00 24 00 00 85 a4 00 00 | 00 b0 e1 07 67 61 c0 ff |.$......|....ga..|
|000053a0| 47 90 c0 ff 20 22 00 00 | 41 6c 6c 20 6f 66 20 74 |G... "..|All of t|
|000053b0| 68 6f 73 65 20 73 74 72 | 61 6e 67 65 20 66 75 6e |hose str|ange fun|
|000053c0| 63 74 69 6f 6e 73 20 77 | 69 74 68 20 07 70 65 72 |ctions w|ith .per|
|000053d0| 11 3e 9e 00 11 3e 9e 00 | 00 00 00 00 73 76 08 65 |.>...>..|....sv.e|
|000053e0| 11 00 00 00 00 00 00 00 | 20 69 6e 20 74 68 65 69 |........| in thei|
|000053f0| 72 20 6e 61 6d 65 73 20 | 68 65 6c 70 20 63 6f 6e |r names |help con|
|00005400| 76 65 72 74 20 50 65 72 | 6c 20 73 63 61 6c 61 72 |vert Per|l scalar|
|00005410| 73 20 74 6f 20 43 20 74 | 79 70 65 73 2e 20 20 54 |s to C t|ypes. T|
|00005420| 68 65 79 27 72 65 20 64 | 65 73 63 72 69 62 65 64 |hey're d|escribed|
|00005430| 20 00 00 00 00 a4 00 00 | a5 58 00 00 40 a4 ba 01 | .......|.X..@...|
|00005440| 40 29 c0 ff 20 58 c0 ff | 20 22 00 00 69 6e 20 74 |@).. X..| "..in t|
|00005450| 68 65 20 63 68 61 70 74 | 65 72 20 07 10 3f 9e 00 |he chapt|er ..?..|
|00005460| 10 3f 9e 00 00 00 00 00 | 70 65 72 6c 67 75 74 73 |.?......|perlguts|
|00005470| 08 72 67 75 10 00 00 00 | 00 00 00 00 2e 0d 07 27 |.rgu....|.......'|
|00005480| 14 40 9e 00 14 40 9e 00 | 00 00 00 00 00 58 00 00 |.@...@..|.....X..|
|00005490| 01 10 00 00 01 b4 b0 07 | 00 00 00 00 00 10 00 00 |........|........|
|000054a0| 02 18 00 00 d4 08 00 00 | 00 00 00 00 14 40 9e 00 |........|.....@..|
|000054b0| 00 00 00 00 00 18 00 00 | 85 24 01 00 00 b4 b0 07 |........|.$......|
|000054c0| 0b 46 be ff eb 74 be ff | 20 22 00 00 16 00 00 00 |.F...t..| "......|
|000054d0| b0 fc 07 00 00 00 00 00 | 49 66 20 79 6f 75 20 63 |........|If you c|
|000054e0| 6f 6d 70 69 6c 65 20 61 | 6e 64 20 72 75 6e 20 07 |ompile a|nd run .|
|000054f0| 11 41 9e 00 14 40 9e 00 | 11 41 9e 00 00 00 00 00 |.A...@..|.A......|
|00005500| 73 74 72 69 6e 67 2e 63 | 08 42 9e 00 11 00 00 00 |string.c|.B......|
|00005510| 14 40 9e 00 00 00 00 00 | 2c 20 79 6f 75 27 6c 6c |.@......|, you'll|
|00005520| 20 73 65 65 20 74 68 65 | 20 72 65 73 75 6c 74 73 | see the| results|
|00005530| 20 6f 66 20 75 73 69 6e | 67 20 07 65 11 42 9e 00 | of usin|g .e.B..|
|00005540| 14 40 9e 00 11 42 9e 00 | 00 00 00 00 53 76 49 56 |.@...B..|....SvIV|
|00005550| 28 29 08 00 11 00 00 00 | 14 40 9e 00 00 00 00 00 |()......|.@......|
|00005560| 20 74 6f 20 63 72 65 61 | 74 65 20 61 6e 20 07 00 | to crea|te an ..|
|00005570| 0e 43 9e 00 14 40 9e 00 | 0e 43 9e 00 00 00 00 00 |.C...@..|.C......|
|00005580| 69 6e 74 08 0e 44 9e 00 | 14 40 9e 00 00 00 00 00 |int..D..|.@......|
|00005590| 2c 20 07 00 11 45 9e 00 | 14 40 9e 00 11 45 9e 00 |, ...E..|.@...E..|
|000055a0| 00 00 00 00 53 76 4e 56 | 28 29 08 00 11 00 00 00 |....SvNV|()......|
|000055b0| 14 40 9e 00 00 00 00 00 | 20 74 6f 20 63 72 65 61 |.@......| to crea|
|000055c0| 74 65 20 61 20 07 65 64 | 0e 46 9e 00 14 40 9e 00 |te a .ed|.F...@..|
|000055d0| 0e 46 9e 00 00 00 00 00 | 00 24 01 00 a5 9c 00 00 |.F......|.$......|
|000055e0| 40 14 c8 02 e4 0d be ff | c4 3c be ff ba 1f 00 00 |@.......|.<......|
|000055f0| 66 6c 6f 61 74 08 08 05 | 0e 47 9e 00 14 40 9e 00 |float...|.G...@..|
|00005600| 00 00 00 00 2c 20 61 6e | 64 20 07 00 11 48 9e 00 |...., an|d ...H..|
|00005610| 14 40 9e 00 11 48 9e 00 | 00 00 00 00 53 76 50 56 |.@...H..|....SvPV|
|00005620| 28 29 08 00 11 00 00 00 | 14 40 9e 00 00 00 00 00 |()......|.@......|
|00005630| 20 74 6f 20 63 72 65 61 | 74 65 20 61 20 73 74 72 | to crea|te a str|
|00005640| 69 6e 67 3a 0d 08 9d 00 | 14 00 00 00 00 00 00 00 |ing:....|........|
|00005650| 07 05 05 05 12 49 9e 00 | 12 49 9e 00 00 00 00 00 |.....I..|.I......|
|00005660| 07 e5 9d 00 0c 4a 9e 00 | 12 49 9e 00 0c 4a 9e 00 |.....J..|.I...J..|
|00005670| 00 00 00 00 00 9c 00 00 | 25 20 00 00 40 30 75 00 |........|% ..@0u.|
|00005680| dd a6 bd ff ed cd bd ff | 70 1a 00 00 61 20 3d 20 |........|p...a = |
|00005690| 39 0d 00 00 00 20 00 00 | 25 28 00 00 40 40 19 01 |9.... ..|%(..@@..|
|000056a0| fd 77 bd ff 0d 9f bd ff | 70 1a 00 00 61 20 3d 20 |.w......|p...a = |
|000056b0| 39 2e 38 35 39 36 30 30 | 0d 00 00 00 00 28 00 00 |9.859600|.....(..|
|000056c0| a5 60 00 00 40 40 90 02 | 1d 49 bd ff 2d 70 bd ff |.`..@@..|.I..-p..|
|000056d0| 70 1a 00 00 61 20 3d 20 | 4a 75 73 74 20 41 6e 6f |p...a = |Just Ano|
|000056e0| 74 68 65 72 20 50 65 72 | 6c 20 48 61 63 6b 65 72 |ther Per|l Hacker|
|000056f0| 0d 08 00 00 0c 4b 9e 00 | 12 49 9e 00 00 00 00 00 |.....K..|.I......|
|00005700| 08 00 00 00 12 00 00 00 | 00 00 00 00 07 6f 75 67 |........|.....oug|
|00005710| 18 4c 9e 00 18 4c 9e 00 | 00 00 00 00 00 60 00 00 |.L...L..|.....`..|
|00005720| a5 34 00 00 40 00 00 00 | 8d 34 bd ff 4d 41 bd ff |.4..@...|.4..MA..|
|00005730| 00 00 00 00 0d 08 05 05 | 18 4d 9e 00 00 00 00 00 |........|.M......|
|00005740| 07 00 00 00 14 4e 9e 00 | 14 4e 9e 00 00 00 00 00 |.....N..|.N......|
|00005750| 00 34 00 00 05 84 00 00 | 00 2c db 07 bd db bc ff |.4......|.,......|
|00005760| 9d 0a bd ff 20 22 00 00 | 49 6e 20 74 68 65 20 65 |.... "..|In the e|
|00005770| 78 61 6d 70 6c 65 20 61 | 62 6f 76 65 2c 20 77 65 |xample a|bove, we|
|00005780| 27 76 65 20 63 72 65 61 | 74 65 64 20 61 20 67 6c |'ve crea|ted a gl|
|00005790| 6f 62 61 6c 20 76 61 72 | 69 61 62 6c 65 20 74 6f |obal var|iable to|
|000057a0| 20 74 65 6d 70 6f 72 61 | 72 69 6c 79 20 73 74 6f | tempora|rily sto|
|000057b0| 72 65 20 74 68 65 20 63 | 6f 6d 70 75 74 65 64 20 |re the c|omputed |
|000057c0| 76 61 6c 75 65 20 6f 66 | 20 6f 75 72 20 65 76 61 |value of| our eva|
|000057d0| 6c 27 64 20 00 84 00 00 | 85 9c 00 00 00 20 c9 07 |l'd ....|..... ..|
|000057e0| 96 a3 bc ff 76 d2 bc ff | 20 22 00 00 65 78 70 72 |....v...| "..expr|
|000057f0| 65 73 73 69 6f 6e 2e 20 | 20 49 74 20 69 73 20 61 |ession. | It is a|
|00005800| 6c 73 6f 20 70 6f 73 73 | 69 62 6c 65 20 61 6e 64 |lso poss|ible and|
|00005810| 20 69 6e 20 6d 6f 73 74 | 20 63 61 73 65 73 20 61 | in most| cases a|
|00005820| 20 62 65 74 74 65 72 20 | 73 74 72 61 74 65 67 79 | better |strategy|
|00005830| 20 74 6f 20 66 65 74 63 | 68 20 74 68 65 20 72 65 | to fetc|h the re|
|00005840| 74 75 72 6e 20 76 61 6c | 75 65 20 66 72 6f 6d 20 |turn val|ue from |
|00005850| 74 68 65 20 63 68 61 70 | 74 65 72 20 07 74 68 65 |the chap|ter .the|
|00005860| 10 4f 9e 00 14 4e 9e 00 | 10 4f 9e 00 00 00 00 00 |.O...N..|.O......|
|00005870| 00 9c 00 00 a5 78 00 00 | 40 28 69 02 6f 6b bc ff |.....x..|@(i.ok..|
|00005880| 4f 9a bc ff 28 23 00 00 | 70 65 72 6c 5f 65 76 61 |O...(#..|perl_eva|
|00005890| 6c 5f 70 76 08 37 30 20 | 10 00 00 00 14 4e 9e 00 |l_pv.70 |.....N..|
|000058a0| 00 00 00 00 20 69 6e 73 | 74 65 61 64 2e 20 20 45 |.... ins|tead. E|
|000058b0| 78 61 6d 70 6c 65 3a 0d | 08 2c 20 61 14 00 00 00 |xample:.|., a....|
|000058c0| 00 00 00 00 07 6d 65 6e | 12 50 9e 00 12 50 9e 00 |.....men|.P...P..|
|000058d0| 00 00 00 00 07 74 69 6e | 0c 51 9e 00 12 50 9e 00 |.....tin|.Q...P..|
|000058e0| 0c 51 9e 00 00 00 00 00 | 00 78 00 00 25 1c 00 00 |.Q......|.x..%...|
|000058f0| 40 50 46 00 68 04 bc ff | 78 2b bc ff 70 1a 00 00 |@PF.h...|x+..p...|
|00005900| 2e 2e 2e 0d 00 1c 00 00 | 25 5c 00 00 40 50 22 06 |........|%\..@P".|
|00005910| 88 d5 bb ff 98 fc bb ff | 70 1a 00 00 53 56 20 2a |........|p...SV *|
|00005920| 76 61 6c 20 3d 20 70 65 | 72 6c 5f 65 76 61 6c 5f |val = pe|rl_eval_|
|00005930| 70 76 28 22 72 65 76 65 | 72 73 65 20 27 72 65 6b |pv("reve|rse 'rek|
|00005940| 63 61 48 20 6c 72 65 50 | 20 72 65 68 74 6f 6e 41 |caH lreP| rehtonA|
|00005950| 20 74 73 75 4a 27 22 2c | 20 54 52 55 45 29 3b 0d | tsuJ'",| TRUE);.|
|00005960| 00 5c 00 00 25 38 00 00 | 40 b0 a7 02 a8 a6 bb ff |.\..%8..|@.......|
|00005970| b8 cd bb ff 70 1a 00 00 | 70 72 69 6e 74 66 28 22 |....p...|printf("|
|00005980| 25 73 5c 6e 22 2c 20 53 | 76 50 56 28 76 61 6c 2c |%s\n", S|vPV(val,|
|00005990| 6e 61 29 29 3b 0d 00 00 | 00 38 00 00 a5 48 00 00 |na));...|.8...H..|
|000059a0| 40 50 46 00 c8 77 bb ff | d8 9e bb ff 70 1a 00 00 |@PF..w..|....p...|
|000059b0| 2e 2e 2e 0d 08 6a 65 63 | 0c 52 9e 00 12 50 9e 00 |.....jec|.R...P..|
|000059c0| 00 00 00 00 08 00 00 00 | 12 00 00 00 00 00 00 00 |........|........|
|000059d0| 07 f9 9d 00 18 53 9e 00 | 18 53 9e 00 00 00 00 00 |.....S..|.S......|
|000059e0| 00 48 00 00 a5 24 00 00 | 40 00 00 00 38 63 bb ff |.H...$..|@...8c..|
|000059f0| f8 6f bb ff 00 00 00 00 | 0d 08 00 00 18 54 9e 00 |.o......|.....T..|
|00005a00| 00 00 00 00 00 24 00 00 | 05 84 00 00 00 bc c6 07 |.....$..|........|
|00005a10| 68 0a bb ff 48 39 bb ff | 20 22 00 00 54 68 69 73 |h...H9..| "..This|
|00005a20| 20 77 61 79 2c 20 77 65 | 20 61 76 6f 69 64 20 6e | way, we| avoid n|
|00005a30| 61 6d 65 73 70 61 63 65 | 20 70 6f 6c 6c 75 74 69 |amespace| polluti|
|00005a40| 6f 6e 20 62 79 20 6e 6f | 74 20 63 72 65 61 74 69 |on by no|t creati|
|00005a50| 6e 67 20 67 6c 6f 62 61 | 6c 20 76 61 72 69 61 62 |ng globa|l variab|
|00005a60| 6c 65 73 20 61 6e 64 20 | 77 65 27 76 65 20 73 69 |les and |we've si|
|00005a70| 6d 70 6c 69 66 69 65 64 | 20 6f 75 72 20 63 6f 64 |mplified| our cod|
|00005a80| 65 20 61 73 20 00 00 00 | 00 84 00 00 a5 2c 00 00 |e as ...|.....,..|
|00005a90| 40 70 5c 00 41 d2 ba ff | 21 01 bb ff 20 22 00 00 |@p\.A...|!... "..|
|00005aa0| 77 65 6c 6c 2e 0d 07 05 | 0a 55 9e 00 0a 55 9e 00 |well....|.U...U..|
|00005ab0| 00 00 00 00 00 2c 00 00 | a5 68 00 00 40 64 c4 06 |.....,..|.h..@d..|
|00005ac0| 9a 5b ba ff 4a 92 ba ff | 18 2b 00 00 50 65 72 66 |.[..J...|.+..Perf|
|00005ad0| 6f 72 6d 69 6e 67 20 50 | 65 72 6c 20 70 61 74 74 |orming P|erl patt|
|00005ae0| 65 72 6e 20 6d 61 74 63 | 68 65 73 20 61 6e 64 20 |ern matc|hes and |
|00005af0| 73 75 62 73 74 69 74 75 | 74 69 6f 6e 73 20 66 72 |substitu|tions fr|
|00005b00| 6f 6d 20 79 6f 75 72 20 | 43 20 70 72 6f 67 72 61 |om your |C progra|
|00005b10| 6d 0d 08 72 0a 56 9e 00 | 00 00 00 00 00 68 00 00 |m..r.V..|.....h..|
|00005b20| 85 a4 00 00 00 98 ed 07 | 65 06 ba ff 45 35 ba ff |........|e...E5..|
|00005b30| 20 22 00 00 54 68 65 20 | 07 68 65 20 11 57 9e 00 | "..The |.he .W..|
|00005b40| 11 57 9e 00 00 00 00 00 | 70 65 72 6c 5f 65 76 61 |.W......|perl_eva|
|00005b50| 6c 5f 70 76 28 29 08 72 | 11 00 00 00 00 00 00 00 |l_pv().r|........|
|00005b60| 20 66 75 6e 63 74 69 6f | 6e 20 6c 65 74 73 20 75 | functio|n lets u|
|00005b70| 73 20 65 76 61 6c 75 61 | 74 65 20 73 74 72 69 6e |s evalua|te strin|
|00005b80| 67 73 20 6f 66 20 50 65 | 72 6c 20 63 6f 64 65 2c |gs of Pe|rl code,|
|00005b90| 20 73 6f 20 77 65 20 63 | 61 6e 20 64 65 66 69 6e | so we c|an defin|
|00005ba0| 65 20 73 6f 6d 65 20 66 | 75 6e 63 74 69 6f 6e 73 |e some f|unctions|
|00005bb0| 20 74 68 61 74 20 75 73 | 65 20 69 74 20 00 00 00 | that us|e it ...|
|00005bc0| 00 a4 00 00 a5 d8 00 00 | 40 40 ed 05 3e ce b9 ff |........|@@..>...|
|00005bd0| 1e fd b9 ff 20 22 00 00 | 74 6f 20 22 73 70 65 63 |.... "..|to "spec|
|00005be0| 69 61 6c 69 7a 65 22 20 | 69 6e 20 6d 61 74 63 68 |ialize" |in match|
|00005bf0| 65 73 20 61 6e 64 20 73 | 75 62 73 74 69 74 75 74 |es and s|ubstitut|
|00005c00| 69 6f 6e 73 3a 20 07 6d | 11 58 9e 00 11 58 9e 00 |ions: .m|.X...X..|
|00005c10| 00 00 00 00 6d 61 74 63 | 68 28 29 08 11 00 00 00 |....matc|h().....|
|00005c20| 00 00 00 00 2c 20 07 6c | 11 59 9e 00 11 59 9e 00 |...., .l|.Y...Y..|
|00005c30| 00 00 00 00 73 75 62 73 | 74 69 74 75 74 65 28 29 |....subs|titute()|
|00005c40| 08 6e 73 20 11 00 00 00 | 00 00 00 00 2c 20 61 6e |.ns ....|...., an|
|00005c50| 64 20 07 63 11 5a 9e 00 | 11 5a 9e 00 00 00 00 00 |d .c.Z..|.Z......|
|00005c60| 6d 61 74 63 68 65 73 28 | 29 08 20 61 11 00 00 00 |matches(|). a....|
|00005c70| 00 00 00 00 2e 0d 07 6c | 12 5b 9e 00 12 5b 9e 00 |.......l|.[...[..|
|00005c80| 00 00 00 00 07 6e 74 72 | 0c 5c 9e 00 12 5b 9e 00 |.....ntr|.\...[..|
|00005c90| 0c 5c 9e 00 00 00 00 00 | 00 d8 00 00 a5 6c 00 00 |.\......|.....l..|
|00005ca0| 40 80 a9 03 37 67 b9 ff | 47 8e b9 ff 70 1a 00 00 |@...7g..|G...p...|
|00005cb0| 63 68 61 72 20 6d 61 74 | 63 68 28 63 68 61 72 20 |char mat|ch(char |
|00005cc0| 2a 73 74 72 69 6e 67 2c | 20 63 68 61 72 20 2a 70 |*string,| char *p|
|00005cd0| 61 74 74 65 72 6e 29 3b | 0d 08 79 20 0c 5d 9e 00 |attern);|..y .]..|
|00005ce0| 12 5b 9e 00 00 00 00 00 | 08 72 20 07 12 00 00 00 |.[......|.r .....|
|00005cf0| 00 00 00 00 07 00 00 00 | 18 5e 9e 00 18 5e 9e 00 |........|.^...^..|
|00005d00| 00 00 00 00 00 6c 00 00 | a5 24 00 00 40 00 00 00 |.....l..|.$..@...|
|00005d10| a7 52 b9 ff 67 5f b9 ff | 00 00 00 00 0d 08 61 72 |.R..g_..|......ar|
|00005d20| 18 5f 9e 00 00 00 00 00 | 00 24 00 00 85 b4 00 00 |._......|.$......|
|00005d30| 00 3c ec 07 d7 f9 b8 ff | b7 28 b9 ff 20 22 00 00 |.<......|.(.. "..|
|00005d40| 47 69 76 65 6e 20 61 20 | 73 74 72 69 6e 67 20 61 |Given a |string a|
|00005d50| 6e 64 20 61 20 70 61 74 | 74 65 72 6e 20 28 65 2e |nd a pat|tern (e.|
|00005d60| 67 2e 2c 20 07 20 66 72 | 0e 60 9e 00 0e 60 9e 00 |g., . fr|.`...`..|
|00005d70| 00 00 00 00 6d 2f 63 6c | 61 73 70 2f 08 72 61 6d |....m/cl|asp/.ram|
|00005d80| 0e 61 9e 00 00 00 00 00 | 20 6f 72 20 07 63 61 6e |.a......| or .can|
|00005d90| 0e 62 9e 00 0e 62 9e 00 | 00 00 00 00 2f 5c 62 5c |.b...b..|..../\b\|
|00005da0| 77 2a 5c 62 2f 08 68 3b | 0e 63 9e 00 00 00 00 00 |w*\b/.h;|.c......|
|00005db0| 2c 20 77 68 69 63 68 20 | 69 6e 20 79 6f 75 72 20 |, which |in your |
|00005dc0| 43 20 70 72 6f 67 72 61 | 6d 20 6d 69 67 68 74 20 |C progra|m might |
|00005dd0| 61 70 70 65 61 72 20 61 | 73 20 22 2f 00 b4 00 00 |appear a|s "/....|
|00005de0| a5 90 00 00 40 b4 dc 05 | b0 c1 b8 ff 90 f0 b8 ff |....@...|........|
|00005df0| 20 22 00 00 5c 5c 62 5c | 5c 77 2a 5c 5c 62 2f 22 | "..\\b\|\w*\\b/"|
|00005e00| 29 2c 20 6d 61 74 63 68 | 28 29 20 72 65 74 75 72 |), match|() retur|
|00005e10| 6e 73 20 31 20 69 66 20 | 74 68 65 20 73 74 72 69 |ns 1 if |the stri|
|00005e20| 6e 67 20 6d 61 74 63 68 | 65 73 20 74 68 65 20 70 |ng match|es the p|
|00005e30| 61 74 74 65 72 6e 20 61 | 6e 64 20 30 20 6f 74 68 |attern a|nd 0 oth|
|00005e40| 65 72 77 69 73 65 2e 0d | 07 07 9e 00 12 64 9e 00 |erwise..|.....d..|
|00005e50| 12 64 9e 00 00 00 00 00 | 07 05 05 05 0c 65 9e 00 |.d......|.....e..|
|00005e60| 12 64 9e 00 0c 65 9e 00 | 00 00 00 00 00 90 00 00 |.d...e..|........|
|00005e70| a5 70 00 00 40 20 36 04 | a9 5a b8 ff b9 81 b8 ff |.p..@ 6.|.Z......|
|00005e80| 70 1a 00 00 69 6e 74 20 | 73 75 62 73 74 69 74 75 |p...int |substitu|
|00005e90| 74 65 28 63 68 61 72 20 | 2a 73 74 72 69 6e 67 5b |te(char |*string[|
|00005ea0| 5d 2c 20 63 68 61 72 20 | 2a 70 61 74 74 65 72 6e |], char |*pattern|
|00005eb0| 29 3b 0d 08 0c 66 9e 00 | 12 64 9e 00 00 00 00 00 |);...f..|.d......|
|00005ec0| 08 20 66 69 12 00 00 00 | 00 00 00 00 07 09 9e 00 |. fi....|........|
|00005ed0| 18 67 9e 00 18 67 9e 00 | 00 00 00 00 00 70 00 00 |.g...g..|.....p..|
|00005ee0| a5 24 00 00 40 00 00 00 | 19 46 b8 ff d9 52 b8 ff |.$..@...|.F...R..|
|00005ef0| 00 00 00 00 0d 08 75 73 | 18 68 9e 00 00 00 00 00 |......us|.h......|
|00005f00| 00 24 00 00 85 bc 00 00 | 00 74 1e 07 49 ed b7 ff |.$......|.t..I...|
|00005f10| 29 1c b8 ff 20 22 00 00 | 47 69 76 65 6e 20 61 20 |)... "..|Given a |
|00005f20| 70 6f 69 6e 74 65 72 20 | 74 6f 20 61 20 73 74 72 |pointer |to a str|
|00005f30| 69 6e 67 20 61 6e 64 20 | 61 6e 20 07 0e 69 9e 00 |ing and |an ..i..|
|00005f40| 0e 69 9e 00 00 00 00 00 | 3d 7e 08 79 0e 6a 9e 00 |.i......|=~.y.j..|
|00005f50| 00 00 00 00 20 6f 70 65 | 72 61 74 69 6f 6e 20 28 |.... ope|ration (|
|00005f60| 65 2e 67 2e 2c 20 07 2c | 0e 6b 9e 00 0e 6b 9e 00 |e.g., .,|.k...k..|
|00005f70| 00 00 00 00 73 2f 62 6f | 62 2f 72 6f 62 65 72 74 |....s/bo|b/robert|
|00005f80| 2f 67 08 05 0e 6c 9e 00 | 00 00 00 00 20 6f 72 20 |/g...l..|.... or |
|00005f90| 07 63 75 74 0e 6d 9e 00 | 0e 6d 9e 00 00 00 00 00 |.cut.m..|.m......|
|00005fa0| 74 72 5b 41 2d 5a 5d 5b | 61 2d 7a 5d 08 74 72 61 |tr[A-Z][|a-z].tra|
|00005fb0| 0e 6e 9e 00 00 00 00 00 | 29 2c 20 00 00 bc 00 00 |.n......|), .....|
|00005fc0| a5 a4 00 00 40 6c 80 07 | 22 b5 b7 ff 02 e4 b7 ff |....@l..|".......|
|00005fd0| 20 22 00 00 73 75 62 73 | 74 69 74 75 74 65 28 29 | "..subs|titute()|
|00005fe0| 20 6d 6f 64 69 66 69 65 | 73 20 74 68 65 20 73 74 | modifie|s the st|
|00005ff0| 72 69 6e 67 20 61 63 63 | 6f 72 64 69 6e 67 20 74 |ring acc|ording t|
|00006000| 6f 20 74 68 65 20 6f 70 | 65 72 61 74 69 6f 6e 2c |o the op|eration,|
|00006010| 20 72 65 74 75 72 6e 69 | 6e 67 20 74 68 65 20 6e | returni|ng the n|
|00006020| 75 6d 62 65 72 20 6f 66 | 20 73 75 62 73 74 69 74 |umber of| substit|
|00006030| 75 74 69 6f 6e 73 20 6d | 61 64 65 2e 0d 07 72 6f |utions m|ade...ro|
|00006040| 12 6f 9e 00 12 6f 9e 00 | 00 00 00 00 07 07 05 05 |.o...o..|........|
|00006050| 0c 70 9e 00 12 6f 9e 00 | 0c 70 9e 00 00 00 00 00 |.p...o..|.p......|
|00006060| 00 a4 00 00 a5 80 00 00 | 40 d0 66 05 1b 4e b7 ff |........|@.f..N..|
|00006070| 2b 75 b7 ff 70 1a 00 00 | 69 6e 74 20 6d 61 74 63 |+u..p...|int matc|
|00006080| 68 65 73 28 63 68 61 72 | 20 2a 73 74 72 69 6e 67 |hes(char| *string|
|00006090| 2c 20 63 68 61 72 20 2a | 70 61 74 74 65 72 6e 2c |, char *|pattern,|
|000060a0| 20 63 68 61 72 20 2a 2a | 6d 61 74 63 68 65 73 5b | char **|matches[|
|000060b0| 5d 29 3b 0d 08 14 9e 00 | 0c 71 9e 00 12 6f 9e 00 |]);.....|.q...o..|
|000060c0| 00 00 00 00 08 15 9e 00 | 12 00 00 00 00 00 00 00 |........|........|
|000060d0| 07 16 9e 00 18 72 9e 00 | 18 72 9e 00 00 00 00 00 |.....r..|.r......|
|000060e0| 00 80 00 00 a5 24 00 00 | 40 00 00 00 8b 39 b7 ff |.....$..|@....9..|
|000060f0| 4b 46 b7 ff 00 00 00 00 | 0d 08 6c 49 18 73 9e 00 |KF......|..lI.s..|
|00006100| 00 00 00 00 00 24 00 00 | 85 8c 00 00 00 d8 8f 07 |.....$..|........|
|00006110| bb e0 b6 ff 9b 0f b7 ff | 20 22 00 00 47 69 76 65 |........| "..Give|
|00006120| 6e 20 61 20 73 74 72 69 | 6e 67 2c 20 61 20 70 61 |n a stri|ng, a pa|
|00006130| 74 74 65 72 6e 2c 20 61 | 6e 64 20 61 20 70 6f 69 |ttern, a|nd a poi|
|00006140| 6e 74 65 72 20 74 6f 20 | 61 6e 20 65 6d 70 74 79 |nter to |an empty|
|00006150| 20 61 72 72 61 79 20 6f | 66 20 73 74 72 69 6e 67 | array o|f string|
|00006160| 73 2c 20 6d 61 74 63 68 | 65 73 28 29 20 65 76 61 |s, match|es() eva|
|00006170| 6c 75 61 74 65 73 20 07 | 0e 74 9e 00 0e 74 9e 00 |luates .|.t...t..|
|00006180| 00 00 00 00 24 73 74 72 | 69 6e 67 20 3d 7e 20 00 |....$str|ing =~ .|
|00006190| 00 8c 00 00 85 a4 00 00 | 00 f0 c8 07 94 a8 b6 ff |........|........|
|000061a0| 74 d7 b6 ff ba 1f 00 00 | 24 70 61 74 74 65 72 6e |t.......|$pattern|
|000061b0| 08 22 22 2c 0e 75 9e 00 | 00 00 00 00 20 69 6e 20 |."",.u..|.... in |
|000061c0| 61 6e 20 61 72 72 61 79 | 20 63 6f 6e 74 65 78 74 |an array| context|
|000061d0| 2c 20 61 6e 64 20 66 69 | 6c 6c 73 20 69 6e 20 07 |, and fi|lls in .|
|000061e0| 11 76 9e 00 11 76 9e 00 | 00 00 00 00 6d 61 74 63 |.v...v..|....matc|
|000061f0| 68 65 73 08 11 00 00 00 | 00 00 00 00 20 77 69 74 |hes.....|.... wit|
|00006200| 68 20 74 68 65 20 61 72 | 72 61 79 20 65 6c 65 6d |h the ar|ray elem|
|00006210| 65 6e 74 73 20 28 61 6c | 6c 6f 63 61 74 69 6e 67 |ents (al|locating|
|00006220| 20 6d 65 6d 6f 72 79 20 | 61 73 20 69 74 20 64 6f | memory |as it do|
|00006230| 65 73 20 00 00 a4 00 00 | a5 54 00 00 40 60 39 03 |es .....|.T..@`9.|
|00006240| 6d 70 b6 ff 4d 9f b6 ff | 20 22 00 00 73 6f 29 2c |mp..M...| "..so),|
|00006250| 20 72 65 74 75 72 6e 69 | 6e 67 20 74 68 65 20 6e | returni|ng the n|
|00006260| 75 6d 62 65 72 20 6f 66 | 20 6d 61 74 63 68 65 73 |umber of| matches|
|00006270| 20 66 6f 75 6e 64 2e 0d | 07 08 05 05 14 77 9e 00 | found..|.....w..|
|00006280| 14 77 9e 00 00 00 00 00 | 00 54 00 00 a5 c0 00 00 |.w......|.T......|
|00006290| 40 94 9b 06 96 01 b6 ff | 76 30 b6 ff 20 22 00 00 |@.......|v0.. "..|
|000062a0| 48 65 72 65 27 73 20 61 | 20 73 61 6d 70 6c 65 20 |Here's a| sample |
|000062b0| 70 72 6f 67 72 61 6d 2c | 20 07 2c 20 11 78 9e 00 |program,| ., .x..|
|000062c0| 14 77 9e 00 11 78 9e 00 | 00 00 00 00 6d 61 74 63 |.w...x..|....matc|
|000062d0| 68 2e 63 08 11 00 00 00 | 14 77 9e 00 00 00 00 00 |h.c.....|.w......|
|000062e0| 2c 20 74 68 61 74 20 75 | 73 65 73 20 61 6c 6c 20 |, that u|ses all |
|000062f0| 74 68 72 65 65 20 28 6c | 6f 6e 67 20 6c 69 6e 65 |three (l|ong line|
|00006300| 73 20 68 61 76 65 20 62 | 65 65 6e 20 77 72 61 70 |s have b|een wrap|
|00006310| 70 65 64 20 68 65 72 65 | 29 3a 0d 08 14 00 00 00 |ped here|):......|
|00006320| 00 00 00 00 07 2a 9e 00 | 12 79 9e 00 12 79 9e 00 |.....*..|.y...y..|
|00006330| 00 00 00 00 07 2b 9e 00 | 0c 7a 9e 00 12 79 9e 00 |.....+..|.z...y..|
|00006340| 0c 7a 9e 00 00 00 00 00 | 00 c0 00 00 25 2c 00 00 |.z......|....%,..|
|00006350| 40 50 bd 01 8f 9a b5 ff | 9f c1 b5 ff 70 1a 00 00 |@P......|....p...|
|00006360| 23 69 6e 63 6c 75 64 65 | 20 3c 45 58 54 45 52 4e |#include| <EXTERN|
|00006370| 2e 68 3e 0d 00 2c 00 00 | a5 54 00 00 40 70 8e 01 |.h>..,..|.T..@p..|
|00006380| af 6b b5 ff bf 92 b5 ff | 70 1a 00 00 23 69 6e 63 |.k......|p...#inc|
|00006390| 6c 75 64 65 20 3c 70 65 | 72 6c 2e 68 3e 0d 08 76 |lude <pe|rl.h>..v|
|000063a0| 0c 7b 9e 00 12 79 9e 00 | 00 00 00 00 08 76 28 22 |.{...y..|.....v("|
|000063b0| 12 00 00 00 00 00 00 00 | 07 29 29 29 18 7c 9e 00 |........|.))).|..|
|000063c0| 18 7c 9e 00 00 00 00 00 | 00 54 00 00 a5 48 00 00 |.|......|.T...H..|
|000063d0| 40 00 00 00 1f 57 b5 ff | df 63 b5 ff 00 00 00 00 |@....W..|.c......|
|000063e0| 0d 08 9e 00 18 7d 9e 00 | 00 00 00 00 07 2e 9e 00 |.....}..|........|
|000063f0| 12 7e 9e 00 12 7e 9e 00 | 00 00 00 00 07 2f 9e 00 |.~...~..|...../..|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.