!c99Shell v. 1.0 pre-release build #16!

Software: Apache/2.2.3 (CentOS). PHP/5.1.6 

uname -a: Linux mx-ll-110-164-51-230.static.3bb.co.th 2.6.18-194.el5PAE #1 SMP Fri Apr 2 15:37:44
EDT 2010 i686 

uid=48(apache) gid=48(apache) groups=48(apache) 

Safe-mode: OFF (not secure)

/usr/bin/   drwxr-xr-x
Free 40.63 GB of 127.8 GB (31.79%)
Home    Back    Forward    UPDIR    Refresh    Search    Buffer    Encoder    Tools    Proc.    FTP brute    Sec.    SQL    PHP-code    Update    Feedback    Self remove    Logout    


Viewing file:     h2xs (58.63 KB)      -rwxr-xr-x
Select action/file-type:
(+) | (+) | (+) | Code (+) | Session (+) | (+) | SDB (+) | (+) | (+) | (+) | (+) | (+) |
Information:
Path /usr/bin/h2xs
Size 58.63 KB
MD5 dbc94b68933b97b93b9d48d9f0fc5af5
Owner/Group root/root
Perms-rwxr-xr-x
Create time 25/04/2011 18:08:42
Access time 08/10/2024 16:58:55
MODIFY time 03/09/2009 21:29:51

FULL HEXDUMP
00000000
00000018
00000030
00000048
00000060
00000078
00000090
000000A8
000000C0
000000D8
000000F0
00000108
00000120
00000138
00000150
00000168
00000180
00000198
000001B0
000001C8
000001E0
000001F8
00000210
00000228
00000240
00000258
00000270
00000288
000002A0
000002B8
000002D0
000002E8
00000300
00000318
00000330
00000348
00000360
00000378
00000390
000003A8
000003C0
000003D8
000003F0
00000408
00000420
00000438
00000450
00000468
00000480
00000498
000004B0
000004C8
000004E0
000004F8
00000510
00000528
00000540
00000558
00000570
00000588
000005A0
000005B8
000005D0
000005E8
00000600
00000618
00000630
00000648
00000660
00000678
00000690
000006A8
000006C0
000006D8
000006F0
00000708
00000720
00000738
00000750
00000768
00000780
00000798
000007B0
000007C8
000007E0
000007F8
00000810
00000828
00000840
00000858
00000870
00000888
000008A0
000008B8
000008D0
000008E8
00000900
00000918
00000930
00000948
00000960
00000978
00000990
000009A8
000009C0
000009D8
000009F0
00000A08
00000A20
00000A38
00000A50
00000A68
00000A80
00000A98
00000AB0
00000AC8
00000AE0
00000AF8
00000B10
00000B28
00000B40
00000B58
00000B70
00000B88
00000BA0
00000BB8
00000BD0
00000BE8
00000C00
00000C18
00000C30
00000C48
00000C60
00000C78
00000C90
00000CA8
00000CC0
00000CD8
00000CF0
00000D08
00000D20
00000D38
00000D50
00000D68
00000D80
00000D98
00000DB0
00000DC8
00000DE0
00000DF8
00000E10
00000E28
00000E40
00000E58
00000E70
00000E88
00000EA0
00000EB8
00000ED0
00000EE8
00000F00
00000F18
00000F30
00000F48
00000F60
00000F78
00000F90
00000FA8
00000FC0
00000FD8
00000FF0
00001008
00001020
00001038
00001050
00001068
00001080
00001098
000010B0
000010C8
000010E0
000010F8
00001110
00001128
00001140
00001158
00001170
00001188
000011A0
000011B8
000011D0
000011E8
00001200
00001218
00001230
00001248
00001260
00001278
00001290
000012A8
000012C0
000012D8
000012F0
00001308
00001320
00001338
00001350
00001368
00001380
00001398
000013B0
000013C8
000013E0
000013F8
00001410
00001428
00001440
00001458
00001470
00001488
000014A0
000014B8
000014D0
000014E8
00001500
00001518
00001530
00001548
00001560
00001578
00001590
000015A8
000015C0
000015D8
000015F0
00001608
00001620
00001638
00001650
00001668
00001680
00001698
000016B0
000016C8
000016E0
000016F8
00001710
00001728
00001740
00001758
00001770
00001788
000017A0
000017B8
000017D0
000017E8
00001800
00001818
00001830
00001848
00001860
00001878
00001890
000018A8
000018C0
000018D8
000018F0
00001908
00001920
00001938
00001950
00001968
00001980
00001998
000019B0
000019C8
000019E0
000019F8
00001A10
00001A28
00001A40
00001A58
00001A70
00001A88
00001AA0
00001AB8
00001AD0
00001AE8
00001B00
00001B18
00001B30
00001B48
00001B60
00001B78
00001B90
00001BA8
00001BC0
00001BD8
00001BF0
00001C08
00001C20
00001C38
00001C50
00001C68
00001C80
00001C98
00001CB0
00001CC8
00001CE0
00001CF8
00001D10
00001D28
00001D40
00001D58
00001D70
00001D88
00001DA0
00001DB8
00001DD0
00001DE8
00001E00
00001E18
00001E30
00001E48
00001E60
00001E78
00001E90
00001EA8
00001EC0
00001ED8
00001EF0
00001F08
00001F20
00001F38
00001F50
00001F68
00001F80
00001F98
00001FB0
00001FC8
00001FE0
00001FF8
00002010
00002028
00002040
00002058
00002070
00002088
000020A0
000020B8
000020D0
000020E8
00002100
00002118
00002130
00002148
00002160
00002178
00002190
000021A8
000021C0
000021D8
000021F0
00002208
00002220
00002238
00002250
00002268
00002280
00002298
000022B0
000022C8
000022E0
000022F8
00002310
00002328
00002340
00002358
00002370
00002388
000023A0
000023B8
000023D0
000023E8
00002400
00002418
00002430
00002448
00002460
00002478
00002490
000024A8
000024C0
000024D8
000024F0
00002508
00002520
00002538
00002550
00002568
00002580
00002598
000025B0
000025C8
000025E0
000025F8
00002610
00002628
00002640
00002658
00002670
00002688
000026A0
000026B8
000026D0
000026E8
00002700
00002718
00002730
00002748
00002760
00002778
00002790
000027A8
000027C0
000027D8
000027F0
00002808
00002820
00002838
00002850
00002868
00002880
00002898
000028B0
000028C8
000028E0
000028F8
00002910
00002928
00002940
00002958
00002970
00002988
000029A0
000029B8
000029D0
000029E8
00002A00
00002A18
00002A30
00002A48
00002A60
00002A78
00002A90
00002AA8
00002AC0
00002AD8
00002AF0
00002B08
00002B20
00002B38
00002B50
00002B68
00002B80
00002B98
00002BB0
00002BC8
00002BE0
00002BF8
00002C10
00002C28
00002C40
00002C58
00002C70
00002C88
00002CA0
00002CB8
00002CD0
00002CE8
00002D00
00002D18
00002D30
00002D48
00002D60
00002D78
00002D90
00002DA8
00002DC0
00002DD8
00002DF0
00002E08
00002E20
00002E38
00002E50
00002E68
00002E80
00002E98
00002EB0
00002EC8
00002EE0
00002EF8
00002F10
00002F28
00002F40
00002F58
00002F70
00002F88
00002FA0
00002FB8
00002FD0
00002FE8
00003000
00003018
00003030
00003048
00003060
00003078
00003090
000030A8
000030C0
000030D8
000030F0
00003108
00003120
00003138
00003150
00003168
00003180
00003198
000031B0
000031C8
000031E0
000031F8
00003210
00003228
00003240
00003258
00003270
00003288
000032A0
000032B8
000032D0
000032E8
00003300
00003318
00003330
00003348
00003360
00003378
00003390
000033A8
000033C0
000033D8
000033F0
00003408
00003420
00003438
00003450
00003468
00003480
00003498
000034B0
000034C8
000034E0
000034F8
00003510
00003528
00003540
00003558
00003570
00003588
000035A0
000035B8
000035D0
000035E8
00003600
00003618
00003630
00003648
00003660
00003678
00003690
000036A8
000036C0
000036D8
000036F0
00003708
00003720
00003738
00003750
00003768
00003780
00003798
000037B0
000037C8
000037E0
000037F8
00003810
00003828
00003840
00003858
00003870
00003888
000038A0
000038B8
000038D0
000038E8
00003900
00003918
00003930
00003948
00003960
00003978
00003990
000039A8
000039C0
000039D8
000039F0
00003A08
00003A20
00003A38
00003A50
00003A68
00003A80
00003A98
00003AB0
00003AC8
00003AE0
00003AF8
00003B10
00003B28
00003B40
00003B58
00003B70
00003B88
00003BA0
00003BB8
00003BD0
00003BE8
00003C00
00003C18
00003C30
00003C48
00003C60
00003C78
00003C90
00003CA8
00003CC0
00003CD8
00003CF0
00003D08
00003D20
00003D38
00003D50
00003D68
00003D80
00003D98
00003DB0
00003DC8
00003DE0
00003DF8
00003E10
00003E28
00003E40
00003E58
00003E70
00003E88
00003EA0
00003EB8
00003ED0
00003EE8
00003F00
00003F18
00003F30
00003F48
00003F60
00003F78
00003F90
00003FA8
00003FC0
00003FD8
00003FF0
00004008
00004020
00004038
00004050
00004068
00004080
00004098
000040B0
000040C8
000040E0
000040F8
00004110
00004128
00004140
00004158
00004170
00004188
000041A0
000041B8
000041D0
000041E8
00004200
00004218
00004230
00004248
00004260
00004278
00004290
000042A8
000042C0
000042D8
000042F0
00004308
00004320
00004338
00004350
00004368
00004380
00004398
000043B0
000043C8
000043E0
000043F8
00004410
00004428
00004440
00004458
00004470
00004488
000044A0
000044B8
000044D0
000044E8
00004500
00004518
00004530
00004548
00004560
00004578
00004590
000045A8
000045C0
000045D8
000045F0
00004608
00004620
00004638
00004650
00004668
00004680
00004698
000046B0
000046C8
000046E0
000046F8
00004710
00004728
00004740
00004758
00004770
00004788
000047A0
000047B8
000047D0
000047E8
00004800
00004818
00004830
00004848
00004860
00004878
00004890
000048A8
000048C0
000048D8
000048F0
00004908
00004920
00004938
00004950
00004968
00004980
00004998
000049B0
000049C8
000049E0
000049F8
00004A10
00004A28
00004A40
00004A58
00004A70
00004A88
00004AA0
00004AB8
00004AD0
00004AE8
00004B00
00004B18
00004B30
00004B48
00004B60
00004B78
00004B90
00004BA8
00004BC0
00004BD8
00004BF0
00004C08
00004C20
00004C38
00004C50
00004C68
00004C80
00004C98
00004CB0
00004CC8
00004CE0
00004CF8
00004D10
00004D28
00004D40
00004D58
00004D70
00004D88
00004DA0
00004DB8
00004DD0
00004DE8
00004E00
00004E18
00004E30
00004E48
00004E60
00004E78
00004E90
00004EA8
00004EC0
00004ED8
00004EF0
00004F08
00004F20
00004F38
00004F50
00004F68
00004F80
00004F98
00004FB0
00004FC8
00004FE0
00004FF8
00005010
00005028
00005040
00005058
00005070
00005088
000050A0
000050B8
000050D0
000050E8
00005100
00005118
00005130
00005148
00005160
00005178
00005190
000051A8
000051C0
000051D8
000051F0
00005208
00005220
00005238
00005250
00005268
00005280
00005298
000052B0
000052C8
000052E0
000052F8
00005310
00005328
00005340
00005358
00005370
00005388
000053A0
000053B8
000053D0
000053E8
00005400
00005418
00005430
00005448
00005460
00005478
00005490
000054A8
000054C0
000054D8
000054F0
00005508
00005520
00005538
00005550
00005568
00005580
00005598
000055B0
000055C8
000055E0
000055F8
00005610
00005628
00005640
00005658
00005670
00005688
000056A0
000056B8
000056D0
000056E8
00005700
00005718
00005730
00005748
00005760
00005778
00005790
000057A8
000057C0
000057D8
000057F0
00005808
00005820
00005838
00005850
00005868
00005880
00005898
000058B0
000058C8
000058E0
000058F8
00005910
00005928
00005940
00005958
00005970
00005988
000059A0
000059B8
000059D0
000059E8
00005A00
00005A18
00005A30
00005A48
00005A60
00005A78
00005A90
00005AA8
00005AC0
00005AD8
00005AF0
00005B08
00005B20
00005B38
00005B50
00005B68
00005B80
00005B98
00005BB0
00005BC8
00005BE0
00005BF8
00005C10
00005C28
00005C40
00005C58
00005C70
00005C88
00005CA0
00005CB8
00005CD0
00005CE8
00005D00
00005D18
00005D30
00005D48
00005D60
00005D78
00005D90
00005DA8
00005DC0
00005DD8
00005DF0
00005E08
00005E20
00005E38
00005E50
00005E68
00005E80
00005E98
00005EB0
00005EC8
00005EE0
00005EF8
00005F10
00005F28
00005F40
00005F58
00005F70
00005F88
00005FA0
00005FB8
00005FD0
00005FE8
00006000
00006018
00006030
00006048
00006060
00006078
00006090
000060A8
000060C0
000060D8
000060F0
00006108
00006120
00006138
00006150
00006168
00006180
00006198
000061B0
000061C8
000061E0
000061F8
00006210
00006228
00006240
00006258
00006270
00006288
000062A0
000062B8
000062D0
000062E8
00006300
00006318
00006330
00006348
00006360
00006378
00006390
000063A8
000063C0
000063D8
000063F0
00006408
00006420
00006438
00006450
00006468
00006480
00006498
000064B0
000064C8
000064E0
000064F8
00006510
00006528
00006540
00006558
00006570
00006588
000065A0
000065B8
000065D0
000065E8
00006600
00006618
00006630
00006648
00006660
00006678
00006690
000066A8
000066C0
000066D8
000066F0
00006708
00006720
00006738
00006750
00006768
00006780
00006798
000067B0
000067C8
000067E0
000067F8
00006810
00006828
00006840
00006858
00006870
00006888
000068A0
000068B8
000068D0
000068E8
00006900
00006918
00006930
00006948
00006960
00006978
00006990
000069A8
000069C0
000069D8
000069F0
00006A08
00006A20
00006A38
00006A50
00006A68
00006A80
00006A98
00006AB0
00006AC8
00006AE0
00006AF8
00006B10
00006B28
00006B40
00006B58
00006B70
00006B88
00006BA0
00006BB8
00006BD0
00006BE8
00006C00
00006C18
00006C30
00006C48
00006C60
00006C78
00006C90
00006CA8
00006CC0
00006CD8
00006CF0
00006D08
00006D20
00006D38
00006D50
00006D68
00006D80
00006D98
00006DB0
00006DC8
00006DE0
00006DF8
00006E10
00006E28
00006E40
00006E58
00006E70
00006E88
00006EA0
00006EB8
00006ED0
00006EE8
00006F00
00006F18
00006F30
00006F48
00006F60
00006F78
00006F90
00006FA8
00006FC0
00006FD8
00006FF0
00007008
00007020
00007038
00007050
00007068
00007080
00007098
000070B0
000070C8
000070E0
000070F8
00007110
00007128
00007140
00007158
00007170
00007188
000071A0
000071B8
000071D0
000071E8
00007200
00007218
00007230
00007248
00007260
00007278
00007290
000072A8
000072C0
000072D8
000072F0
00007308
00007320
00007338
00007350
00007368
00007380
00007398
000073B0
000073C8
000073E0
000073F8
00007410
00007428
00007440
00007458
00007470
00007488
000074A0
000074B8
000074D0
000074E8
00007500
00007518
00007530
00007548
00007560
00007578
00007590
000075A8
000075C0
000075D8
000075F0
00007608
00007620
00007638
00007650
00007668
00007680
00007698
000076B0
000076C8
000076E0
000076F8
00007710
00007728
00007740
00007758
00007770
00007788
000077A0
000077B8
000077D0
000077E8
00007800
00007818
00007830
00007848
00007860
00007878
00007890
000078A8
000078C0
000078D8
000078F0
00007908
00007920
00007938
00007950
00007968
00007980
00007998
000079B0
000079C8
000079E0
000079F8
00007A10
00007A28
00007A40
00007A58
00007A70
00007A88
00007AA0
00007AB8
00007AD0
00007AE8
00007B00
00007B18
00007B30
00007B48
00007B60
00007B78
00007B90
00007BA8
00007BC0
00007BD8
00007BF0
00007C08
00007C20
00007C38
00007C50
00007C68
00007C80
00007C98
00007CB0
00007CC8
00007CE0
00007CF8
00007D10
00007D28
00007D40
00007D58
00007D70
00007D88
00007DA0
00007DB8
00007DD0
00007DE8
00007E00
00007E18
00007E30
00007E48
00007E60
00007E78
00007E90
00007EA8
00007EC0
00007ED8
00007EF0
00007F08
00007F20
00007F38
00007F50
00007F68
00007F80
00007F98
00007FB0
00007FC8
00007FE0
00007FF8
00008010
00008028
00008040
00008058
00008070
00008088
000080A0
000080B8
000080D0
000080E8
00008100
00008118
00008130
00008148
00008160
00008178
00008190
000081A8
000081C0
000081D8
000081F0
00008208
00008220
00008238
00008250
00008268
00008280
00008298
000082B0
000082C8
000082E0
000082F8
00008310
00008328
00008340
00008358
00008370
00008388
000083A0
000083B8
000083D0
000083E8
00008400
00008418
00008430
00008448
00008460
00008478
00008490
000084A8
000084C0
000084D8
000084F0
00008508
00008520
00008538
00008550
00008568
00008580
00008598
000085B0
000085C8
000085E0
000085F8
00008610
00008628
00008640
00008658
00008670
00008688
000086A0
000086B8
000086D0
000086E8
00008700
00008718
00008730
00008748
00008760
00008778
00008790
000087A8
000087C0
000087D8
000087F0
00008808
00008820
00008838
00008850
00008868
00008880
00008898
000088B0
000088C8
000088E0
000088F8
00008910
00008928
00008940
00008958
00008970
00008988
000089A0
000089B8
000089D0
000089E8
00008A00
00008A18
00008A30
00008A48
00008A60
00008A78
00008A90
00008AA8
00008AC0
00008AD8
00008AF0
00008B08
00008B20
00008B38
00008B50
00008B68
00008B80
00008B98
00008BB0
00008BC8
00008BE0
00008BF8
00008C10
00008C28
00008C40
00008C58
00008C70
00008C88
00008CA0
00008CB8
00008CD0
00008CE8
00008D00
00008D18
00008D30
00008D48
00008D60
00008D78
00008D90
00008DA8
00008DC0
00008DD8
00008DF0
00008E08
00008E20
00008E38
00008E50
00008E68
00008E80
00008E98
00008EB0
00008EC8
00008EE0
00008EF8
00008F10
00008F28
00008F40
00008F58
00008F70
00008F88
00008FA0
00008FB8
00008FD0
00008FE8
00009000
00009018
00009030
00009048
00009060
00009078
00009090
000090A8
000090C0
000090D8
000090F0
00009108
00009120
00009138
00009150
00009168
00009180
00009198
000091B0
000091C8
000091E0
000091F8
00009210
00009228
00009240
00009258
00009270
00009288
000092A0
000092B8
000092D0
000092E8
00009300
00009318
00009330
00009348
00009360
00009378
00009390
000093A8
000093C0
000093D8
000093F0
00009408
00009420
00009438
00009450
00009468
00009480
00009498
000094B0
000094C8
000094E0
000094F8
00009510
00009528
00009540
00009558
00009570
00009588
000095A0
000095B8
000095D0
000095E8
00009600
00009618
00009630
00009648
00009660
00009678
00009690
000096A8
000096C0
000096D8
000096F0
00009708
00009720
00009738
00009750
00009768
00009780
00009798
000097B0
000097C8
000097E0
000097F8
00009810
00009828
00009840
00009858
00009870
00009888
000098A0
000098B8
000098D0
000098E8
00009900
00009918
00009930
00009948
00009960
00009978
00009990
000099A8
000099C0
000099D8
000099F0
00009A08
00009A20
00009A38
00009A50
00009A68
00009A80
00009A98
00009AB0
00009AC8
00009AE0
00009AF8
00009B10
00009B28
00009B40
00009B58
00009B70
00009B88
00009BA0
00009BB8
00009BD0
00009BE8
00009C00
00009C18
00009C30
00009C48
00009C60
00009C78
00009C90
00009CA8
00009CC0
00009CD8
00009CF0
00009D08
00009D20
00009D38
00009D50
00009D68
00009D80
00009D98
00009DB0
00009DC8
00009DE0
00009DF8
00009E10
00009E28
00009E40
00009E58
00009E70
00009E88
00009EA0
00009EB8
00009ED0
00009EE8
00009F00
00009F18
00009F30
00009F48
00009F60
00009F78
00009F90
00009FA8
00009FC0
00009FD8
00009FF0
0000A008
0000A020
0000A038
0000A050
0000A068
0000A080
0000A098
0000A0B0
0000A0C8
0000A0E0
0000A0F8
0000A110
0000A128
0000A140
0000A158
0000A170
0000A188
0000A1A0
0000A1B8
0000A1D0
0000A1E8
0000A200
0000A218
0000A230
0000A248
0000A260
0000A278
0000A290
0000A2A8
0000A2C0
0000A2D8
0000A2F0
0000A308
0000A320
0000A338
0000A350
0000A368
0000A380
0000A398
0000A3B0
0000A3C8
0000A3E0
0000A3F8
0000A410
0000A428
0000A440
0000A458
0000A470
0000A488
0000A4A0
0000A4B8
0000A4D0
0000A4E8
0000A500
0000A518
0000A530
0000A548
0000A560
0000A578
0000A590
0000A5A8
0000A5C0
0000A5D8
0000A5F0
0000A608
0000A620
0000A638
0000A650
0000A668
0000A680
0000A698
0000A6B0
0000A6C8
0000A6E0
0000A6F8
0000A710
0000A728
0000A740
0000A758
0000A770
0000A788
0000A7A0
0000A7B8
0000A7D0
0000A7E8
0000A800
0000A818
0000A830
0000A848
0000A860
0000A878
0000A890
0000A8A8
0000A8C0
0000A8D8
0000A8F0
0000A908
0000A920
0000A938
0000A950
0000A968
0000A980
0000A998
0000A9B0
0000A9C8
0000A9E0
0000A9F8
0000AA10
0000AA28
0000AA40
0000AA58
0000AA70
0000AA88
0000AAA0
0000AAB8
0000AAD0
0000AAE8
0000AB00
0000AB18
0000AB30
0000AB48
0000AB60
0000AB78
0000AB90
0000ABA8
0000ABC0
0000ABD8
0000ABF0
0000AC08
0000AC20
0000AC38
0000AC50
0000AC68
0000AC80
0000AC98
0000ACB0
0000ACC8
0000ACE0
0000ACF8
0000AD10
0000AD28
0000AD40
0000AD58
0000AD70
0000AD88
0000ADA0
0000ADB8
0000ADD0
0000ADE8
0000AE00
0000AE18
0000AE30
0000AE48
0000AE60
0000AE78
0000AE90
0000AEA8
0000AEC0
0000AED8
0000AEF0
0000AF08
0000AF20
0000AF38
0000AF50
0000AF68
0000AF80
0000AF98
0000AFB0
0000AFC8
0000AFE0
0000AFF8
0000B010
0000B028
0000B040
0000B058
0000B070
0000B088
0000B0A0
0000B0B8
0000B0D0
0000B0E8
0000B100
0000B118
0000B130
0000B148
0000B160
0000B178
0000B190
0000B1A8
0000B1C0
0000B1D8
0000B1F0
0000B208
0000B220
0000B238
0000B250
0000B268
0000B280
0000B298
0000B2B0
0000B2C8
0000B2E0
0000B2F8
0000B310
0000B328
0000B340
0000B358
0000B370
0000B388
0000B3A0
0000B3B8
0000B3D0
0000B3E8
0000B400
0000B418
0000B430
0000B448
0000B460
0000B478
0000B490
0000B4A8
0000B4C0
0000B4D8
0000B4F0
0000B508
0000B520
0000B538
0000B550
0000B568
0000B580
0000B598
0000B5B0
0000B5C8
0000B5E0
0000B5F8
0000B610
0000B628
0000B640
0000B658
0000B670
0000B688
0000B6A0
0000B6B8
0000B6D0
0000B6E8
0000B700
0000B718
0000B730
0000B748
0000B760
0000B778
0000B790
0000B7A8
0000B7C0
0000B7D8
0000B7F0
0000B808
0000B820
0000B838
0000B850
0000B868
0000B880
0000B898
0000B8B0
0000B8C8
0000B8E0
0000B8F8
0000B910
0000B928
0000B940
0000B958
0000B970
0000B988
0000B9A0
0000B9B8
0000B9D0
0000B9E8
0000BA00
0000BA18
0000BA30
0000BA48
0000BA60
0000BA78
0000BA90
0000BAA8
0000BAC0
0000BAD8
0000BAF0
0000BB08
0000BB20
0000BB38
0000BB50
0000BB68
0000BB80
0000BB98
0000BBB0
0000BBC8
0000BBE0
0000BBF8
0000BC10
0000BC28
0000BC40
0000BC58
0000BC70
0000BC88
0000BCA0
0000BCB8
0000BCD0
0000BCE8
0000BD00
0000BD18
0000BD30
0000BD48
0000BD60
0000BD78
0000BD90
0000BDA8
0000BDC0
0000BDD8
0000BDF0
0000BE08
0000BE20
0000BE38
0000BE50
0000BE68
0000BE80
0000BE98
0000BEB0
0000BEC8
0000BEE0
0000BEF8
0000BF10
0000BF28
0000BF40
0000BF58
0000BF70
0000BF88
0000BFA0
0000BFB8
0000BFD0
0000BFE8
0000C000
0000C018
0000C030
0000C048
0000C060
0000C078
0000C090
0000C0A8
0000C0C0
0000C0D8
0000C0F0
0000C108
0000C120
0000C138
0000C150
0000C168
0000C180
0000C198
0000C1B0
0000C1C8
0000C1E0
0000C1F8
0000C210
0000C228
0000C240
0000C258
0000C270
0000C288
0000C2A0
0000C2B8
0000C2D0
0000C2E8
0000C300
0000C318
0000C330
0000C348
0000C360
0000C378
0000C390
0000C3A8
0000C3C0
0000C3D8
0000C3F0
0000C408
0000C420
0000C438
0000C450
0000C468
0000C480
0000C498
0000C4B0
0000C4C8
0000C4E0
0000C4F8
0000C510
0000C528
0000C540
0000C558
0000C570
0000C588
0000C5A0
0000C5B8
0000C5D0
0000C5E8
0000C600
0000C618
0000C630
0000C648
0000C660
0000C678
0000C690
0000C6A8
0000C6C0
0000C6D8
0000C6F0
0000C708
0000C720
0000C738
0000C750
0000C768
0000C780
0000C798
0000C7B0
0000C7C8
0000C7E0
0000C7F8
0000C810
0000C828
0000C840
0000C858
0000C870
0000C888
0000C8A0
0000C8B8
0000C8D0
0000C8E8
0000C900
0000C918
0000C930
0000C948
0000C960
0000C978
0000C990
0000C9A8
0000C9C0
0000C9D8
0000C9F0
0000CA08
0000CA20
0000CA38
0000CA50
0000CA68
0000CA80
0000CA98
0000CAB0
0000CAC8
0000CAE0
0000CAF8
0000CB10
0000CB28
0000CB40
0000CB58
0000CB70
0000CB88
0000CBA0
0000CBB8
0000CBD0
0000CBE8
0000CC00
0000CC18
0000CC30
0000CC48
0000CC60
0000CC78
0000CC90
0000CCA8
0000CCC0
0000CCD8
0000CCF0
0000CD08
0000CD20
0000CD38
0000CD50
0000CD68
0000CD80
0000CD98
0000CDB0
0000CDC8
0000CDE0
0000CDF8
0000CE10
0000CE28
0000CE40
0000CE58
0000CE70
0000CE88
0000CEA0
0000CEB8
0000CED0
0000CEE8
0000CF00
0000CF18
0000CF30
0000CF48
0000CF60
0000CF78
0000CF90
0000CFA8
0000CFC0
0000CFD8
0000CFF0
0000D008
0000D020
0000D038
0000D050
0000D068
0000D080
0000D098
0000D0B0
0000D0C8
0000D0E0
0000D0F8
0000D110
0000D128
0000D140
0000D158
0000D170
0000D188
0000D1A0
0000D1B8
0000D1D0
0000D1E8
0000D200
0000D218
0000D230
0000D248
0000D260
0000D278
0000D290
0000D2A8
0000D2C0
0000D2D8
0000D2F0
0000D308
0000D320
0000D338
0000D350
0000D368
0000D380
0000D398
0000D3B0
0000D3C8
0000D3E0
0000D3F8
0000D410
0000D428
0000D440
0000D458
0000D470
0000D488
0000D4A0
0000D4B8
0000D4D0
0000D4E8
0000D500
0000D518
0000D530
0000D548
0000D560
0000D578
0000D590
0000D5A8
0000D5C0
0000D5D8
0000D5F0
0000D608
0000D620
0000D638
0000D650
0000D668
0000D680
0000D698
0000D6B0
0000D6C8
0000D6E0
0000D6F8
0000D710
0000D728
0000D740
0000D758
0000D770
0000D788
0000D7A0
0000D7B8
0000D7D0
0000D7E8
0000D800
0000D818
0000D830
0000D848
0000D860
0000D878
0000D890
0000D8A8
0000D8C0
0000D8D8
0000D8F0
0000D908
0000D920
0000D938
0000D950
0000D968
0000D980
0000D998
0000D9B0
0000D9C8
0000D9E0
0000D9F8
0000DA10
0000DA28
0000DA40
0000DA58
0000DA70
0000DA88
0000DAA0
0000DAB8
0000DAD0
0000DAE8
0000DB00
0000DB18
0000DB30
0000DB48
0000DB60
0000DB78
0000DB90
0000DBA8
0000DBC0
0000DBD8
0000DBF0
0000DC08
0000DC20
0000DC38
0000DC50
0000DC68
0000DC80
0000DC98
0000DCB0
0000DCC8
0000DCE0
0000DCF8
0000DD10
0000DD28
0000DD40
0000DD58
0000DD70
0000DD88
0000DDA0
0000DDB8
0000DDD0
0000DDE8
0000DE00
0000DE18
0000DE30
0000DE48
0000DE60
0000DE78
0000DE90
0000DEA8
0000DEC0
0000DED8
0000DEF0
0000DF08
0000DF20
0000DF38
0000DF50
0000DF68
0000DF80
0000DF98
0000DFB0
0000DFC8
0000DFE0
0000DFF8
0000E010
0000E028
0000E040
0000E058
0000E070
0000E088
0000E0A0
0000E0B8
0000E0D0
0000E0E8
0000E100
0000E118
0000E130
0000E148
0000E160
0000E178
0000E190
0000E1A8
0000E1C0
0000E1D8
0000E1F0
0000E208
0000E220
0000E238
0000E250
0000E268
0000E280
0000E298
0000E2B0
0000E2C8
0000E2E0
0000E2F8
0000E310
0000E328
0000E340
0000E358
0000E370
0000E388
0000E3A0
0000E3B8
0000E3D0
0000E3E8
0000E400
0000E418
0000E430
0000E448
0000E460
0000E478
0000E490
0000E4A8
0000E4C0
0000E4D8
0000E4F0
0000E508
0000E520
0000E538
0000E550
0000E568
0000E580
0000E598
0000E5B0
0000E5C8
0000E5E0
0000E5F8
0000E610
0000E628
0000E640
0000E658
0000E670
0000E688
0000E6A0
0000E6B8
0000E6D0
0000E6E8
0000E700
0000E718
0000E730
0000E748
0000E760
0000E778
0000E790
0000E7A8
0000E7C0
0000E7D8
0000E7F0
0000E808
0000E820
0000E838
0000E850
0000E868
0000E880
0000E898
0000E8B0
0000E8C8
0000E8E0
0000E8F8
0000E910
0000E928
0000E940
0000E958
0000E970
0000E988
0000E9A0
0000E9B8
0000E9D0
0000E9E8
0000EA00
0000EA18
0000EA30
0000EA48
0000EA60
0000EA78
23 21 2F 75 73 72 2F 62 69 6E 2F 70 65 72 6C 0A 20 20 20 20 65 76 61 6C
20 27 65 78 65 63 20 2F 75 73 72 2F 62 69 6E 2F 70 65 72 6C 20 2D 53 20
24 30 20 24 7B 31 2B 22 24 40 22 7D 27 0A 09 69 66 20 24 72 75 6E 6E 69
6E 67 5F 75 6E 64 65 72 5F 73 6F 6D 65 5F 73 68 65 6C 6C 3B 0A 0A 75 73
65 20 77 61 72 6E 69 6E 67 73 3B 0A 0A 3D 68 65 61 64 31 20 4E 41 4D 45
0A 0A 68 32 78 73 20 2D 20 63 6F 6E 76 65 72 74 20 2E 68 20 43 20 68 65
61 64 65 72 20 66 69 6C 65 73 20 74 6F 20 50 65 72 6C 20 65 78 74 65 6E
73 69 6F 6E 73 0A 0A 3D 68 65 61 64 31 20 53 59 4E 4F 50 53 49 53 0A 0A
42 3C 68 32 78 73 3E 20 5B 42 3C 4F 50 54 49 4F 4E 53 3E 20 2E 2E 2E 5D
20 5B 68 65 61 64 65 72 66 69 6C 65 20 2E 2E 2E 20 5B 65 78 74 72 61 5F
6C 69 62 72 61 72 69 65 73 5D 5D 0A 0A 42 3C 68 32 78 73 3E 20 42 3C 2D
68 3E 7C 42 3C 2D 3F 3E 7C 42 3C 2D 2D 68 65 6C 70 3E 0A 0A 3D 68 65 61
64 31 20 44 45 53 43 52 49 50 54 49 4F 4E 0A 0A 49 3C 68 32 78 73 3E 20
62 75 69 6C 64 73 20 61 20 50 65 72 6C 20 65 78 74 65 6E 73 69 6F 6E 20
66 72 6F 6D 20 43 20 68 65 61 64 65 72 20 66 69 6C 65 73 2E 20 20 54 68
65 20 65 78 74 65 6E 73 69 6F 6E 0A 77 69 6C 6C 20 69 6E 63 6C 75 64 65
20 66 75 6E 63 74 69 6F 6E 73 20 77 68 69 63 68 20 63 61 6E 20 62 65 20
75 73 65 64 20 74 6F 20 72 65 74 72 69 65 76 65 20 74 68 65 20 76 61 6C
75 65 20 6F 66 20 61 6E 79 0A 23 64 65 66 69 6E 65 20 73 74 61 74 65 6D
65 6E 74 20 77 68 69 63 68 20 77 61 73 20 69 6E 20 74 68 65 20 43 20 68
65 61 64 65 72 20 66 69 6C 65 73 2E 0A 0A 54 68 65 20 49 3C 6D 6F 64 75
6C 65 5F 6E 61 6D 65 3E 20 77 69 6C 6C 20 62 65 20 75 73 65 64 20 66 6F
72 20 74 68 65 20 6E 61 6D 65 20 6F 66 20 74 68 65 20 65 78 74 65 6E 73
69 6F 6E 2E 20 20 49 66 0A 6D 6F 64 75 6C 65 5F 6E 61 6D 65 20 69 73 20
6E 6F 74 20 73 75 70 70 6C 69 65 64 20 74 68 65 6E 20 74 68 65 20 6E 61
6D 65 20 6F 66 20 74 68 65 20 66 69 72 73 74 20 68 65 61 64 65 72 20 66
69 6C 65 0A 77 69 6C 6C 20 62 65 20 75 73 65 64 2C 20 77 69 74 68 20 74
68 65 20 66 69 72 73 74 20 63 68 61 72 61 63 74 65 72 20 63 61 70 69 74
61 6C 69 7A 65 64 2E 0A 0A 49 66 20 74 68 65 20 65 78 74 65 6E 73 69 6F
6E 20 6D 69 67 68 74 20 6E 65 65 64 20 65 78 74 72 61 20 6C 69 62 72 61
72 69 65 73 2C 20 74 68 65 79 20 73 68 6F 75 6C 64 20 62 65 20 69 6E 63
6C 75 64 65 64 0A 68 65 72 65 2E 20 20 54 68 65 20 65 78 74 65 6E 73 69
6F 6E 20 4D 61 6B 65 66 69 6C 65 2E 50 4C 20 77 69 6C 6C 20 74 61 6B 65
20 63 61 72 65 20 6F 66 20 63 68 65 63 6B 69 6E 67 20 77 68 65 74 68 65
72 0A 74 68 65 20 6C 69 62 72 61 72 69 65 73 20 61 63 74 75 61 6C 6C 79
20 65 78 69 73 74 20 61 6E 64 20 68 6F 77 20 74 68 65 79 20 73 68 6F 75
6C 64 20 62 65 20 6C 6F 61 64 65 64 2E 20 20 54 68 65 20 65 78 74 72 61
0A 6C 69 62 72 61 72 69 65 73 20 73 68 6F 75 6C 64 20 62 65 20 73 70 65
63 69 66 69 65 64 20 69 6E 20 74 68 65 20 66 6F 72 6D 20 2D 6C 6D 20 2D
6C 70 6F 73 69 78 2C 20 65 74 63 2C 20 6A 75 73 74 20 61 73 20 6F 6E 0A
74 68 65 20 63 63 20 63 6F 6D 6D 61 6E 64 20 6C 69 6E 65 2E 20 20 42 79
20 64 65 66 61 75 6C 74 2C 20 74 68 65 20 4D 61 6B 65 66 69 6C 65 2E 50
4C 20 77 69 6C 6C 20 73 65 61 72 63 68 20 74 68 72 6F 75 67 68 0A 74 68
65 20 6C 69 62 72 61 72 79 20 70 61 74 68 20 64 65 74 65 72 6D 69 6E 65
64 20 62 79 20 43 6F 6E 66 69 67 75 72 65 2E 20 20 54 68 61 74 20 70 61
74 68 20 63 61 6E 20 62 65 20 61 75 67 6D 65 6E 74 65 64 0A 62 79 20 69
6E 63 6C 75 64 69 6E 67 20 61 72 67 75 6D 65 6E 74 73 20 6F 66 20 74 68
65 20 66 6F 72 6D 20 42 3C 2D 4C 2F 61 6E 6F 74 68 65 72 2F 6C 69 62 72
61 72 79 2F 70 61 74 68 3E 20 69 6E 20 74 68 65 0A 65 78 74 72 61 2D 6C
69 62 72 61 72 69 65 73 20 61 72 67 75 6D 65 6E 74 2E 0A 0A 3D 68 65 61
64 31 20 4F 50 54 49 4F 4E 53 0A 0A 3D 6F 76 65 72 20 35 0A 0A 3D 69 74
65 6D 20 42 3C 2D 41 3E 2C 20 42 3C 2D 2D 6F 6D 69 74 2D 61 75 74 6F 6C
6F 61 64 3E 0A 0A 4F 6D 69 74 20 61 6C 6C 20 61 75 74 6F 6C 6F 61 64 20
66 61 63 69 6C 69 74 69 65 73 2E 20 20 54 68 69 73 20 69 73 20 74 68 65
20 73 61 6D 65 20 61 73 20 42 3C 2D 63 3E 20 62 75 74 20 61 6C 73 6F 0A
72 65 6D 6F 76 65 73 20 74 68 65 20 53 3C 43 3C 75 73 65 20 41 75 74 6F
4C 6F 61 64 65 72 3E 3E 20 73 74 61 74 65 6D 65 6E 74 20 66 72 6F 6D 20
74 68 65 20 2E 70 6D 20 66 69 6C 65 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D
42 3E 2C 20 42 3C 2D 2D 62 65 74 61 2D 76 65 72 73 69 6F 6E 3E 0A 0A 55
73 65 20 61 6E 20 61 6C 70 68 61 2F 62 65 74 61 20 73 74 79 6C 65 20 76
65 72 73 69 6F 6E 20 6E 75 6D 62 65 72 2E 20 20 43 61 75 73 65 73 20 76
65 72 73 69 6F 6E 20 6E 75 6D 62 65 72 20 74 6F 0A 62 65 20 22 30 2E 30
30 5F 30 31 22 20 75 6E 6C 65 73 73 20 42 3C 2D 76 3E 20 69 73 20 73 70
65 63 69 66 69 65 64 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 43 3E 2C 20 42
3C 2D 2D 6F 6D 69 74 2D 63 68 61 6E 67 65 73 3E 0A 0A 4F 6D 69 74 73 20
63 72 65 61 74 69 6F 6E 20 6F 66 20 74 68 65 20 46 3C 43 68 61 6E 67 65
73 3E 20 66 69 6C 65 2C 20 61 6E 64 20 61 64 64 73 20 61 20 48 49 53 54
4F 52 59 20 73 65 63 74 69 6F 6E 20 74 6F 0A 74 68 65 20 50 4F 44 20 74
65 6D 70 6C 61 74 65 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 46 3E 2C 20 42
3C 2D 2D 63 70 70 2D 66 6C 61 67 73 3E 3D 49 3C 61 64 64 66 6C 61 67 73
3E 0A 0A 41 64 64 69 74 69 6F 6E 61 6C 20 66 6C 61 67 73 20 74 6F 20 73
70 65 63 69 66 79 20 74 6F 20 43 20 70 72 65 70 72 6F 63 65 73 73 6F 72
20 77 68 65 6E 20 73 63 61 6E 6E 69 6E 67 20 68 65 61 64 65 72 20 66 6F
72 0A 66 75 6E 63 74 69 6F 6E 20 64 65 63 6C 61 72 61 74 69 6F 6E 73 2E
20 20 57 72 69 74 65 73 20 74 68 65 73 65 20 6F 70 74 69 6F 6E 73 20 69
6E 20 74 68 65 20 67 65 6E 65 72 61 74 65 64 20 46 3C 4D 61 6B 65 66 69
6C 65 2E 50 4C 3E 0A 74 6F 6F 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 4D 3E
2C 20 42 3C 2D 2D 66 75 6E 63 2D 6D 61 73 6B 3E 3D 49 3C 72 65 67 75 6C
61 72 20 65 78 70 72 65 73 73 69 6F 6E 3E 0A 0A 73 65 6C 65 63 74 73 20
66 75 6E 63 74 69 6F 6E 73 2F 6D 61 63 72 6F 73 20 74 6F 20 70 72 6F 63
65 73 73 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 4F 3E 2C 20 42 3C 2D 2D 6F
76 65 72 77 72 69 74 65 2D 6F 6B 3E 0A 0A 41 6C 6C 6F 77 73 20 61 20 70
72 65 2D 65 78 69 73 74 69 6E 67 20 65 78 74 65 6E 73 69 6F 6E 20 64 69
72 65 63 74 6F 72 79 20 74 6F 20 62 65 20 6F 76 65 72 77 72 69 74 74 65
6E 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 50 3E 2C 20 42 3C 2D 2D 6F 6D 69
74 2D 70 6F 64 3E 0A 0A 4F 6D 69 74 20 74 68 65 20 61 75 74 6F 67 65 6E
65 72 61 74 65 64 20 73 74 75 62 20 50 4F 44 20 73 65 63 74 69 6F 6E 2E
0A 0A 3D 69 74 65 6D 20 42 3C 2D 58 3E 2C 20 42 3C 2D 2D 6F 6D 69 74 2D
58 53 3E 0A 0A 4F 6D 69 74 20 74 68 65 20 58 53 20 70 6F 72 74 69 6F 6E
2E 20 20 55 73 65 64 20 74 6F 20 67 65 6E 65 72 61 74 65 20 74 65 6D 70
6C 61 74 65 73 20 66 6F 72 20 61 20 6D 6F 64 75 6C 65 20 77 68 69 63 68
20 69 73 20 6E 6F 74 0A 58 53 2D 62 61 73 65 64 2E 20 20 43 3C 2D 63 3E
20 61 6E 64 20 43 3C 2D 66 3E 20 61 72 65 20 69 6D 70 6C 69 63 69 74 6C
79 20 65 6E 61 62 6C 65 64 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 61 3E 2C
20 42 3C 2D 2D 67 65 6E 2D 61 63 63 65 73 73 6F 72 73 3E 0A 0A 47 65 6E
65 72 61 74 65 20 61 6E 20 61 63 63 65 73 73 6F 72 20 6D 65 74 68 6F 64
20 66 6F 72 20 65 61 63 68 20 65 6C 65 6D 65 6E 74 20 6F 66 20 73 74 72
75 63 74 73 20 61 6E 64 20 75 6E 69 6F 6E 73 2E 20 54 68 65 0A 67 65 6E
65 72 61 74 65 64 20 6D 65 74 68 6F 64 73 20 61 72 65 20 6E 61 6D 65 64
20 61 66 74 65 72 20 74 68 65 20 65 6C 65 6D 65 6E 74 20 6E 61 6D 65 3B
20 77 69 6C 6C 20 72 65 74 75 72 6E 20 74 68 65 20 63 75 72 72 65 6E 74
0A 76 61 6C 75 65 20 6F 66 20 74 68 65 20 65 6C 65 6D 65 6E 74 20 69 66
20 63 61 6C 6C 65 64 20 77 69 74 68 6F 75 74 20 61 64 64 69 74 69 6F 6E
61 6C 20 61 72 67 75 6D 65 6E 74 73 3B 20 61 6E 64 20 77 69 6C 6C 20 73
65 74 0A 74 68 65 20 65 6C 65 6D 65 6E 74 20 74 6F 20 74 68 65 20 73 75
70 70 6C 69 65 64 20 76 61 6C 75 65 20 28 61 6E 64 20 72 65 74 75 72 6E
20 74 68 65 20 6E 65 77 20 76 61 6C 75 65 29 20 69 66 20 63 61 6C 6C 65
64 20 77 69 74 68 0A 61 6E 20 61 64 64 69 74 69 6F 6E 61 6C 20 61 72 67
75 6D 65 6E 74 2E 20 45 6D 62 65 64 64 65 64 20 73 74 72 75 63 74 75 72
65 73 20 61 6E 64 20 75 6E 69 6F 6E 73 20 61 72 65 20 72 65 74 75 72 6E
65 64 20 61 73 20 61 0A 70 6F 69 6E 74 65 72 20 72 61 74 68 65 72 20 74
68 61 6E 20 74 68 65 20 63 6F 6D 70 6C 65 74 65 20 73 74 72 75 63 74 75
72 65 2C 20 74 6F 20 66 61 63 69 6C 69 74 61 74 65 20 63 68 61 69 6E 65
64 20 63 61 6C 6C 73 2E 0A 0A 54 68 65 73 65 20 6D 65 74 68 6F 64 73 20
61 6C 6C 20 61 70 70 6C 79 20 74 6F 20 74 68 65 20 50 74 72 20 74 79 70
65 20 66 6F 72 20 74 68 65 20 73 74 72 75 63 74 75 72 65 3B 20 61 64 64
69 74 69 6F 6E 61 6C 6C 79 0A 74 77 6F 20 6D 65 74 68 6F 64 73 20 61 72
65 20 63 6F 6E 73 74 72 75 63 74 65 64 20 66 6F 72 20 74 68 65 20 73 74
72 75 63 74 75 72 65 20 74 79 70 65 20 69 74 73 65 6C 66 2C 20 43 3C 5F
74 6F 5F 70 74 72 3E 0A 77 68 69 63 68 20 72 65 74 75 72 6E 73 20 61 20
50 74 72 20 74 79 70 65 20 70 6F 69 6E 74 69 6E 67 20 74 6F 20 74 68 65
20 73 61 6D 65 20 73 74 72 75 63 74 75 72 65 2C 20 61 6E 64 20 61 20 43
3C 6E 65 77 3E 0A 6D 65 74 68 6F 64 20 74 6F 20 63 6F 6E 73 74 72 75 63
74 20 61 6E 64 20 72 65 74 75 72 6E 20 61 20 6E 65 77 20 73 74 72 75 63
74 75 72 65 2C 20 69 6E 69 74 69 61 6C 69 73 65 64 20 74 6F 20 7A 65 72
6F 65 73 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 62 3E 2C 20 42 3C 2D 2D 63
6F 6D 70 61 74 2D 76 65 72 73 69 6F 6E 3E 3D 49 3C 76 65 72 73 69 6F 6E
3E 0A 0A 47 65 6E 65 72 61 74 65 73 20 61 20 2E 70 6D 20 66 69 6C 65 20
77 68 69 63 68 20 69 73 20 62 61 63 6B 77 61 72 64 73 20 63 6F 6D 70 61
74 69 62 6C 65 20 77 69 74 68 20 74 68 65 20 73 70 65 63 69 66 69 65 64
0A 70 65 72 6C 20 76 65 72 73 69 6F 6E 2E 0A 0A 46 6F 72 20 76 65 72 73
69 6F 6E 73 20 3C 20 35 2E 36 2E 30 2C 20 74 68 65 20 63 68 61 6E 67 65
73 20 61 72 65 2E 0A 20 20 20 20 2D 20 6E 6F 20 75 73 65 20 6F 66 20 27
6F 75 72 27 20 28 75 73 65 73 20 27 75 73 65 20 76 61 72 73 27 20 69 6E
73 74 65 61 64 29 0A 20 20 20 20 2D 20 6E 6F 20 27 75 73 65 20 77 61 72
6E 69 6E 67 73 27 0A 0A 53 70 65 63 69 66 79 69 6E 67 20 61 20 63 6F 6D
70 61 74 69 62 69 6C 69 74 79 20 76 65 72 73 69 6F 6E 20 68 69 67 68 65
72 20 74 68 61 6E 20 74 68 65 20 76 65 72 73 69 6F 6E 20 6F 66 20 70 65
72 6C 20 79 6F 75 0A 61 72 65 20 75 73 69 6E 67 20 74 6F 20 72 75 6E 20
68 32 78 73 20 77 69 6C 6C 20 68 61 76 65 20 6E 6F 20 65 66 66 65 63 74
2E 20 20 49 66 20 75 6E 73 70 65 63 69 66 69 65 64 20 68 32 78 73 20 77
69 6C 6C 20 64 65 66 61 75 6C 74 0A 74 6F 20 63 6F 6D 70 61 74 69 62 69
6C 69 74 79 20 77 69 74 68 20 74 68 65 20 76 65 72 73 69 6F 6E 20 6F 66
20 70 65 72 6C 20 79 6F 75 20 61 72 65 20 75 73 69 6E 67 20 74 6F 20 72
75 6E 20 68 32 78 73 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 63 3E 2C 20 42
3C 2D 2D 6F 6D 69 74 2D 63 6F 6E 73 74 61 6E 74 3E 0A 0A 4F 6D 69 74 20
43 3C 63 6F 6E 73 74 61 6E 74 28 29 3E 20 66 72 6F 6D 20 74 68 65 20 2E
78 73 20 66 69 6C 65 20 61 6E 64 20 63 6F 72 72 65 73 70 6F 6E 64 69 6E
67 20 73 70 65 63 69 61 6C 69 73 65 64 0A 43 3C 41 55 54 4F 4C 4F 41 44
3E 20 66 72 6F 6D 20 74 68 65 20 2E 70 6D 20 66 69 6C 65 2E 0A 0A 3D 69
74 65 6D 20 42 3C 2D 64 3E 2C 20 42 3C 2D 2D 64 65 62 75 67 67 69 6E 67
3E 0A 0A 54 75 72 6E 20 6F 6E 20 64 65 62 75 67 67 69 6E 67 20 6D 65 73
73 61 67 65 73 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 65 3E 2C 20 42 3C 2D
2D 6F 6D 69 74 2D 65 6E 75 6D 73 3E 3D 5B 49 3C 72 65 67 75 6C 61 72 20
65 78 70 72 65 73 73 69 6F 6E 3E 5D 0A 0A 49 66 20 49 3C 72 65 67 75 6C
61 72 20 65 78 70 72 65 73 73 69 6F 6E 3E 20 69 73 20 6E 6F 74 20 67 69
76 65 6E 2C 20 73 6B 69 70 20 61 6C 6C 20 63 6F 6E 73 74 61 6E 74 73 20
74 68 61 74 20 61 72 65 20 64 65 66 69 6E 65 64 20 69 6E 0A 61 20 43 20
65 6E 75 6D 65 72 61 74 69 6F 6E 2E 20 4F 74 68 65 72 77 69 73 65 20 73
6B 69 70 20 6F 6E 6C 79 20 74 68 6F 73 65 20 63 6F 6E 73 74 61 6E 74 73
20 74 68 61 74 20 61 72 65 20 64 65 66 69 6E 65 64 20 69 6E 20 61 6E 0A
65 6E 75 6D 20 77 68 6F 73 65 20 6E 61 6D 65 20 6D 61 74 63 68 65 73 20
49 3C 72 65 67 75 6C 61 72 20 65 78 70 72 65 73 73 69 6F 6E 3E 2E 0A 0A
53 69 6E 63 65 20 49 3C 72 65 67 75 6C 61 72 20 65 78 70 72 65 73 73 69
6F 6E 3E 20 69 73 20 6F 70 74 69 6F 6E 61 6C 2C 20 6D 61 6B 65 20 73 75
72 65 20 74 68 61 74 20 74 68 69 73 20 73 77 69 74 63 68 20 69 73 20 66
6F 6C 6C 6F 77 65 64 0A 62 79 20 61 74 20 6C 65 61 73 74 20 6F 6E 65 20
6F 74 68 65 72 20 73 77 69 74 63 68 20 69 66 20 79 6F 75 20 6F 6D 69 74
20 49 3C 72 65 67 75 6C 61 72 20 65 78 70 72 65 73 73 69 6F 6E 3E 20 61
6E 64 20 68 61 76 65 20 73 6F 6D 65 0A 70 65 6E 64 69 6E 67 20 61 72 67
75 6D 65 6E 74 73 20 73 75 63 68 20 61 73 20 68 65 61 64 65 72 2D 66 69
6C 65 20 6E 61 6D 65 73 2E 20 54 68 69 73 20 69 73 20 6F 6B 3A 0A 0A 20
20 20 20 68 32 78 73 20 2D 65 20 2D 6E 20 4D 6F 64 75 6C 65 3A 3A 46 6F
6F 20 66 6F 6F 2E 68 0A 0A 54 68 69 73 20 69 73 20 6E 6F 74 20 6F 6B 3A
0A 0A 20 20 20 20 68 32 78 73 20 2D 6E 20 4D 6F 64 75 6C 65 3A 3A 46 6F
6F 20 2D 65 20 66 6F 6F 2E 68 0A 0A 49 6E 20 74 68 65 20 6C 61 74 74 65
72 2C 20 66 6F 6F 2E 68 20 69 73 20 74 61 6B 65 6E 20 61 73 20 49 3C 72
65 67 75 6C 61 72 20 65 78 70 72 65 73 73 69 6F 6E 3E 2E 0A 0A 3D 69 74
65 6D 20 42 3C 2D 66 3E 2C 20 42 3C 2D 2D 66 6F 72 63 65 3E 0A 0A 41 6C
6C 6F 77 73 20 61 6E 20 65 78 74 65 6E 73 69 6F 6E 20 74 6F 20 62 65 20
63 72 65 61 74 65 64 20 66 6F 72 20 61 20 68 65 61 64 65 72 20 65 76 65
6E 20 69 66 20 74 68 61 74 20 68 65 61 64 65 72 20 69 73 0A 6E 6F 74 20
66 6F 75 6E 64 20 69 6E 20 73 74 61 6E 64 61 72 64 20 69 6E 63 6C 75 64
65 20 64 69 72 65 63 74 6F 72 69 65 73 2E 0A 0A 3D 69 74 65 6D 20 42 3C
2D 67 3E 2C 20 42 3C 2D 2D 67 6C 6F 62 61 6C 3E 0A 0A 49 6E 63 6C 75 64
65 20 63 6F 64 65 20 66 6F 72 20 73 61 66 65 6C 79 20 73 74 6F 72 69 6E
67 20 73 74 61 74 69 63 20 64 61 74 61 20 69 6E 20 74 68 65 20 2E 78 73
20 66 69 6C 65 2E 0A 45 78 74 65 6E 73 69 6F 6E 73 20 74 68 61 74 20 64
6F 20 6E 6F 20 6D 61 6B 65 20 75 73 65 20 6F 66 20 73 74 61 74 69 63 20
64 61 74 61 20 63 61 6E 20 69 67 6E 6F 72 65 20 74 68 69 73 20 6F 70 74
69 6F 6E 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 68 3E 2C 20 42 3C 2D 3F 3E
2C 20 42 3C 2D 2D 68 65 6C 70 3E 0A 0A 50 72 69 6E 74 20 74 68 65 20 75
73 61 67 65 2C 20 68 65 6C 70 20 61 6E 64 20 76 65 72 73 69 6F 6E 20 66
6F 72 20 74 68 69 73 20 68 32 78 73 20 61 6E 64 20 65 78 69 74 2E 0A 0A
3D 69 74 65 6D 20 42 3C 2D 6B 3E 2C 20 42 3C 2D 2D 6F 6D 69 74 2D 63 6F
6E 73 74 2D 66 75 6E 63 3E 0A 0A 46 6F 72 20 66 75 6E 63 74 69 6F 6E 20
61 72 67 75 6D 65 6E 74 73 20 64 65 63 6C 61 72 65 64 20 61 73 20 43 3C
63 6F 6E 73 74 3E 2C 20 6F 6D 69 74 20 74 68 65 20 63 6F 6E 73 74 20 61
74 74 72 69 62 75 74 65 20 69 6E 20 74 68 65 0A 67 65 6E 65 72 61 74 65
64 20 58 53 20 63 6F 64 65 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 6D 3E 2C
20 42 3C 2D 2D 67 65 6E 2D 74 69 65 64 2D 76 61 72 3E 0A 0A 42 3C 45 78
70 65 72 69 6D 65 6E 74 61 6C 3E 3A 20 66 6F 72 20 65 61 63 68 20 76 61
72 69 61 62 6C 65 20 64 65 63 6C 61 72 65 64 20 69 6E 20 74 68 65 20 68
65 61 64 65 72 20 66 69 6C 65 28 73 29 2C 20 64 65 63 6C 61 72 65 0A 61
20 70 65 72 6C 20 76 61 72 69 61 62 6C 65 20 6F 66 20 74 68 65 20 73 61
6D 65 20 6E 61 6D 65 20 6D 61 67 69 63 61 6C 6C 79 20 74 69 65 64 20 74
6F 20 74 68 65 20 43 20 76 61 72 69 61 62 6C 65 2E 0A 0A 3D 69 74 65 6D
20 42 3C 2D 6E 3E 2C 20 42 3C 2D 2D 6E 61 6D 65 3E 3D 49 3C 6D 6F 64 75
6C 65 5F 6E 61 6D 65 3E 0A 0A 53 70 65 63 69 66 69 65 73 20 61 20 6E 61
6D 65 20 74 6F 20 62 65 20 75 73 65 64 20 66 6F 72 20 74 68 65 20 65 78
74 65 6E 73 69 6F 6E 2C 20 65 2E 67 2E 2C 20 53 3C 2D 6E 20 52 50 43 3A
3A 44 43 45 3E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 6F 3E 2C 20 42 3C 2D 2D
6F 70 61 71 75 65 2D 72 65 3E 3D 49 3C 72 65 67 75 6C 61 72 20 65 78 70
72 65 73 73 69 6F 6E 3E 0A 0A 55 73 65 20 22 6F 70 61 71 75 65 22 20 64
61 74 61 20 74 79 70 65 20 66 6F 72 20 74 68 65 20 43 20 74 79 70 65 73
20 6D 61 74 63 68 65 64 20 62 79 20 74 68 65 20 72 65 67 75 6C 61 72 0A
65 78 70 72 65 73 73 69 6F 6E 2C 20 65 76 65 6E 20 69 66 20 74 68 65 73
65 20 74 79 70 65 73 20 61 72 65 20 43 3C 74 79 70 65 64 65 66 3E 2D 65
71 75 69 76 61 6C 65 6E 74 20 74 6F 20 74 79 70 65 73 0A 66 72 6F 6D 20
74 79 70 65 6D 61 70 73 2E 20 20 53 68 6F 75 6C 64 20 6E 6F 74 20 62 65
20 75 73 65 64 20 77 69 74 68 6F 75 74 20 42 3C 2D 78 3E 2E 0A 0A 54 68
69 73 20 6D 61 79 20 62 65 20 75 73 65 66 75 6C 20 73 69 6E 63 65 2C 20
73 61 79 2C 20 74 79 70 65 73 20 77 68 69 63 68 20 61 72 65 20 43 3C 74
79 70 65 64 65 66 3E 2D 65 71 75 69 76 61 6C 65 6E 74 0A 74 6F 20 69 6E
74 65 67 65 72 73 20 6D 61 79 20 72 65 70 72 65 73 65 6E 74 20 4F 53 2D
72 65 6C 61 74 65 64 20 68 61 6E 64 6C 65 73 2C 20 61 6E 64 20 6F 6E 65
20 6D 61 79 20 77 61 6E 74 20 74 6F 20 77 6F 72 6B 0A 77 69 74 68 20 74
68 65 73 65 20 68 61 6E 64 6C 65 73 20 69 6E 20 4F 4F 2D 77 61 79 2C 20
61 73 20 69 6E 20 43 3C 24 68 61 6E 64 6C 65 2D 45 3C 67 74 3E 64 6F 5F
73 6F 6D 65 74 68 69 6E 67 28 29 3E 2E 0A 55 73 65 20 43 3C 2D 6F 20 2E
3E 20 69 66 20 79 6F 75 20 77 61 6E 74 20 74 6F 20 68 61 6E 64 6C 65 20
61 6C 6C 20 74 68 65 20 43 3C 74 79 70 65 64 65 66 3E 65 64 20 74 79 70
65 73 20 61 73 20 6F 70 61 71 75 65 0A 74 79 70 65 73 2E 0A 0A 54 68 65
20 74 79 70 65 2D 74 6F 2D 6D 61 74 63 68 20 69 73 20 77 68 69 74 65 77
61 73 68 65 64 20 28 65 78 63 65 70 74 20 66 6F 72 20 63 6F 6D 6D 61 73
2C 20 77 68 69 63 68 20 68 61 76 65 20 6E 6F 0A 77 68 69 74 65 73 70 61
63 65 20 62 65 66 6F 72 65 20 74 68 65 6D 2C 20 61 6E 64 20 6D 75 6C 74
69 70 6C 65 20 43 3C 2A 3E 20 77 68 69 63 68 20 68 61 76 65 20 6E 6F 20
77 68 69 74 65 73 70 61 63 65 0A 62 65 74 77 65 65 6E 20 74 68 65 6D 29
2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 70 3E 2C 20 42 3C 2D 2D 72 65 6D 6F
76 65 2D 70 72 65 66 69 78 3E 3D 49 3C 70 72 65 66 69 78 3E 0A 0A 53 70
65 63 69 66 79 20 61 20 70 72 65 66 69 78 20 77 68 69 63 68 20 73 68 6F
75 6C 64 20 62 65 20 72 65 6D 6F 76 65 64 20 66 72 6F 6D 20 74 68 65 20
50 65 72 6C 20 66 75 6E 63 74 69 6F 6E 20 6E 61 6D 65 73 2C 0A 65 2E 67
2E 2C 20 53 3C 2D 70 20 73 65 63 5F 72 67 79 5F 3E 20 54 68 69 73 20 73
65 74 73 20 75 70 20 74 68 65 20 58 53 20 42 3C 50 52 45 46 49 58 3E 20
6B 65 79 77 6F 72 64 20 61 6E 64 20 72 65 6D 6F 76 65 73 0A 74 68 65 20
70 72 65 66 69 78 20 66 72 6F 6D 20 66 75 6E 63 74 69 6F 6E 73 20 74 68
61 74 20 61 72 65 20 61 75 74 6F 6C 6F 61 64 65 64 20 76 69 61 20 74 68
65 20 43 3C 63 6F 6E 73 74 61 6E 74 28 29 3E 0A 6D 65 63 68 61 6E 69 73
6D 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 73 3E 2C 20 42 3C 2D 2D 63 6F 6E
73 74 2D 73 75 62 73 3E 3D 49 3C 73 75 62 31 2C 73 75 62 32 3E 0A 0A 43
72 65 61 74 65 20 61 20 70 65 72 6C 20 73 75 62 72 6F 75 74 69 6E 65 20
66 6F 72 20 74 68 65 20 73 70 65 63 69 66 69 65 64 20 6D 61 63 72 6F 73
20 72 61 74 68 65 72 20 74 68 61 6E 20 61 75 74 6F 6C 6F 61 64 0A 77 69
74 68 20 74 68 65 20 63 6F 6E 73 74 61 6E 74 28 29 20 73 75 62 72 6F 75
74 69 6E 65 2E 20 20 54 68 65 73 65 20 6D 61 63 72 6F 73 20 61 72 65 20
61 73 73 75 6D 65 64 20 74 6F 20 68 61 76 65 20 61 0A 72 65 74 75 72 6E
20 74 79 70 65 20 6F 66 20 42 3C 63 68 61 72 20 2A 3E 2C 20 65 2E 67 2E
2C 0A 53 3C 2D 73 20 73 65 63 5F 72 67 79 5F 77 69 6C 64 63 61 72 64 5F
6E 61 6D 65 2C 73 65 63 5F 72 67 79 5F 77 69 6C 64 63 61 72 64 5F 73 69
64 3E 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 74 3E 2C 20 42 3C 2D 2D 64 65
66 61 75 6C 74 2D 74 79 70 65 3E 3D 49 3C 74 79 70 65 3E 0A 0A 53 70 65
63 69 66 79 20 74 68 65 20 69 6E 74 65 72 6E 61 6C 20 74 79 70 65 20 74
68 61 74 20 74 68 65 20 63 6F 6E 73 74 61 6E 74 28 29 20 6D 65 63 68 61
6E 69 73 6D 20 75 73 65 73 20 66 6F 72 20 6D 61 63 72 6F 73 2E 0A 54 68
65 20 64 65 66 61 75 6C 74 20 69 73 20 49 56 20 28 73 69 67 6E 65 64 20
69 6E 74 65 67 65 72 29 2E 20 20 43 75 72 72 65 6E 74 6C 79 20 61 6C 6C
20 6D 61 63 72 6F 73 20 66 6F 75 6E 64 20 64 75 72 69 6E 67 20 74 68 65
0A 68 65 61 64 65 72 20 73 63 61 6E 6E 69 6E 67 20 70 72 6F 63 65 73 73
20 77 69 6C 6C 20 62 65 20 61 73 73 75 6D 65 64 20 74 6F 20 68 61 76 65
20 74 68 69 73 20 74 79 70 65 2E 20 20 46 75 74 75 72 65 20 76 65 72 73
69 6F 6E 73 0A 6F 66 20 43 3C 68 32 78 73 3E 20 6D 61 79 20 67 61 69 6E
20 74 68 65 20 61 62 69 6C 69 74 79 20 74 6F 20 6D 61 6B 65 20 65 64 75
63 61 74 65 64 20 67 75 65 73 73 65 73 2E 0A 0A 3D 69 74 65 6D 20 42 3C
2D 2D 75 73 65 2D 6E 65 77 2D 74 65 73 74 73 3E 0A 0A 57 68 65 6E 20 42
3C 2D 2D 63 6F 6D 70 61 74 2D 76 65 72 73 69 6F 6E 3E 20 28 42 3C 2D 62
3E 29 20 69 73 20 70 72 65 73 65 6E 74 20 74 68 65 20 67 65 6E 65 72 61
74 65 64 20 74 65 73 74 73 20 77 69 6C 6C 20 75 73 65 0A 43 3C 54 65 73
74 3A 3A 4D 6F 72 65 3E 20 72 61 74 68 65 72 20 74 68 61 6E 20 43 3C 54
65 73 74 3E 20 77 68 69 63 68 20 69 73 20 74 68 65 20 64 65 66 61 75 6C
74 20 66 6F 72 20 76 65 72 73 69 6F 6E 73 20 62 65 66 6F 72 65 0A 35 2E
37 2E 32 20 2E 20 20 20 43 3C 54 65 73 74 3A 3A 4D 6F 72 65 3E 20 77 69
6C 6C 20 62 65 20 61 64 64 65 64 20 74 6F 20 50 52 45 52 45 51 5F 50 4D
20 69 6E 20 74 68 65 20 67 65 6E 65 72 61 74 65 64 0A 43 3C 4D 61 6B 65
66 69 6C 65 2E 50 4C 3E 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 2D 75 73 65
2D 6F 6C 64 2D 74 65 73 74 73 3E 0A 0A 57 69 6C 6C 20 66 6F 72 63 65 20
74 68 65 20 67 65 6E 65 72 61 74 69 6F 6E 20 6F 66 20 74 65 73 74 20 63
6F 64 65 20 74 68 61 74 20 75 73 65 73 20 74 68 65 20 6F 6C 64 65 72 20
43 3C 54 65 73 74 3E 20 6D 6F 64 75 6C 65 2E 0A 0A 3D 69 74 65 6D 20 42
3C 2D 2D 73 6B 69 70 2D 65 78 70 6F 72 74 65 72 3E 0A 0A 44 6F 20 6E 6F
74 20 75 73 65 20 43 3C 45 78 70 6F 72 74 65 72 3E 20 61 6E 64 2F 6F 72
20 65 78 70 6F 72 74 20 61 6E 79 20 73 79 6D 62 6F 6C 2E 0A 0A 3D 69 74
65 6D 20 42 3C 2D 2D 73 6B 69 70 2D 70 70 70 6F 72 74 3E 0A 0A 44 6F 20
6E 6F 74 20 75 73 65 20 43 3C 44 65 76 65 6C 3A 3A 50 50 50 6F 72 74 3E
3A 20 6E 6F 20 70 6F 72 74 61 62 69 6C 69 74 79 20 74 6F 20 6F 6C 64 65
72 20 76 65 72 73 69 6F 6E 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 2D 73 6B
69 70 2D 61 75 74 6F 6C 6F 61 64 65 72 3E 0A 0A 44 6F 20 6E 6F 74 20 75
73 65 20 74 68 65 20 6D 6F 64 75 6C 65 20 43 3C 41 75 74 6F 4C 6F 61 64
65 72 3E 3B 20 62 75 74 20 6B 65 65 70 20 74 68 65 20 63 6F 6E 73 74 61
6E 74 28 29 20 66 75 6E 63 74 69 6F 6E 0A 61 6E 64 20 43 3C 73 75 62 20
41 55 54 4F 4C 4F 41 44 3E 20 66 6F 72 20 63 6F 6E 73 74 61 6E 74 73 2E
0A 0A 3D 69 74 65 6D 20 42 3C 2D 2D 73 6B 69 70 2D 73 74 72 69 63 74 3E
0A 0A 44 6F 20 6E 6F 74 20 75 73 65 20 74 68 65 20 70 72 61 67 6D 61 20
43 3C 73 74 72 69 63 74 3E 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D 2D 73 6B
69 70 2D 77 61 72 6E 69 6E 67 73 3E 0A 0A 44 6F 20 6E 6F 74 20 75 73 65
20 74 68 65 20 70 72 61 67 6D 61 20 43 3C 77 61 72 6E 69 6E 67 73 3E 2E
0A 0A 3D 69 74 65 6D 20 42 3C 2D 76 3E 2C 20 42 3C 2D 2D 76 65 72 73 69
6F 6E 3E 3D 49 3C 76 65 72 73 69 6F 6E 3E 0A 0A 53 70 65 63 69 66 79 20
61 20 76 65 72 73 69 6F 6E 20 6E 75 6D 62 65 72 20 66 6F 72 20 74 68 69
73 20 65 78 74 65 6E 73 69 6F 6E 2E 20 20 54 68 69 73 20 76 65 72 73 69
6F 6E 20 6E 75 6D 62 65 72 20 69 73 20 61 64 64 65 64 0A 74 6F 20 74 68
65 20 74 65 6D 70 6C 61 74 65 73 2E 20 20 54 68 65 20 64 65 66 61 75 6C
74 20 69 73 20 30 2E 30 31 2C 20 6F 72 20 30 2E 30 30 5F 30 31 20 69 66
20 43 3C 2D 42 3E 20 69 73 20 73 70 65 63 69 66 69 65 64 2E 0A 54 68 65
20 76 65 72 73 69 6F 6E 20 73 70 65 63 69 66 69 65 64 20 73 68 6F 75 6C
64 20 62 65 20 6E 75 6D 65 72 69 63 2E 0A 0A 3D 69 74 65 6D 20 42 3C 2D
78 3E 2C 20 42 3C 2D 2D 61 75 74 6F 67 65 6E 2D 78 73 75 62 73 3E 0A 0A
41 75 74 6F 6D 61 74 69 63 61 6C 6C 79 20 67 65 6E 65 72 61 74 65 20 58
53 55 42 73 20 62 61 73 69 6E 67 20 6F 6E 20 66 75 6E 63 74 69 6F 6E 20
64 65 63 6C 61 72 61 74 69 6F 6E 73 20 69 6E 20 74 68 65 0A 68 65 61 64
65 72 20 66 69 6C 65 2E 20 20 54 68 65 20 70 61 63 6B 61 67 65 20 43 3C
43 3A 3A 53 63 61 6E 3E 20 73 68 6F 75 6C 64 20 62 65 20 69 6E 73 74 61
6C 6C 65 64 2E 20 49 66 20 74 68 69 73 0A 6F 70 74 69 6F 6E 20 69 73 20
73 70 65 63 69 66 69 65 64 2C 20 74 68 65 20 6E 61 6D 65 20 6F 66 20 74
68 65 20 68 65 61 64 65 72 20 66 69 6C 65 20 6D 61 79 20 6C 6F 6F 6B 20
6C 69 6B 65 0A 43 3C 4E 41 4D 45 31 2C 4E 41 4D 45 32 3E 2E 20 49 6E 20
74 68 69 73 20 63 61 73 65 20 4E 41 4D 45 31 20 69 73 20 75 73 65 64 20
69 6E 73 74 65 61 64 20 6F 66 20 74 68 65 20 73 70 65 63 69 66 69 65 64
0A 73 74 72 69 6E 67 2C 20 62 75 74 20 58 53 55 42 73 20 61 72 65 20 65
6D 69 74 74 65 64 20 6F 6E 6C 79 20 66 6F 72 20 74 68 65 20 64 65 63 6C
61 72 61 74 69 6F 6E 73 20 69 6E 63 6C 75 64 65 64 20 66 72 6F 6D 0A 66
69 6C 65 20 4E 41 4D 45 32 2E 0A 0A 4E 6F 74 65 20 74 68 61 74 20 73 6F
6D 65 20 74 79 70 65 73 20 6F 66 20 61 72 67 75 6D 65 6E 74 73 2F 72 65
74 75 72 6E 2D 76 61 6C 75 65 73 20 66 6F 72 20 66 75 6E 63 74 69 6F 6E
73 20 6D 61 79 0A 72 65 73 75 6C 74 20 69 6E 20 58 53 55 42 2D 64 65 63
6C 61 72 61 74 69 6F 6E 73 2F 74 79 70 65 6D 61 70 2D 65 6E 74 72 69 65
73 20 77 68 69 63 68 20 6E 65 65 64 0A 68 61 6E 64 2D 65 64 69 74 69 6E
67 2E 20 53 75 63 68 20 6D 61 79 20 62 65 20 6F 62 6A 65 63 74 73 20 77
68 69 63 68 20 63 61 6E 6E 6F 74 20 62 65 20 63 6F 6E 76 65 72 74 65 64
20 66 72 6F 6D 2F 74 6F 20 61 0A 70 6F 69 6E 74 65 72 20 28 6C 69 6B 65
20 43 3C 6C 6F 6E 67 20 6C 6F 6E 67 3E 29 2C 20 70 6F 69 6E 74 65 72 73
20 74 6F 20 66 75 6E 63 74 69 6F 6E 73 2C 20 6F 72 20 61 72 72 61 79 73
2E 20 20 53 65 65 0A 61 6C 73 6F 20 74 68 65 20 73 65 63 74 69 6F 6E 20
6F 6E 20 4C 3C 4C 49 4D 49 54 41 54 49 4F 4E 53 20 6F 66 20 42 3C 2D 78
3E 3E 2E 0A 0A 3D 62 61 63 6B 0A 0A 3D 68 65 61 64 31 20 45 58 41 4D 50
4C 45 53 0A 0A 0A 20 20 20 20 23 20 44 65 66 61 75 6C 74 20 62 65 68 61
76 69 6F 72 2C 20 65 78 74 65 6E 73 69 6F 6E 20 69 73 20 52 75 73 65 72
73 0A 20 20 20 20 68 32 78 73 20 72 70 63 73 76 63 2F 72 75 73 65 72 73
0A 0A 20 20 20 20 23 20 53 61 6D 65 2C 20 62 75 74 20 65 78 74 65 6E 73
69 6F 6E 20 69 73 20 52 55 53 45 52 53 0A 20 20 20 20 68 32 78 73 20 2D
6E 20 52 55 53 45 52 53 20 72 70 63 73 76 63 2F 72 75 73 65 72 73 0A 0A
20 20 20 20 23 20 45 78 74 65 6E 73 69 6F 6E 20 69 73 20 72 70 63 73 76
63 3A 3A 72 75 73 65 72 73 2E 20 53 74 69 6C 6C 20 66 69 6E 64 73 20 3C
72 70 63 73 76 63 2F 72 75 73 65 72 73 2E 68 3E 0A 20 20 20 20 68 32 78
73 20 72 70 63 73 76 63 3A 3A 72 75 73 65 72 73 0A 0A 20 20 20 20 23 20
45 78 74 65 6E 73 69 6F 6E 20 69 73 20 4F 4E 43 3A 3A 52 50 43 2E 20 20
53 74 69 6C 6C 20 66 69 6E 64 73 20 3C 72 70 63 73 76 63 2F 72 75 73 65
72 73 2E 68 3E 0A 20 20 20 20 68 32 78 73 20 2D 6E 20 4F 4E 43 3A 3A 52
50 43 20 72 70 63 73 76 63 2F 72 75 73 65 72 73 0A 0A 20 20 20 20 23 20
57 69 74 68 6F 75 74 20 63 6F 6E 73 74 61 6E 74 28 29 20 6F 72 20 41 55
54 4F 4C 4F 41 44 0A 20 20 20 20 68 32 78 73 20 2D 63 20 72 70 63 73 76
63 2F 72 75 73 65 72 73 0A 0A 20 20 20 20 23 20 43 72 65 61 74 65 73 20
74 65 6D 70 6C 61 74 65 73 20 66 6F 72 20 61 6E 20 65 78 74 65 6E 73 69
6F 6E 20 6E 61 6D 65 64 20 52 50 43 0A 20 20 20 20 68 32 78 73 20 2D 63
66 6E 20 52 50 43 0A 0A 20 20 20 20 23 20 45 78 74 65 6E 73 69 6F 6E 20
69 73 20 4F 4E 43 3A 3A 52 50 43 2E 0A 20 20 20 20 68 32 78 73 20 2D 63
66 6E 20 4F 4E 43 3A 3A 52 50 43 0A 0A 20 20 20 20 23 20 45 78 74 65 6E
73 69 6F 6E 20 69 73 20 4C 69 62 3A 3A 46 6F 6F 20 77 68 69 63 68 20 77
6F 72 6B 73 20 61 74 20 6C 65 61 73 74 20 77 69 74 68 20 50 65 72 6C 35
2E 30 30 35 5F 30 33 2E 0A 20 20 20 20 23 20 43 6F 6E 73 74 61 6E 74 73
20 61 72 65 20 63 72 65 61 74 65 64 20 66 6F 72 20 61 6C 6C 20 23 64 65
66 69 6E 65 73 20 61 6E 64 20 65 6E 75 6D 73 20 68 32 78 73 20 63 61 6E
20 66 69 6E 64 0A 20 20 20 20 23 20 69 6E 20 66 6F 6F 2E 68 2E 0A 20 20
20 20 68 32 78 73 20 2D 62 20 35 2E 35 2E 33 20 2D 6E 20 4C 69 62 3A 3A
46 6F 6F 20 66 6F 6F 2E 68 0A 0A 20 20 20 20 23 20 45 78 74 65 6E 73 69
6F 6E 20 69 73 20 4C 69 62 3A 3A 46 6F 6F 20 77 68 69 63 68 20 77 6F 72
6B 73 20 61 74 20 6C 65 61 73 74 20 77 69 74 68 20 50 65 72 6C 35 2E 30
30 35 5F 30 33 2E 0A 20 20 20 20 23 20 43 6F 6E 73 74 61 6E 74 73 20 61
72 65 20 63 72 65 61 74 65 64 20 66 6F 72 20 61 6C 6C 20 23 64 65 66 69
6E 65 73 20 62 75 74 20 6F 6E 6C 79 20 66 6F 72 20 65 6E 75 6D 73 0A 20
20 20 20 23 20 77 68 6F 73 65 20 6E 61 6D 65 73 20 64 6F 20 6E 6F 74 20
73 74 61 72 74 20 77 69 74 68 20 27 62 61 72 5F 27 2E 0A 20 20 20 20 68
32 78 73 20 2D 62 20 35 2E 35 2E 33 20 2D 65 20 27 5E 62 61 72 5F 27 20
2D 6E 20 4C 69 62 3A 3A 46 6F 6F 20 66 6F 6F 2E 68 0A 0A 20 20 20 20 23
20 4D 61 6B 65 66 69 6C 65 2E 50 4C 20 77 69 6C 6C 20 6C 6F 6F 6B 20 66
6F 72 20 6C 69 62 72 61 72 79 20 2D 6C 72 70 63 20 69 6E 0A 20 20 20 20
23 20 61 64 64 69 74 69 6F 6E 61 6C 20 64 69 72 65 63 74 6F 72 79 20 2F
6F 70 74 2F 6E 65 74 2F 6C 69 62 0A 20 20 20 20 68 32 78 73 20 72 70 63
73 76 63 2F 72 75 73 65 72 73 20 2D 4C 2F 6F 70 74 2F 6E 65 74 2F 6C 69
62 20 2D 6C 72 70 63 0A 0A 20 20 20 20 23 20 45 78 74 65 6E 73 69 6F 6E
20 69 73 20 44 43 45 3A 3A 72 67 79 6E 62 61 73 65 0A 20 20 20 20 23 20
70 72 65 66 69 78 20 22 73 65 63 5F 72 67 79 5F 22 20 69 73 20 64 72 6F
70 70 65 64 20 66 72 6F 6D 20 70 65 72 6C 20 66 75 6E 63 74 69 6F 6E 20
6E 61 6D 65 73 0A 20 20 20 20 68 32 78 73 20 2D 6E 20 44 43 45 3A 3A 72
67 79 6E 62 61 73 65 20 2D 70 20 73 65 63 5F 72 67 79 5F 20 64 63 65 2F
72 67 79 6E 62 61 73 65 0A 0A 20 20 20 20 23 20 45 78 74 65 6E 73 69 6F
6E 20 69 73 20 44 43 45 3A 3A 72 67 79 6E 62 61 73 65 0A 20 20 20 20 23
20 70 72 65 66 69 78 20 22 73 65 63 5F 72 67 79 5F 22 20 69 73 20 64 72
6F 70 70 65 64 20 66 72 6F 6D 20 70 65 72 6C 20 66 75 6E 63 74 69 6F 6E
20 6E 61 6D 65 73 0A 20 20 20 20 23 20 73 75 62 72 6F 75 74 69 6E 65 73
20 61 72 65 20 63 72 65 61 74 65 64 20 66 6F 72 20 73 65 63 5F 72 67 79
5F 77 69 6C 64 63 61 72 64 5F 6E 61 6D 65 20 61 6E 64 0A 20 20 20 20 23
20 73 65 63 5F 72 67 79 5F 77 69 6C 64 63 61 72 64 5F 73 69 64 0A 20 20
20 20 68 32 78 73 20 2D 6E 20 44 43 45 3A 3A 72 67 79 6E 62 61 73 65 20
2D 70 20 73 65 63 5F 72 67 79 5F 20 5C 0A 20 20 20 20 2D 73 20 73 65 63
5F 72 67 79 5F 77 69 6C 64 63 61 72 64 5F 6E 61 6D 65 2C 73 65 63 5F 72
67 79 5F 77 69 6C 64 63 61 72 64 5F 73 69 64 20 64 63 65 2F 72 67 79 6E
62 61 73 65 0A 0A 20 20 20 20 23 20 4D 61 6B 65 20 58 53 20 77 69 74 68
6F 75 74 20 64 65 66 69 6E 65 73 20 69 6E 20 70 65 72 6C 2E 68 2C 20 62
75 74 20 77 69 74 68 20 66 75 6E 63 74 69 6F 6E 20 64 65 63 6C 61 72 61
74 69 6F 6E 73 0A 20 20 20 20 23 20 76 69 73 69 62 6C 65 20 66 72 6F 6D
20 70 65 72 6C 2E 68 2E 20 4E 61 6D 65 20 6F 66 20 74 68 65 20 65 78 74
65 6E 73 69 6F 6E 20 69 73 20 70 65 72 6C 31 2E 0A 20 20 20 20 23 20 57
68 65 6E 20 73 63 61 6E 6E 69 6E 67 20 70 65 72 6C 2E 68 2C 20 64 65 66
69 6E 65 20 2D 44 45 58 54 3D 65 78 74 65 72 6E 20 2D 44 64 45 58 54 3D
20 2D 44 49 4E 49 54 28 78 29 3D 0A 20 20 20 20 23 20 45 78 74 72 61 20
62 61 63 6B 73 6C 61 73 68 65 73 20 62 65 6C 6F 77 20 62 65 63 61 75 73
65 20 74 68 65 20 73 74 72 69 6E 67 20 69 73 20 70 61 73 73 65 64 20 74
6F 20 73 68 65 6C 6C 2E 0A 20 20 20 20 23 20 4E 6F 74 65 20 74 68 61 74
20 61 20 64 69 72 65 63 74 6F 72 79 20 77 69 74 68 20 70 65 72 6C 20 68
65 61 64 65 72 20 66 69 6C 65 73 20 77 6F 75 6C 64 0A 20 20 20 20 23 20
20 62 65 20 61 64 64 65 64 20 61 75 74 6F 6D 61 74 69 63 61 6C 6C 79 20
74 6F 20 69 6E 63 6C 75 64 65 20 70 61 74 68 2E 0A 20 20 20 20 68 32 78
73 20 2D 78 41 6E 20 70 65 72 6C 31 20 2D 46 20 22 2D 44 45 58 54 3D 65
78 74 65 72 6E 20 2D 44 64 45 58 54 3D 20 2D 44 49 4E 49 54 5C 28 78 5C
29 3D 22 20 70 65 72 6C 2E 68 0A 0A 20 20 20 20 23 20 53 61 6D 65 20 77
69 74 68 20 66 75 6E 63 74 69 6F 6E 20 64 65 63 6C 61 72 61 74 69 6F 6E
20 69 6E 20 70 72 6F 74 6F 2E 68 20 61 73 20 76 69 73 69 62 6C 65 20 66
72 6F 6D 20 70 65 72 6C 2E 68 2E 0A 20 20 20 20 68 32 78 73 20 2D 78 41
6E 20 70 65 72 6C 32 20 70 65 72 6C 2E 68 2C 70 72 6F 74 6F 2E 68 0A 0A
20 20 20 20 23 20 53 61 6D 65 20 62 75 74 20 73 65 6C 65 63 74 20 6F 6E
6C 79 20 66 75 6E 63 74 69 6F 6E 73 20 77 68 69 63 68 20 6D 61 74 63 68
20 2F 5E 61 76 5F 2F 0A 20 20 20 20 68 32 78 73 20 2D 4D 20 27 5E 61 76
5F 27 20 2D 78 41 6E 20 70 65 72 6C 32 20 70 65 72 6C 2E 68 2C 70 72 6F
74 6F 2E 68 0A 0A 20 20 20 20 23 20 53 61 6D 65 20 62 75 74 20 74 72 65
61 74 20 53 56 2A 20 65 74 63 20 61 73 20 22 6F 70 61 71 75 65 22 20 74
79 70 65 73 0A 20 20 20 20 68 32 78 73 20 2D 6F 20 27 5E 5B 53 5D 56 20
5C 2A 24 27 20 2D 4D 20 27 5E 61 76 5F 27 20 2D 78 41 6E 20 70 65 72 6C
32 20 70 65 72 6C 2E 68 2C 70 72 6F 74 6F 2E 68 0A 0A 3D 68 65 61 64 32
20 45 78 74 65 6E 73 69 6F 6E 20 62 61 73 65 64 20 6F 6E 20 46 3C 2E 68
3E 20 61 6E 64 20 46 3C 2E 63 3E 20 66 69 6C 65 73 0A 0A 53 75 70 70 6F
73 65 20 74 68 61 74 20 79 6F 75 20 68 61 76 65 20 73 6F 6D 65 20 43 20
66 69 6C 65 73 20 69 6D 70 6C 65 6D 65 6E 74 69 6E 67 20 73 6F 6D 65 20
66 75 6E 63 74 69 6F 6E 61 6C 69 74 79 2C 0A 61 6E 64 20 74 68 65 20 63
6F 72 72 65 73 70 6F 6E 64 69 6E 67 20 68 65 61 64 65 72 20 66 69 6C 65
73 2E 20 20 48 6F 77 20 74 6F 20 63 72 65 61 74 65 20 61 6E 20 65 78 74
65 6E 73 69 6F 6E 20 77 68 69 63 68 0A 6D 61 6B 65 73 20 74 68 69 73 20
66 75 6E 63 74 69 6F 6E 61 6C 69 74 79 20 61 63 63 65 73 73 69 62 6C 65
20 69 6E 20 50 65 72 6C 3F 20 20 54 68 65 20 65 78 61 6D 70 6C 65 20 62
65 6C 6F 77 0A 61 73 73 75 6D 65 73 20 74 68 61 74 20 74 68 65 20 68 65
61 64 65 72 20 66 69 6C 65 73 20 61 72 65 20 46 3C 69 6E 74 65 72 66 61
63 65 5F 73 69 6D 70 6C 65 2E 68 3E 20 61 6E 64 0A 49 3C 69 6E 74 65 72
66 61 63 65 5F 68 61 69 72 79 2E 68 3E 2C 20 61 6E 64 20 79 6F 75 20 77
61 6E 74 20 74 68 65 20 70 65 72 6C 20 6D 6F 64 75 6C 65 20 62 65 20 6E
61 6D 65 64 20 61 73 0A 43 3C 45 78 74 3A 3A 45 6E 73 69 6F 6E 3E 2E 20
20 49 66 20 79 6F 75 20 6E 65 65 64 20 73 6F 6D 65 20 70 72 65 70 72 6F
63 65 73 73 6F 72 20 64 69 72 65 63 74 69 76 65 73 20 61 6E 64 2F 6F 72
0A 6C 69 6E 6B 69 6E 67 20 77 69 74 68 20 65 78 74 65 72 6E 61 6C 20 6C
69 62 72 61 72 69 65 73 2C 20 73 65 65 20 74 68 65 20 66 6C 61 67 73 20
43 3C 2D 46 3E 2C 20 43 3C 2D 4C 3E 20 61 6E 64 20 43 3C 2D 6C 3E 0A 69
6E 20 4C 3C 22 4F 50 54 49 4F 4E 53 22 3E 2E 0A 0A 3D 6F 76 65 72 0A 0A
3D 69 74 65 6D 20 46 69 6E 64 20 74 68 65 20 64 69 72 65 63 74 6F 72 79
20 6E 61 6D 65 0A 0A 53 74 61 72 74 20 77 69 74 68 20 61 20 64 75 6D 6D
79 20 72 75 6E 20 6F 66 20 68 32 78 73 3A 0A 0A 20 20 68 32 78 73 20 2D
41 66 6E 20 45 78 74 3A 3A 45 6E 73 69 6F 6E 0A 0A 54 68 65 20 6F 6E 6C
79 20 70 75 72 70 6F 73 65 20 6F 66 20 74 68 69 73 20 73 74 65 70 20 69
73 20 74 6F 20 63 72 65 61 74 65 20 74 68 65 20 6E 65 65 64 65 64 20 64
69 72 65 63 74 6F 72 69 65 73 2C 20 61 6E 64 0A 6C 65 74 20 79 6F 75 20
6B 6E 6F 77 20 74 68 65 20 6E 61 6D 65 73 20 6F 66 20 74 68 65 73 65 20
64 69 72 65 63 74 6F 72 69 65 73 2E 20 20 46 72 6F 6D 20 74 68 65 20 6F
75 74 70 75 74 20 79 6F 75 20 63 61 6E 0A 73 65 65 20 74 68 61 74 20 74
68 65 20 64 69 72 65 63 74 6F 72 79 20 66 6F 72 20 74 68 65 20 65 78 74
65 6E 73 69 6F 6E 20 69 73 20 46 3C 45 78 74 2F 45 6E 73 69 6F 6E 3E 2E
0A 0A 3D 69 74 65 6D 20 43 6F 70 79 20 43 20 66 69 6C 65 73 0A 0A 43 6F
70 79 20 79 6F 75 72 20 68 65 61 64 65 72 20 66 69 6C 65 73 20 61 6E 64
20 43 20 66 69 6C 65 73 20 74 6F 20 74 68 69 73 20 64 69 72 65 63 74 6F
72 79 20 46 3C 45 78 74 2F 45 6E 73 69 6F 6E 3E 2E 0A 0A 3D 69 74 65 6D
20 43 72 65 61 74 65 20 74 68 65 20 65 78 74 65 6E 73 69 6F 6E 0A 0A 52
75 6E 20 68 32 78 73 2C 20 6F 76 65 72 77 72 69 74 69 6E 67 20 6F 6C 64
65 72 20 61 75 74 6F 67 65 6E 65 72 61 74 65 64 20 66 69 6C 65 73 3A 0A
0A 20 20 68 32 78 73 20 2D 4F 78 61 6E 20 45 78 74 3A 3A 45 6E 73 69 6F
6E 20 69 6E 74 65 72 66 61 63 65 5F 73 69 6D 70 6C 65 2E 68 20 69 6E 74
65 72 66 61 63 65 5F 68 61 69 72 79 2E 68 0A 0A 68 32 78 73 20 6C 6F 6F
6B 73 20 66 6F 72 20 68 65 61 64 65 72 20 66 69 6C 65 73 20 49 3C 61 66
74 65 72 3E 20 63 68 61 6E 67 69 6E 67 20 74 6F 20 74 68 65 20 65 78 74
65 6E 73 69 6F 6E 0A 64 69 72 65 63 74 6F 72 79 2C 20 73 6F 20 69 74 20
77 69 6C 6C 20 66 69 6E 64 20 79 6F 75 72 20 68 65 61 64 65 72 20 66 69
6C 65 73 20 4F 4B 2E 0A 0A 3D 69 74 65 6D 20 41 72 63 68 69 76 65 20 61
6E 64 20 74 65 73 74 0A 0A 41 73 20 75 73 75 61 6C 2C 20 72 75 6E 0A 0A
20 20 63 64 20 45 78 74 2F 45 6E 73 69 6F 6E 0A 20 20 70 65 72 6C 20 4D
61 6B 65 66 69 6C 65 2E 50 4C 0A 20 20 6D 61 6B 65 20 64 69 73 74 0A 20
20 6D 61 6B 65 0A 20 20 6D 61 6B 65 20 74 65 73 74 0A 0A 3D 69 74 65 6D
20 48 69 6E 74 73 0A 0A 49 74 20 69 73 20 69 6D 70 6F 72 74 61 6E 74 20
74 6F 20 64 6F 20 43 3C 6D 61 6B 65 20 64 69 73 74 3E 20 61 73 20 65 61
72 6C 79 20 61 73 20 70 6F 73 73 69 62 6C 65 2E 20 20 54 68 69 73 20 77
61 79 20 79 6F 75 0A 63 61 6E 20 65 61 73 69 6C 79 20 6D 65 72 67 65 28
31 29 20 79 6F 75 72 20 63 68 61 6E 67 65 73 20 74 6F 20 61 75 74 6F 67
65 6E 65 72 61 74 65 64 20 66 69 6C 65 73 20 69 66 20 79 6F 75 20 64 65
63 69 64 65 0A 74 6F 20 65 64 69 74 20 79 6F 75 72 20 43 3C 2E 68 3E 20
66 69 6C 65 73 20 61 6E 64 20 72 65 72 75 6E 20 68 32 78 73 2E 0A 0A 44
6F 20 6E 6F 74 20 66 6F 72 67 65 74 20 74 6F 20 65 64 69 74 20 74 68 65
20 64 6F 63 75 6D 65 6E 74 61 74 69 6F 6E 20 69 6E 20 74 68 65 20 67 65
6E 65 72 61 74 65 64 20 46 3C 2E 70 6D 3E 20 66 69 6C 65 2E 0A 0A 43 6F
6E 73 69 64 65 72 20 74 68 65 20 61 75 74 6F 67 65 6E 65 72 61 74 65 64
20 66 69 6C 65 73 20 61 73 20 73 6B 65 6C 65 74 6F 6E 73 20 6F 6E 6C 79
2C 20 79 6F 75 20 6D 61 79 20 69 6E 76 65 6E 74 0A 62 65 74 74 65 72 20
69 6E 74 65 72 66 61 63 65 73 20 74 68 61 6E 20 77 68 61 74 20 68 32 78
73 20 63 6F 75 6C 64 20 67 75 65 73 73 2E 0A 0A 43 6F 6E 73 69 64 65 72
20 74 68 69 73 20 73 65 63 74 69 6F 6E 20 61 73 20 61 20 67 75 69 64 65
6C 69 6E 65 20 6F 6E 6C 79 2C 20 73 6F 6D 65 20 6F 74 68 65 72 20 6F 70
74 69 6F 6E 73 20 6F 66 20 68 32 78 73 0A 6D 61 79 20 62 65 74 74 65 72
20 73 75 69 74 20 79 6F 75 72 20 6E 65 65 64 73 2E 0A 0A 3D 62 61 63 6B
0A 0A 3D 68 65 61 64 31 20 45 4E 56 49 52 4F 4E 4D 45 4E 54 0A 0A 4E 6F
20 65 6E 76 69 72 6F 6E 6D 65 6E 74 20 76 61 72 69 61 62 6C 65 73 20 61
72 65 20 75 73 65 64 2E 0A 0A 3D 68 65 61 64 31 20 41 55 54 48 4F 52 0A
0A 4C 61 72 72 79 20 57 61 6C 6C 20 61 6E 64 20 6F 74 68 65 72 73 0A 0A
3D 68 65 61 64 31 20 53 45 45 20 41 4C 53 4F 0A 0A 4C 3C 70 65 72 6C 3E
2C 20 4C 3C 70 65 72 6C 78 73 74 75 74 3E 2C 20 4C 3C 45 78 74 55 74 69
6C 73 3A 3A 4D 61 6B 65 4D 61 6B 65 72 3E 2C 20 61 6E 64 20 4C 3C 41 75
74 6F 4C 6F 61 64 65 72 3E 2E 0A 0A 3D 68 65 61 64 31 20 44 49 41 47 4E
4F 53 54 49 43 53 0A 0A 54 68 65 20 75 73 75 61 6C 20 77 61 72 6E 69 6E
67 73 20 69 66 20 69 74 20 63 61 6E 6E 6F 74 20 72 65 61 64 20 6F 72 20
77 72 69 74 65 20 74 68 65 20 66 69 6C 65 73 20 69 6E 76 6F 6C 76 65 64
2E 0A 0A 3D 68 65 61 64 31 20 4C 49 4D 49 54 41 54 49 4F 4E 53 20 6F 66
20 42 3C 2D 78 3E 0A 0A 46 3C 68 32 78 73 3E 20 77 6F 75 6C 64 20 6E 6F
74 20 64 69 73 74 69 6E 67 75 69 73 68 20 77 68 65 74 68 65 72 20 61 6E
20 61 72 67 75 6D 65 6E 74 20 74 6F 20 61 20 43 20 66 75 6E 63 74 69 6F
6E 0A 77 68 69 63 68 20 69 73 20 6F 66 20 74 68 65 20 66 6F 72 6D 2C 20
73 61 79 2C 20 43 3C 69 6E 74 20 2A 3E 2C 20 69 73 20 61 6E 20 69 6E 70
75 74 2C 20 6F 75 74 70 75 74 2C 20 6F 72 0A 69 6E 70 75 74 2F 6F 75 74
70 75 74 20 70 61 72 61 6D 65 74 65 72 2E 20 20 49 6E 20 70 61 72 74 69
63 75 6C 61 72 2C 20 61 72 67 75 6D 65 6E 74 20 64 65 63 6C 61 72 61 74
69 6F 6E 73 20 6F 66 20 74 68 65 0A 66 6F 72 6D 0A 0A 20 20 20 20 69 6E
74 0A 20 20 20 20 66 6F 6F 28 6E 29 0A 09 69 6E 74 20 2A 6E 0A 0A 73 68
6F 75 6C 64 20 62 65 20 62 65 74 74 65 72 20 72 65 77 72 69 74 74 65 6E
20 61 73 0A 0A 20 20 20 20 69 6E 74 0A 20 20 20 20 66 6F 6F 28 6E 29 0A
09 69 6E 74 20 26 6E 0A 0A 69 66 20 43 3C 6E 3E 20 69 73 20 61 6E 20 69
6E 70 75 74 20 70 61 72 61 6D 65 74 65 72 2E 0A 0A 41 64 64 69 74 69 6F
6E 61 6C 6C 79 2C 20 46 3C 68 32 78 73 3E 20 68 61 73 20 6E 6F 20 66 61
63 69 6C 69 74 69 65 73 20 74 6F 20 69 6E 74 75 69 74 20 74 68 61 74 20
61 20 66 75 6E 63 74 69 6F 6E 0A 0A 20 20 20 69 6E 74 0A 20 20 20 66 6F
6F 28 61 64 64 72 2C 6C 29 0A 09 63 68 61 72 20 2A 61 64 64 72 0A 09 69
6E 74 20 20 20 6C 0A 0A 74 61 6B 65 73 20 61 20 70 61 69 72 20 6F 66 20
61 64 64 72 65 73 73 20 61 6E 64 20 6C 65 6E 67 74 68 20 6F 66 20 64 61
74 61 20 61 74 20 74 68 69 73 20 61 64 64 72 65 73 73 2C 20 73 6F 20 69
74 20 69 73 20 62 65 74 74 65 72 0A 74 6F 20 72 65 77 72 69 74 65 20 74
68 69 73 20 66 75 6E 63 74 69 6F 6E 20 61 73 0A 0A 20 20 20 20 69 6E 74
0A 20 20 20 20 66 6F 6F 28 73 76 29 0A 09 20 20 20 20 53 56 20 2A 61 64
64 72 0A 09 50 52 45 49 4E 49 54 3A 0A 09 20 20 20 20 53 54 52 4C 45 4E
20 6C 65 6E 3B 0A 09 20 20 20 20 63 68 61 72 20 2A 73 3B 0A 09 43 4F 44
45 3A 0A 09 20 20 20 20 73 20 3D 20 53 76 50 56 28 73 76 2C 6C 65 6E 29
3B 0A 09 20 20 20 20 52 45 54 56 41 4C 20 3D 20 66 6F 6F 28 73 2C 20 6C
65 6E 29 3B 0A 09 4F 55 54 50 55 54 3A 0A 09 20 20 20 20 52 45 54 56 41
4C 0A 0A 6F 72 20 61 6C 74 65 72 6E 61 74 65 6C 79 0A 0A 20 20 20 20 73
74 61 74 69 63 20 69 6E 74 0A 20 20 20 20 6D 79 5F 66 6F 6F 28 53 56 20
2A 73 76 29 0A 20 20 20 20 7B 0A 09 53 54 52 4C 45 4E 20 6C 65 6E 3B 0A
09 63 68 61 72 20 2A 73 20 3D 20 53 76 50 56 28 73 76 2C 6C 65 6E 29 3B
0A 0A 09 72 65 74 75 72 6E 20 66 6F 6F 28 73 2C 20 6C 65 6E 29 3B 0A 20
20 20 20 7D 0A 0A 20 20 20 20 4D 4F 44 55 4C 45 20 3D 20 66 6F 6F 09 50
41 43 4B 41 47 45 20 3D 20 66 6F 6F 09 50 52 45 46 49 58 20 3D 20 6D 79
5F 0A 0A 20 20 20 20 69 6E 74 0A 20 20 20 20 66 6F 6F 28 73 76 29 0A 09
53 56 20 2A 73 76 0A 0A 53 65 65 20 4C 3C 70 65 72 6C 78 73 3E 20 61 6E
64 20 4C 3C 70 65 72 6C 78 73 74 75 74 3E 20 66 6F 72 20 61 64 64 69 74
69 6F 6E 61 6C 20 64 65 74 61 69 6C 73 2E 0A 0A 3D 63 75 74 0A 0A 23 20
27 20 23 20 47 72 72 0A 75 73 65 20 73 74 72 69 63 74 3B 0A 0A 0A 6D 79
28 20 24 48 32 58 53 5F 56 45 52 53 49 4F 4E 20 29 20 3D 20 27 20 24 52
65 76 69 73 69 6F 6E 3A 20 31 2E 32 33 20 24 20 27 20 3D 7E 20 2F 5C 24
52 65 76 69 73 69 6F 6E 3A 5C 73 2B 28 5B 5E 5C 73 5D 2B 29 2F 3B 0A 6D
79 20 24 54 45 4D 50 4C 41 54 45 5F 56 45 52 53 49 4F 4E 20 3D 20 27 30
2E 30 31 27 3B 0A 6D 79 20 40 41 52 47 53 20 3D 20 40 41 52 47 56 3B 0A
6D 79 20 24 63 6F 6D 70 61 74 5F 76 65 72 73 69 6F 6E 20 3D 20 24 5D 3B
0A 0A 75 73 65 20 47 65 74 6F 70 74 3A 3A 4C 6F 6E 67 3B 0A 75 73 65 20
43 6F 6E 66 69 67 3B 0A 75 73 65 20 54 65 78 74 3A 3A 57 72 61 70 3B 0A
24 54 65 78 74 3A 3A 57 72 61 70 3A 3A 68 75 67 65 20 3D 20 27 6F 76 65
72 66 6C 6F 77 27 3B 0A 24 54 65 78 74 3A 3A 57 72 61 70 3A 3A 63 6F 6C
75 6D 6E 73 20 3D 20 38 30 3B 0A 75 73 65 20 45 78 74 55 74 69 6C 73 3A
3A 43 6F 6E 73 74 61 6E 74 20 71 77 20 28 57 72 69 74 65 43 6F 6E 73 74
61 6E 74 73 20 57 72 69 74 65 4D 61 6B 65 66 69 6C 65 53 6E 69 70 70 65
74 20 61 75 74 6F 6C 6F 61 64 29 3B 0A 75 73 65 20 46 69 6C 65 3A 3A 43
6F 6D 70 61 72 65 3B 0A 75 73 65 20 46 69 6C 65 3A 3A 50 61 74 68 3B 0A
0A 73 75 62 20 75 73 61 67 65 20 7B 0A 20 20 20 20 77 61 72 6E 20 22 40
5F 5C 6E 22 20 69 66 20 40 5F 3B 0A 20 20 20 20 64 69 65 20 3C 3C 45 4F
46 55 53 41 47 45 3B 0A 68 32 78 73 20 5B 4F 50 54 49 4F 4E 53 20 2E 2E
2E 20 5D 20 5B 68 65 61 64 65 72 66 69 6C 65 20 5B 65 78 74 72 61 5F 6C
69 62 72 61 72 69 65 73 5D 5D 0A 76 65 72 73 69 6F 6E 3A 20 24 48 32 58
53 5F 56 45 52 53 49 4F 4E 0A 4F 50 54 49 4F 4E 53 3A 0A 20 20 20 20 2D
41 2C 20 2D 2D 6F 6D 69 74 2D 61 75 74 6F 6C 6F 61 64 20 20 20 4F 6D 69
74 20 61 6C 6C 20 61 75 74 6F 6C 6F 61 64 69 6E 67 20 66 61 63 69 6C 69
74 69 65 73 20 28 69 6D 70 6C 69 65 73 20 2D 63 29 2E 0A 20 20 20 20 2D
42 2C 20 2D 2D 62 65 74 61 2D 76 65 72 73 69 6F 6E 20 20 20 20 55 73 65
20 62 65 74 61 20 5C 24 56 45 52 53 49 4F 4E 20 6F 66 20 30 2E 30 30 5F
30 31 20 28 69 67 6E 6F 72 65 64 20 69 66 20 2D 76 29 2E 0A 20 20 20 20
2D 43 2C 20 2D 2D 6F 6D 69 74 2D 63 68 61 6E 67 65 73 20 20 20 20 4F 6D
69 74 20 63 72 65 61 74 69 6E 67 20 74 68 65 20 43 68 61 6E 67 65 73 20
66 69 6C 65 2C 20 61 64 64 20 48 49 53 54 4F 52 59 20 68 65 61 64 69 6E
67 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 74 6F 20 73 74 75 62 20 50 4F 44 2E 0A 20 20 20 20 2D 46 2C
20 2D 2D 63 70 70 2D 66 6C 61 67 73 20 20 20 20 20 20 20 41 64 64 69 74
69 6F 6E 61 6C 20 66 6C 61 67 73 20 66 6F 72 20 43 20 70 72 65 70 72 6F
63 65 73 73 6F 72 2F 63 6F 6D 70 69 6C 65 2E 0A 20 20 20 20 2D 4D 2C 20
2D 2D 66 75 6E 63 2D 6D 61 73 6B 20 20 20 20 20 20 20 4D 61 73 6B 20 74
6F 20 73 65 6C 65 63 74 20 43 20 66 75 6E 63 74 69 6F 6E 73 2F 6D 61 63
72 6F 73 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 28 64 65 66 61 75 6C 74 20 69 73 20 73 65 6C 65 63 74
20 61 6C 6C 29 2E 0A 20 20 20 20 2D 4F 2C 20 2D 2D 6F 76 65 72 77 72 69
74 65 2D 6F 6B 20 20 20 20 41 6C 6C 6F 77 20 6F 76 65 72 77 72 69 74 69
6E 67 20 6F 66 20 61 20 70 72 65 2D 65 78 69 73 74 69 6E 67 20 65 78 74
65 6E 73 69 6F 6E 20 64 69 72 65 63 74 6F 72 79 2E 0A 20 20 20 20 2D 50
2C 20 2D 2D 6F 6D 69 74 2D 70 6F 64 20 20 20 20 20 20 20 20 4F 6D 69 74
20 74 68 65 20 73 74 75 62 20 50 4F 44 20 73 65 63 74 69 6F 6E 2E 0A 20
20 20 20 2D 58 2C 20 2D 2D 6F 6D 69 74 2D 58 53 20 20 20 20 20 20 20 20
20 4F 6D 69 74 20 74 68 65 20 58 53 20 70 6F 72 74 69 6F 6E 20 28 69 6D
70 6C 69 65 73 20 62 6F 74 68 20 2D 63 20 61 6E 64 20 2D 66 29 2E 0A 20
20 20 20 2D 61 2C 20 2D 2D 67 65 6E 2D 61 63 63 65 73 73 6F 72 73 20 20
20 47 65 6E 65 72 61 74 65 20 67 65 74 2F 73 65 74 20 61 63 63 65 73 73
6F 72 73 20 66 6F 72 20 73 74 72 75 63 74 20 61 6E 64 20 75 6E 69 6F 6E
20 6D 65 6D 62 65 72 73 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 64 20 77 69 74 68 20 2D 78
29 2E 0A 20 20 20 20 2D 62 2C 20 2D 2D 63 6F 6D 70 61 74 2D 76 65 72 73
69 6F 6E 20 20 53 70 65 63 69 66 79 20 61 20 70 65 72 6C 20 76 65 72 73
69 6F 6E 20 74 6F 20 62 65 20 62 61 63 6B 77 61 72 64 73 20 63 6F 6D 70
61 74 69 62 69 6C 65 20 77 69 74 68 2E 0A 20 20 20 20 2D 63 2C 20 2D 2D
6F 6D 69 74 2D 63 6F 6E 73 74 61 6E 74 20 20 20 4F 6D 69 74 20 74 68 65
20 63 6F 6E 73 74 61 6E 74 28 29 20 66 75 6E 63 74 69 6F 6E 20 61 6E 64
20 73 70 65 63 69 61 6C 69 73 65 64 20 41 55 54 4F 4C 4F 41 44 0A 20 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
66 72 6F 6D 20 74 68 65 20 58 53 20 66 69 6C 65 2E 0A 20 20 20 20 2D 64
2C 20 2D 2D 64 65 62 75 67 67 69 6E 67 20 20 20 20 20 20 20 54 75 72 6E
20 6F 6E 20 64 65 62 75 67 67 69 6E 67 20 6D 65 73 73 61 67 65 73 2E 0A
20 20 20 20 2D 65 2C 20 2D 2D 6F 6D 69 74 2D 65 6E 75 6D 73 20 20 20 20
20 20 4F 6D 69 74 20 63 6F 6E 73 74 61 6E 74 73 20 66 72 6F 6D 20 65 6E
75 6D 73 20 69 6E 20 74 68 65 20 63 6F 6E 73 74 61 6E 74 28 29 20 66 75
6E 63 74 69 6F 6E 2E 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 49 66 20 61 20 70 61 74 74 65 72 6E 20 69
73 20 67 69 76 65 6E 2C 20 6F 6E 6C 79 20 74 68 65 20 6D 61 74 63 68 69
6E 67 20 65 6E 75 6D 73 20 61 72 65 0A 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 67 6E 6F 72 65 64 2E 0A
20 20 20 20 2D 66 2C 20 2D 2D 66 6F 72 63 65 20 20 20 20 20 20 20 20 20
20 20 46 6F 72 63 65 20 63 72 65 61 74 69 6F 6E 20 6F 66 20 74 68 65 20
65 78 74 65 6E 73 69 6F 6E 20 65 76 65 6E 20 69 66 20 74 68 65 20 43 20
68 65 61 64 65 72 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 64 6F 65 73 20 6E 6F 74 20 65 78 69 73 74 2E
0A 20 20 20 20 2D 67 2C 20 2D 2D 67 6C 6F 62 61 6C 20 20 20 20 20 20 20
20 20 20 49 6E 63 6C 75 64 65 20 63 6F 64 65 20 66 6F 72 20 73 61 66 65
6C 79 20 73 74 6F 72 69 6E 67 20 73 74 61 74 69 63 20 64 61 74 61 20 69
6E 20 74 68 65 20 2E 78 73 20 66 69 6C 65 2E 0A 20 20 20 20 2D 68 2C 20
2D 3F 2C 20 2D 2D 68 65 6C 70 20 20 20 20 20 20 20 20 44 69 73 70 6C 61
79 20 74 68 69 73 20 68 65 6C 70 20 6D 65 73 73 61 67 65 2E 0A 20 20 20
20 2D 6B 2C 20 2D 2D 6F 6D 69 74 2D 63 6F 6E 73 74 2D 66 75 6E 63 20 4F
6D 69 74 20 27 63 6F 6E 73 74 27 20 61 74 74 72 69 62 75 74 65 20 6F 6E
20 66 75 6E 63 74 69 6F 6E 20 61 72 67 75 6D 65 6E 74 73 0A 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75
73 65 64 20 77 69 74 68 20 2D 78 29 2E 0A 20 20 20 20 2D 6D 2C 20 2D 2D
67 65 6E 2D 74 69 65 64 2D 76 61 72 20 20 20 20 47 65 6E 65 72 61 74 65
20 74 69 65 64 20 76 61 72 69 61 62 6C 65 73 20 66 6F 72 20 61 63 63 65
73 73 20 74 6F 20 64 65 63 6C 61 72 65 64 0A 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 76 61 72 69 61 62 6C
65 73 2E 0A 20 20 20 20 2D 6E 2C 20 2D 2D 6E 61 6D 65 20 20 20 20 20 20
20 20 20 20 20 20 53 70 65 63 69 66 79 20 61 20 6E 61 6D 65 20 74 6F 20
75 73 65 20 66 6F 72 20 74 68 65 20 65 78 74 65 6E 73 69 6F 6E 20 28 72
65 63 6F 6D 6D 65 6E 64 65 64 29 2E 0A 20 20 20 20 2D 6F 2C 20 2D 2D 6F
70 61 71 75 65 2D 72 65 20 20 20 20 20 20 20 52 65 67 75 6C 61 72 20 65
78 70 72 65 73 73 69 6F 6E 20 66 6F 72 20 5C 22 6F 70 61 71 75 65 5C 22
20 74 79 70 65 73 2E 0A 20 20 20 20 2D 70 2C 20 2D 2D 72 65 6D 6F 76 65
2D 70 72 65 66 69 78 20 20 20 53 70 65 63 69 66 79 20 61 20 70 72 65 66
69 78 20 77 68 69 63 68 20 73 68 6F 75 6C 64 20 62 65 20 72 65 6D 6F 76
65 64 20 66 72 6F 6D 20 74 68 65 0A 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 65 72 6C 20 66 75 6E 63 74
69 6F 6E 20 6E 61 6D 65 73 2E 0A 20 20 20 20 2D 73 2C 20 2D 2D 63 6F 6E
73 74 2D 73 75 62 73 20 20 20 20 20 20 43 72 65 61 74 65 20 73 75 62 72
6F 75 74 69 6E 65 73 20 66 6F 72 20 73 70 65 63 69 66 69 65 64 20 6D 61
63 72 6F 73 2E 0A 20 20 20 20 2D 74 2C 20 2D 2D 64 65 66 61 75 6C 74 2D
74 79 70 65 20 20 20 20 44 65 66 61 75 6C 74 20 74 79 70 65 20 66 6F 72
20 61 75 74 6F 6C 6F 61 64 65 64 20 63 6F 6E 73 74 61 6E 74 73 20 28 64
65 66 61 75 6C 74 20 69 73 20 49 56 29 2E 0A 20 20 20 20 20 20 20 20 2D
2D 75 73 65 2D 6E 65 77 2D 74 65 73 74 73 20 20 20 55 73 65 20 54 65 73
74 3A 3A 4D 6F 72 65 20 69 6E 20 62 61 63 6B 77 61 72 64 20 63 6F 6D 70
61 74 69 62 6C 65 20 6D 6F 64 75 6C 65 73 2E 0A 20 20 20 20 20 20 20 20
2D 2D 75 73 65 2D 6F 6C 64 2D 74 65 73 74 73 20 20 20 55 73 65 20 74 68
65 20 6D 6F 64 75 6C 65 20 54 65 73 74 20 72 61 74 68 65 72 20 74 68 61
6E 20 54 65 73 74 3A 3A 4D 6F 72 65 2E 0A 20 20 20 20 20 20 20 20 2D 2D
73 6B 69 70 2D 65 78 70 6F 72 74 65 72 20 20 20 44 6F 20 6E 6F 74 20 65
78 70 6F 72 74 20 73 79 6D 62 6F 6C 73 2E 0A 20 20 20 20 20 20 20 20 2D
2D 73 6B 69 70 2D 70 70 70 6F 72 74 20 20 20 20 20 44 6F 20 6E 6F 74 20
75 73 65 20 70 6F 72 74 61 62 69 6C 69 74 79 20 6C 61 79 65 72 2E 0A 20
20 20 20 20 20 20 20 2D 2D 73 6B 69 70 2D 61 75 74 6F 6C 6F 61 64 65 72
20 44 6F 20 6E 6F 74 20 75 73 65 20 74 68 65 20 6D 6F 64 75 6C 65 20 43
3C 41 75 74 6F 4C 6F 61 64 65 72 3E 2E 0A 20 20 20 20 20 20 20 20 2D 2D
73 6B 69 70 2D 73 74 72 69 63 74 20 20 20 20 20 44 6F 20 6E 6F 74 20 75
73 65 20 74 68 65 20 70 72 61 67 6D 61 20 43 3C 73 74 72 69 63 74 3E 2E
0A 20 20 20 20 20 20 20 20 2D 2D 73 6B 69 70 2D 77 61 72 6E 69 6E 67 73
20 20 20 44 6F 20 6E 6F 74 20 75 73 65 20 74 68 65 20 70 72 61 67 6D 61
20 43 3C 77 61 72 6E 69 6E 67 73 3E 2E 0A 20 20 20 20 2D 76 2C 20 2D 2D
76 65 72 73 69 6F 6E 20 20 20 20 20 20 20 20 20 53 70 65 63 69 66 79 20
61 20 76 65 72 73 69 6F 6E 20 6E 75 6D 62 65 72 20 66 6F 72 20 74 68 69
73 20 65 78 74 65 6E 73 69 6F 6E 2E 0A 20 20 20 20 2D 78 2C 20 2D 2D 61
75 74 6F 67 65 6E 2D 78 73 75 62 73 20 20 20 41 75 74 6F 67 65 6E 65 72
61 74 65 20 58 53 55 42 73 20 75 73 69 6E 67 20 43 3A 3A 53 63 61 6E 2E
0A 20 20 20 20 20 20 20 20 2D 2D 75 73 65 2D 78 73 6C 6F 61 64 65 72 20
20 20 20 55 73 65 20 58 53 4C 6F 61 64 65 72 20 69 6E 20 62 61 63 6B 77
61 72 64 20 63 6F 6D 70 61 74 69 62 6C 65 20 6D 6F 64 75 6C 65 73 20 28
69 67 6E 6F 72 65 64 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 77 68 65 6E 20 75 73 65 64 20 77 69 74 68
20 2D 58 29 2E 0A 0A 65 78 74 72 61 5F 6C 69 62 72 61 72 69 65 73 0A 20
20 20 20 20 20 20 20 20 61 72 65 20 61 6E 79 20 6C 69 62 72 61 72 69 65
73 20 74 68 61 74 20 6D 69 67 68 74 20 62 65 20 6E 65 65 64 65 64 20 66
6F 72 20 6C 6F 61 64 69 6E 67 20 74 68 65 0A 20 20 20 20 20 20 20 20 20
65 78 74 65 6E 73 69 6F 6E 2C 20 65 2E 67 2E 20 2D 6C 6D 20 77 6F 75 6C
64 20 74 72 79 20 74 6F 20 6C 69 6E 6B 20 69 6E 20 74 68 65 20 6D 61 74
68 20 6C 69 62 72 61 72 79 2E 0A 45 4F 46 55 53 41 47 45 0A 7D 0A 0A 6D
79 20 28 24 6F 70 74 5F 41 2C 0A 20 20 20 20 24 6F 70 74 5F 42 2C 0A 20
20 20 20 24 6F 70 74 5F 43 2C 0A 20 20 20 20 24 6F 70 74 5F 46 2C 0A 20
20 20 20 24 6F 70 74 5F 4D 2C 0A 20 20 20 20 24 6F 70 74 5F 4F 2C 0A 20
20 20 20 24 6F 70 74 5F 50 2C 0A 20 20 20 20 24 6F 70 74 5F 58 2C 0A 20
20 20 20 24 6F 70 74 5F 61 2C 0A 20 20 20 20 24 6F 70 74 5F 63 2C 0A 20
20 20 20 24 6F 70 74 5F 64 2C 0A 20 20 20 20 24 6F 70 74 5F 65 2C 0A 20
20 20 20 24 6F 70 74 5F 66 2C 0A 20 20 20 20 24 6F 70 74 5F 67 2C 0A 20
20 20 20 24 6F 70 74 5F 68 2C 0A 20 20 20 20 24 6F 70 74 5F 6B 2C 0A 20
20 20 20 24 6F 70 74 5F 6D 2C 0A 20 20 20 20 24 6F 70 74 5F 6E 2C 0A 20
20 20 20 24 6F 70 74 5F 6F 2C 0A 20 20 20 20 24 6F 70 74 5F 70 2C 0A 20
20 20 20 24 6F 70 74 5F 73 2C 0A 20 20 20 20 24 6F 70 74 5F 76 2C 0A 20
20 20 20 24 6F 70 74 5F 78 2C 0A 20 20 20 20 24 6F 70 74 5F 62 2C 0A 20
20 20 20 24 6F 70 74 5F 74 2C 0A 20 20 20 20 24 6E 65 77 5F 74 65 73 74
2C 0A 20 20 20 20 24 6F 6C 64 5F 74 65 73 74 2C 0A 20 20 20 20 24 73 6B
69 70 5F 65 78 70 6F 72 74 65 72 2C 0A 20 20 20 20 24 73 6B 69 70 5F 70
70 70 6F 72 74 2C 0A 20 20 20 20 24 73 6B 69 70 5F 61 75 74 6F 6C 6F 61
64 65 72 2C 0A 20 20 20 20 24 73 6B 69 70 5F 73 74 72 69 63 74 2C 0A 20
20 20 20 24 73 6B 69 70 5F 77 61 72 6E 69 6E 67 73 2C 0A 20 20 20 20 24
75 73 65 5F 78 73 6C 6F 61 64 65 72 0A 20 20 20 29 3B 0A 0A 47 65 74 6F
70 74 3A 3A 4C 6F 6E 67 3A 3A 43 6F 6E 66 69 67 75 72 65 28 27 62 75 6E
64 6C 69 6E 67 27 29 3B 0A 47 65 74 6F 70 74 3A 3A 4C 6F 6E 67 3A 3A 43
6F 6E 66 69 67 75 72 65 28 27 70 61 73 73 5F 74 68 72 6F 75 67 68 27 29
3B 0A 0A 6D 79 20 25 6F 70 74 69 6F 6E 73 20 3D 20 28 0A 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 27 6F 6D 69 74 2D 61 75 74 6F 6C 6F 61
64 7C 41 27 20 20 20 20 3D 3E 20 5C 24 6F 70 74 5F 41 2C 0A 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 20 27 62 65 74 61 2D 76 65 72 73 69 6F
6E 7C 42 27 20 20 20 20 20 3D 3E 20 5C 24 6F 70 74 5F 42 2C 0A 20 20 20
20 20 20 20 20 20 20 20 20 20 20 20 20 27 6F 6D 69 74 2D 63 68 61 6E 67
65 73 7C 43 27 20 20 20 20 20 3D 3E 20 5C 24 6F 70 74 5F 43 2C 0A 20 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 63 70 70 2D 66 6C 61 67 73
7C 46 3D 73 27 20 20 20 20 20 20 3D 3E 20 5C 24 6F 70 74 5F 46 2C 0A 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 75 6E 63 2D 6D 61 73
6B 7C 4D 3D 73 27 20 20 20 20 20 20 3D 3E 20 5C 24 6F 70 74 5F 4D 2C 0A
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6F 76 65 72 77 72 69
74 65 5F 6F 6B 7C 4F 27 20 20 20 20 20 3D 3E 20 5C 24 6F 70 74 5F 4F 2C
0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6F 6D 69 74 2D 70
6F 64 7C 50 27 20 20 20 20 20 20 20 20 20 3D 3E 20 5C 24 6F 70 74 5F 50
2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6F 6D 69 74 2D
58 53 7C 58 27 20 20 20 20 20 20 20 20 20 20 3D 3E 20 5C 24 6F 70 74 5F
58 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 67 65 6E 2D
61 63 63 65 73 73 6F 72 73 7C 61 27 20 20 20 20 3D 3E 20 5C 24 6F 70 74
5F 61 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 63 6F 6D
70 61 74 2D 76 65 72 73 69 6F 6E 7C 62 3D 73 27 20 3D 3E 20 5C 24 6F 70
74 5F 62 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6F 6D
69 74 2D 63 6F 6E 73 74 61 6E 74 7C 63 27 20 20 20 20 3D 3E 20 5C 24 6F
70 74 5F 63 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 64
65 62 75 67 67 69 6E 67 7C 64 27 20 20 20 20 20 20 20 20 3D 3E 20 5C 24
6F 70 74 5F 64 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27
6F 6D 69 74 2D 65 6E 75 6D 73 7C 65 3A 73 27 20 20 20 20 20 3D 3E 20 5C
24 6F 70 74 5F 65 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
27 66 6F 72 63 65 7C 66 27 20 20 20 20 20 20 20 20 20 20 20 20 3D 3E 20
5C 24 6F 70 74 5F 66 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
20 27 67 6C 6F 62 61 6C 7C 67 27 20 20 20 20 20 20 20 20 20 20 20 3D 3E
20 5C 24 6F 70 74 5F 67 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 27 68 65 6C 70 7C 68 7C 3F 27 20 20 20 20 20 20 20 20 20 20 20 3D
3E 20 5C 24 6F 70 74 5F 68 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 27 6F 6D 69 74 2D 63 6F 6E 73 74 2D 66 75 6E 63 7C 6B 27 20 20
3D 3E 20 5C 24 6F 70 74 5F 6B 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 27 67 65 6E 2D 74 69 65 64 2D 76 61 72 7C 6D 27 20 20 20 20
20 3D 3E 20 5C 24 6F 70 74 5F 6D 2C 0A 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 27 6E 61 6D 65 7C 6E 3D 73 27 20 20 20 20 20 20 20 20 20
20 20 3D 3E 20 5C 24 6F 70 74 5F 6E 2C 0A 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 27 6F 70 61 71 75 65 2D 72 65 7C 6F 3D 73 27 20 20 20
20 20 20 3D 3E 20 5C 24 6F 70 74 5F 6F 2C 0A 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 27 72 65 6D 6F 76 65 2D 70 72 65 66 69 78 7C 70 3D
73 27 20 20 3D 3E 20 5C 24 6F 70 74 5F 70 2C 0A 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 27 63 6F 6E 73 74 2D 73 75 62 73 7C 73 3D 73 27
20 20 20 20 20 3D 3E 20 5C 24 6F 70 74 5F 73 2C 0A 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 27 64 65 66 61 75 6C 74 2D 74 79 70 65 7C 74
3D 73 27 20 20 20 3D 3E 20 5C 24 6F 70 74 5F 74 2C 0A 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 27 76 65 72 73 69 6F 6E 7C 76 3D 73 27 20
20 20 20 20 20 20 20 3D 3E 20 5C 24 6F 70 74 5F 76 2C 0A 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 27 61 75 74 6F 67 65 6E 2D 78 73 75 62
73 7C 78 27 20 20 20 20 3D 3E 20 5C 24 6F 70 74 5F 78 2C 0A 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 20 27 75 73 65 2D 6E 65 77 2D 74 65 73
74 73 27 20 20 20 20 20 20 3D 3E 20 5C 24 6E 65 77 5F 74 65 73 74 2C 0A
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 75 73 65 2D 6F 6C 64
2D 74 65 73 74 73 27 20 20 20 20 20 20 3D 3E 20 5C 24 6F 6C 64 5F 74 65
73 74 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 73 6B 69
70 2D 65 78 70 6F 72 74 65 72 27 20 20 20 20 20 20 3D 3E 20 5C 24 73 6B
69 70 5F 65 78 70 6F 72 74 65 72 2C 0A 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 27 73 6B 69 70 2D 70 70 70 6F 72 74 27 20 20 20 20 20 20
20 20 3D 3E 20 5C 24 73 6B 69 70 5F 70 70 70 6F 72 74 2C 0A 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 20 27 73 6B 69 70 2D 61 75 74 6F 6C 6F
61 64 65 72 27 20 20 20 20 3D 3E 20 5C 24 73 6B 69 70 5F 61 75 74 6F 6C
6F 61 64 65 72 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27
73 6B 69 70 2D 77 61 72 6E 69 6E 67 73 27 20 20 20 20 20 20 3D 3E 20 5C
24 73 6B 69 70 5F 77 61 72 6E 69 6E 67 73 2C 0A 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 27 73 6B 69 70 2D 73 74 72 69 63 74 27 20 20 20
20 20 20 20 20 3D 3E 20 5C 24 73 6B 69 70 5F 73 74 72 69 63 74 2C 0A 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 75 73 65 2D 78 73 6C 6F
61 64 65 72 27 20 20 20 20 20 20 20 3D 3E 20 5C 24 75 73 65 5F 78 73 6C
6F 61 64 65 72 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 3B 0A
0A 47 65 74 4F 70 74 69 6F 6E 73 28 25 6F 70 74 69 6F 6E 73 29 20 7C 7C
20 75 73 61 67 65 3B 0A 0A 75 73 61 67 65 20 69 66 20 24 6F 70 74 5F 68
3B 0A 0A 69 66 28 20 24 6F 70 74 5F 62 20 29 7B 0A 20 20 20 20 75 73 61
67 65 20 22 59 6F 75 20 63 61 6E 6E 6F 74 20 75 73 65 20 2D 62 20 61 6E
64 20 2D 6D 20 61 74 20 74 68 65 20 73 61 6D 65 20 74 69 6D 65 2E 5C 6E
22 20 69 66 20 28 24 6F 70 74 5F 62 20 26 26 20 24 6F 70 74 5F 6D 29 3B
0A 20 20 20 20 24 6F 70 74 5F 62 20 3D 7E 20 2F 5E 5C 64 2B 5C 2E 5C 64
2B 5C 2E 5C 64 2B 2F 20 7C 7C 0A 20 20 20 20 75 73 61 67 65 20 22 59 6F
75 20 6D 75 73 74 20 70 72 6F 76 69 64 65 20 74 68 65 20 62 61 63 6B 77
61 72 64 73 20 63 6F 6D 70 61 74 69 62 69 6C 69 74 79 20 76 65 72 73 69
6F 6E 20 69 6E 20 58 2E 59 2E 5A 20 66 6F 72 6D 2E 20 22 0A 20 20 20 20
20 20 20 20 20 20 2E 20 20 22 28 69 2E 65 2E 20 35 2E 35 2E 30 29 5C 6E
22 3B 0A 20 20 20 20 6D 79 20 28 24 6D 61 6A 2C 24 6D 69 6E 2C 24 73 75
62 29 20 3D 20 73 70 6C 69 74 28 2F 5C 2E 2F 2C 24 6F 70 74 5F 62 2C 33
29 3B 0A 20 20 20 20 69 66 20 28 24 6D 61 6A 20 3C 20 35 20 7C 7C 20 28
24 6D 61 6A 20 3D 3D 20 35 20 26 26 20 24 6D 69 6E 20 3C 20 36 29 29 20
7B 0A 20 20 20 20 20 20 20 20 24 63 6F 6D 70 61 74 5F 76 65 72 73 69 6F
6E 20 3D 0A 09 20 20 20 20 24 73 75 62 20 3F 20 73 70 72 69 6E 74 66 28
22 25 64 2E 25 30 33 64 25 30 32 64 22 2C 24 6D 61 6A 2C 24 6D 69 6E 2C
24 73 75 62 29 20 3A 0A 09 20 20 20 20 20 20 20 20 20 20 20 73 70 72 69
6E 74 66 28 22 25 64 2E 25 30 33 64 22 2C 20 20 20 20 24 6D 61 6A 2C 24
6D 69 6E 29 3B 0A 20 20 20 20 7D 20 65 6C 73 65 20 7B 0A 20 20 20 20 20
20 20 20 24 63 6F 6D 70 61 74 5F 76 65 72 73 69 6F 6E 20 3D 0A 09 20 20
20 20 24 73 75 62 20 3F 20 73 70 72 69 6E 74 66 28 22 25 64 2E 25 30 33
64 25 30 33 64 22 2C 24 6D 61 6A 2C 24 6D 69 6E 2C 24 73 75 62 29 20 3A
0A 09 09 20 20 20 73 70 72 69 6E 74 66 28 22 25 64 2E 25 30 33 64 22 2C
20 20 20 20 24 6D 61 6A 2C 24 6D 69 6E 29 3B 0A 20 20 20 20 7D 0A 7D 20
65 6C 73 65 20 7B 0A 20 20 20 20 6D 79 20 28 24 6D 61 6A 2C 24 6D 69 6E
2C 24 73 75 62 29 20 3D 20 24 63 6F 6D 70 61 74 5F 76 65 72 73 69 6F 6E
20 3D 7E 20 2F 28 5C 64 2B 29 5C 2E 28 5C 64 5C 64 5C 64 29 28 5C 64 2A
29 2F 3B 0A 20 20 20 20 24 73 75 62 20 7C 7C 3D 20 30 3B 0A 20 20 20 20
77 61 72 6E 20 73 70 72 69 6E 74 66 20 3C 3C 27 45 4F 46 27 2C 20 24 6D
61 6A 2C 24 6D 69 6E 2C 24 73 75 62 3B 0A 44 65 66 61 75 6C 74 69 6E 67
20 74 6F 20 62 61 63 6B 77 61 72 64 73 20 63 6F 6D 70 61 74 69 62 69 6C
69 74 79 20 77 69 74 68 20 70 65 72 6C 20 25 64 2E 25 64 2E 25 64 0A 49
66 20 79 6F 75 20 69 6E 74 65 6E 64 20 74 68 69 73 20 6D 6F 64 75 6C 65
20 74 6F 20 62 65 20 63 6F 6D 70 61 74 69 62 6C 65 20 77 69 74 68 20 65
61 72 6C 69 65 72 20 70 65 72 6C 20 76 65 72 73 69 6F 6E 73 2C 20 70 6C
65 61 73 65 0A 73 70 65 63 69 66 79 20 61 20 6D 69 6E 69 6D 75 6D 20 70
65 72 6C 20 76 65 72 73 69 6F 6E 20 77 69 74 68 20 74 68 65 20 2D 62 20
6F 70 74 69 6F 6E 2E 0A 0A 45 4F 46 0A 7D 0A 0A 69 66 28 20 24 6F 70 74
5F 42 20 29 7B 0A 20 20 20 20 24 54 45 4D 50 4C 41 54 45 5F 56 45 52 53
49 4F 4E 20 3D 20 27 30 2E 30 30 5F 30 31 27 3B 0A 7D 0A 0A 69 66 28 20
24 6F 70 74 5F 76 20 29 7B 0A 09 24 54 45 4D 50 4C 41 54 45 5F 56 45 52
53 49 4F 4E 20 3D 20 24 6F 70 74 5F 76 3B 0A 0A 20 20 20 20 23 20 63 68
65 63 6B 20 69 66 20 69 74 20 69 73 20 6E 75 6D 65 72 69 63 0A 20 20 20
20 6D 79 20 24 74 65 6D 70 5F 76 65 72 73 69 6F 6E 20 3D 20 24 54 45 4D
50 4C 41 54 45 5F 56 45 52 53 49 4F 4E 3B 0A 20 20 20 20 6D 79 20 24 62
65 74 61 5F 76 65 72 73 69 6F 6E 20 3D 20 24 74 65 6D 70 5F 76 65 72 73
69 6F 6E 20 3D 7E 20 73 2F 28 5C 64 29 5F 28 5C 64 5C 64 29 2F 24 31 24
32 2F 3B 0A 20 20 20 20 6D 79 20 24 6E 6F 74 6E 75 6D 3B 0A 20 20 20 20
7B 0A 20 20 20 20 20 20 20 20 6C 6F 63 61 6C 20 24 53 49 47 7B 5F 5F 57
41 52 4E 5F 5F 7D 20 3D 20 73 75 62 20 7B 20 24 6E 6F 74 6E 75 6D 20 3D
20 31 20 7D 3B 0A 20 20 20 20 20 20 20 20 75 73 65 20 77 61 72 6E 69 6E
67 73 20 27 6E 75 6D 65 72 69 63 27 3B 0A 20 20 20 20 20 20 20 20 24 74
65 6D 70 5F 76 65 72 73 69 6F 6E 20 3D 20 30 2B 24 74 65 6D 70 5F 76 65
72 73 69 6F 6E 3B 0A 20 20 20 20 7D 0A 0A 20 20 20 20 69 66 20 28 24 6E
6F 74 6E 75 6D 29 20 7B 0A 20 20 20 20 20 20 20 20 6D 79 20 24 6D 6F 64
75 6C 65 20 3D 20 24 6F 70 74 5F 6E 20 7C 7C 20 27 59 6F 75 72 3A 3A 4D
6F 64 75 6C 65 27 3B 0A 20 20 20 20 20 20 20 20 77 61 72 6E 20 3C 3C 22
45 4F 46 22 3B 0A 59 6F 75 20 68 61 76 65 20 73 70 65 63 69 66 69 65 64
20 61 20 6E 6F 6E 2D 6E 75 6D 65 72 69 63 20 76 65 72 73 69 6F 6E 2E 20
20 55 6E 6C 65 73 73 20 79 6F 75 20 73 75 70 70 6C 79 20 61 6E 0A 61 70
70 72 6F 70 72 69 61 74 65 20 56 45 52 53 49 4F 4E 20 63 6C 61 73 73 20
6D 65 74 68 6F 64 2C 20 75 73 65 72 73 20 6D 61 79 20 6E 6F 74 20 62 65
20 61 62 6C 65 20 74 6F 20 73 70 65 63 69 66 79 20 61 0A 6D 69 6E 69 6D
75 6D 20 72 65 71 75 69 72 65 64 20 76 65 72 73 69 6F 6E 20 77 69 74 68
20 43 3C 75 73 65 20 24 6D 6F 64 75 6C 65 20 76 65 72 73 69 6F 6E 6E 75
6D 3E 2E 0A 0A 45 4F 46 0A 20 20 20 20 7D 0A 20 20 20 20 65 6C 73 65 20
7B 0A 20 20 20 20 20 20 20 20 24 6F 70 74 5F 42 20 3D 20 24 62 65 74 61
5F 76 65 72 73 69 6F 6E 3B 0A 20 20 20 20 7D 0A 7D 0A 0A 23 20 2D 41 20
69 6D 70 6C 69 65 73 20 2D 63 2E 0A 24 73 6B 69 70 5F 61 75 74 6F 6C 6F
61 64 65 72 20 3D 20 24 6F 70 74 5F 63 20 3D 20 31 20 69 66 20 24 6F 70
74 5F 41 3B 0A 0A 23 20 2D 58 20 69 6D 70 6C 69 65 73 20 2D 63 20 61 6E
64 20 2D 66 0A 24 6F 70 74 5F 63 20 3D 20 24 6F 70 74 5F 66 20 3D 20 31
20 69 66 20 24 6F 70 74 5F 58 3B 0A 0A 24 6F 70 74 5F 74 20 7C 7C 3D 20
27 49 56 27 3B 0A 0A 6D 79 20 25 63 6F 6E 73 74 5F 78 73 75 62 3B 0A 25
63 6F 6E 73 74 5F 78 73 75 62 20 3D 20 6D 61 70 20 7B 20 24 5F 2C 31 20
7D 20 73 70 6C 69 74 28 2F 2C 2B 2F 2C 20 24 6F 70 74 5F 73 29 20 69 66
20 24 6F 70 74 5F 73 3B 0A 0A 6D 79 20 24 65 78 74 72 61 6C 69 62 73 20
3D 20 27 27 3B 0A 0A 6D 79 20 40 70 61 74 68 5F 68 3B 0A 0A 77 68 69 6C
65 20 28 6D 79 20 24 61 72 67 20 3D 20 73 68 69 66 74 29 20 7B 0A 20 20
20 20 69 66 20 28 24 61 72 67 20 3D 7E 20 2F 5E 2D 6C 2F 69 29 20 7B 0A
20 20 20 20 20 20 20 20 24 65 78 74 72 61 6C 69 62 73 20 2E 3D 20 22 24
61 72 67 20 22 3B 0A 20 20 20 20 20 20 20 20 6E 65 78 74 3B 0A 20 20 20
20 7D 0A 20 20 20 20 6C 61 73 74 20 69 66 20 24 65 78 74 72 61 6C 69 62
73 3B 0A 20 20 20 20 70 75 73 68 28 40 70 61 74 68 5F 68 2C 20 24 61 72
67 29 3B 0A 7D 0A 0A 75 73 61 67 65 20 22 4D 75 73 74 20 73 75 70 70 6C
79 20 68 65 61 64 65 72 20 66 69 6C 65 20 6F 72 20 6D 6F 64 75 6C 65 20
6E 61 6D 65 5C 6E 22 0A 20 20 20 20 20 20 20 20 75 6E 6C 65 73 73 20 28
40 70 61 74 68 5F 68 20 6F 72 20 24 6F 70 74 5F 6E 29 3B 0A 0A 6D 79 20
24 66 6D 61 73 6B 3B 0A 6D 79 20 24 74 6D 61 73 6B 3B 0A 0A 24 66 6D 61
73 6B 20 3D 20 71 72 7B 24 6F 70 74 5F 4D 7D 20 69 66 20 64 65 66 69 6E
65 64 20 24 6F 70 74 5F 4D 3B 0A 24 74 6D 61 73 6B 20 3D 20 71 72 7B 24
6F 70 74 5F 6F 7D 20 69 66 20 64 65 66 69 6E 65 64 20 24 6F 70 74 5F 6F
3B 0A 6D 79 20 24 74 6D 61 73 6B 5F 61 6C 6C 20 3D 20 24 74 6D 61 73 6B
20 26 26 20 24 6F 70 74 5F 6F 20 65 71 20 27 2E 27 3B 0A 0A 69 66 20 28
24 6F 70 74 5F 78 29 20 7B 0A 20 20 65 76 61 6C 20 7B 72 65 71 75 69 72
65 20 43 3A 3A 53 63 61 6E 3B 20 31 7D 0A 20 20 20 20 6F 72 20 64 69 65
20 3C 3C 45 4F 44 3B 0A 43 3A 3A 53 63 61 6E 20 72 65 71 75 69 72 65 64
20 69 66 20 79 6F 75 20 75 73 65 20 2D 78 20 6F 70 74 69 6F 6E 2E 0A 54
6F 20 69 6E 73 74 61 6C 6C 20 43 3A 3A 53 63 61 6E 2C 20 65 78 65 63 75
74 65 0A 20 20 20 70 65 72 6C 20 2D 4D 43 50 41 4E 20 2D 65 20 22 69 6E
73 74 61 6C 6C 20 43 3A 3A 53 63 61 6E 22 0A 45 4F 44 0A 20 20 75 6E 6C
65 73 73 20 28 24 74 6D 61 73 6B 5F 61 6C 6C 29 20 7B 0A 20 20 20 20 24
43 3A 3A 53 63 61 6E 3A 3A 56 45 52 53 49 4F 4E 20 3E 3D 20 30 2E 37 30
0A 20 20 20 20 20 20 6F 72 20 64 69 65 20 3C 3C 45 4F 44 3B 0A 43 3A 3A
53 63 61 6E 20 76 2E 20 30 2E 37 30 20 6F 72 20 6C 61 74 65 72 20 72 65
71 75 69 72 65 64 20 75 6E 6C 65 73 73 20 79 6F 75 20 75 73 65 20 2D 6F
20 2E 20 6F 70 74 69 6F 6E 2E 0A 59 6F 75 20 68 61 76 65 20 76 65 72 73
69 6F 6E 20 24 43 3A 3A 53 63 61 6E 3A 3A 56 45 52 53 49 4F 4E 20 69 6E
73 74 61 6C 6C 65 64 20 61 73 20 24 49 4E 43 7B 27 43 2F 53 63 61 6E 2E
70 6D 27 7D 2E 0A 54 6F 20 69 6E 73 74 61 6C 6C 20 43 3A 3A 53 63 61 6E
2C 20 65 78 65 63 75 74 65 0A 20 20 20 70 65 72 6C 20 2D 4D 43 50 41 4E
20 2D 65 20 22 69 6E 73 74 61 6C 6C 20 43 3A 3A 53 63 61 6E 22 0A 45 4F
44 0A 20 20 7D 0A 20 20 69 66 20 28 28 24 6F 70 74 5F 6D 20 7C 7C 20 24
6F 70 74 5F 61 29 20 26 26 20 24 43 3A 3A 53 63 61 6E 3A 3A 56 45 52 53
49 4F 4E 20 3C 20 30 2E 37 33 29 20 7B 0A 20 20 20 20 64 69 65 20 3C 3C
45 4F 44 3B 0A 43 3A 3A 53 63 61 6E 20 76 2E 20 30 2E 37 33 20 6F 72 20
6C 61 74 65 72 20 72 65 71 75 69 72 65 64 20 74 6F 20 75 73 65 20 2D 6D
20 6F 72 20 2D 61 20 6F 70 74 69 6F 6E 73 2E 0A 59 6F 75 20 68 61 76 65
20 76 65 72 73 69 6F 6E 20 24 43 3A 3A 53 63 61 6E 3A 3A 56 45 52 53 49
4F 4E 20 69 6E 73 74 61 6C 6C 65 64 20 61 73 20 24 49 4E 43 7B 27 43 2F
53 63 61 6E 2E 70 6D 27 7D 2E 0A 54 6F 20 69 6E 73 74 61 6C 6C 20 43 3A
3A 53 63 61 6E 2C 20 65 78 65 63 75 74 65 0A 20 20 20 70 65 72 6C 20 2D
4D 43 50 41 4E 20 2D 65 20 22 69 6E 73 74 61 6C 6C 20 43 3A 3A 53 63 61
6E 22 0A 45 4F 44 0A 20 20 7D 0A 7D 0A 65 6C 73 69 66 20 28 24 6F 70 74
5F 6F 20 6F 72 20 24 6F 70 74 5F 46 29 20 7B 0A 20 20 77 61 72 6E 20 3C
3C 45 4F 44 20 69 66 20 24 6F 70 74 5F 6F 3B 0A 4F 70 74 69 6F 6E 20 2D
6F 20 64 6F 65 73 20 6E 6F 74 20 6D 61 6B 65 20 73 65 6E 73 65 20 77 69
74 68 6F 75 74 20 2D 78 2E 0A 45 4F 44 0A 20 20 77 61 72 6E 20 3C 3C 45
4F 44 20 69 66 20 24 6F 70 74 5F 46 20 61 6E 64 20 24 6F 70 74 5F 58 20
3B 0A 4F 70 74 69 6F 6E 20 2D 46 20 64 6F 65 73 20 6E 6F 74 20 6D 61 6B
65 20 73 65 6E 73 65 20 77 69 74 68 20 2D 58 2E 0A 45 4F 44 0A 7D 0A 0A
6D 79 20 40 70 61 74 68 5F 68 5F 69 6E 69 20 3D 20 40 70 61 74 68 5F 68
3B 0A 6D 79 20 28 24 6E 61 6D 65 2C 20 25 66 75 6C 6C 70 61 74 68 2C 20
25 70 72 65 66 69 78 2C 20 25 73 65 65 6E 5F 64 65 66 69 6E 65 2C 20 25
70 72 65 66 69 78 6C 65 73 73 2C 20 25 63 6F 6E 73 74 5F 6E 61 6D 65 73
29 3B 0A 0A 6D 79 20 24 6D 6F 64 75 6C 65 20 3D 20 24 6F 70 74 5F 6E 3B
0A 0A 69 66 28 20 40 70 61 74 68 5F 68 20 29 7B 0A 20 20 20 20 75 73 65
20 46 69 6C 65 3A 3A 53 70 65 63 3B 0A 20 20 20 20 6D 79 20 40 70 61 74
68 73 3B 0A 20 20 20 20 6D 79 20 24 70 72 65 5F 73 75 62 5F 74 72 69 5F
67 72 61 70 68 73 20 3D 20 31 3B 0A 20 20 20 20 69 66 20 28 24 5E 4F 20
65 71 20 27 56 4D 53 27 29 20 7B 20 20 23 20 43 6F 6E 73 69 64 65 72 20
6F 76 65 72 72 69 64 65 73 20 6F 66 20 64 65 66 61 75 6C 74 20 6C 6F 63
61 74 69 6F 6E 0A 20 20 20 20 20 20 23 20 58 58 58 58 20 54 68 69 73 20
69 73 20 6E 6F 74 20 65 71 75 69 76 61 6C 65 6E 74 20 74 6F 20 77 68 61
74 20 74 68 65 20 6F 6C 64 65 72 20 76 65 72 73 69 6F 6E 20 64 69 64 3A
0A 20 20 20 20 20 20 23 09 09 69 74 20 77 61 73 20 6C 6F 6F 6B 69 6E 67
20 61 74 20 24 68 61 64 73 79 73 20 68 65 61 64 65 72 2D 66 69 6C 65 20
70 65 72 20 68 65 61 64 65 72 2D 66 69 6C 65 2E 2E 2E 0A 20 20 20 20 20
20 6D 79 28 24 68 61 64 73 79 73 29 20 3D 20 67 72 65 70 20 73 21 5E 73
79 73 2F 21 21 69 20 2C 20 40 70 61 74 68 5F 68 3B 0A 20 20 20 20 20 20
40 70 61 74 68 73 20 3D 20 71 77 28 20 53 79 73 24 4C 69 62 72 61 72 79
20 56 41 58 43 24 49 6E 63 6C 75 64 65 20 29 3B 0A 20 20 20 20 20 20 70
75 73 68 20 40 70 61 74 68 73 2C 20 28 24 68 61 64 73 79 73 20 3F 20 27
47 4E 55 5F 43 43 5F 49 6E 63 6C 75 64 65 5B 76 6D 73 5D 27 20 3A 20 27
47 4E 55 5F 43 43 5F 49 6E 63 6C 75 64 65 5B 30 30 30 30 30 30 5D 27 29
3B 0A 20 20 20 20 20 20 70 75 73 68 20 40 70 61 74 68 73 2C 20 71 77 28
20 44 45 43 43 24 4C 69 62 72 61 72 79 5F 49 6E 63 6C 75 64 65 20 44 45
43 43 24 53 79 73 74 65 6D 5F 49 6E 63 6C 75 64 65 20 29 3B 0A 20 20 20
20 7D 0A 20 20 20 20 65 6C 73 65 20 7B 0A 20 20 20 20 20 20 40 70 61 74
68 73 20 3D 20 28 46 69 6C 65 3A 3A 53 70 65 63 2D 3E 63 75 72 64 69 72
28 29 2C 20 24 43 6F 6E 66 69 67 7B 75 73 72 69 6E 63 7D 2C 0A 09 09 28
73 70 6C 69 74 20 27 20 27 2C 20 24 43 6F 6E 66 69 67 7B 6C 6F 63 69 6E
63 70 74 68 7D 29 2C 20 27 2F 75 73 72 2F 69 6E 63 6C 75 64 65 27 29 3B
0A 20 20 20 20 7D 0A 20 20 20 20 66 6F 72 65 61 63 68 20 6D 79 20 24 70
61 74 68 5F 68 20 28 40 70 61 74 68 5F 68 29 20 7B 0A 20 20 20 20 20 20
20 20 24 6E 61 6D 65 20 7C 7C 3D 20 24 70 61 74 68 5F 68 3B 0A 20 20 20
20 24 6D 6F 64 75 6C 65 20 7C 7C 3D 20 64 6F 20 7B 0A 20 20 20 20 20 20
24 6E 61 6D 65 20 3D 7E 20 73 2F 5C 2E 68 24 2F 2F 3B 0A 20 20 20 20 20
20 69 66 20 28 20 24 6E 61 6D 65 20 21 7E 20 2F 3A 3A 2F 20 29 20 7B 0A
09 24 6E 61 6D 65 20 3D 7E 20 73 23 5E 2E 2A 2F 23 23 3B 0A 09 24 6E 61
6D 65 20 3D 20 22 5C 75 24 6E 61 6D 65 22 3B 0A 20 20 20 20 20 20 7D 0A
20 20 20 20 20 20 24 6E 61 6D 65 3B 0A 20 20 20 20 7D 3B 0A 0A 20 20 20
20 69 66 28 20 24 70 61 74 68 5F 68 20 3D 7E 20 73 23 3A 3A 23 2F 23 67
20 26 26 20 24 6F 70 74 5F 6E 20 29 7B 0A 09 77 61 72 6E 20 22 4E 65 73
74 69 6E 67 20 6F 66 20 68 65 61 64 65 72 66 69 6C 65 20 69 67 6E 6F 72
65 64 20 77 69 74 68 20 2D 6E 5C 6E 22 3B 0A 20 20 20 20 7D 0A 20 20 20
20 24 70 61 74 68 5F 68 20 2E 3D 20 22 2E 68 22 20 75 6E 6C 65 73 73 20
24 70 61 74 68 5F 68 20 3D 7E 20 2F 5C 2E 68 24 2F 3B 0A 20 20 20 20 6D
79 20 24 66 75 6C 6C 70 61 74 68 20 3D 20 24 70 61 74 68 5F 68 3B 0A 20
20 20 20 24 70 61 74 68 5F 68 20 3D 7E 20 73 2F 2C 2E 2A 24 2F 2F 20 69
66 20 24 6F 70 74 5F 78 3B 0A 20 20 20 20 24 66 75 6C 6C 70 61 74 68 7B
24 70 61 74 68 5F 68 7D 20 3D 20 24 66 75 6C 6C 70 61 74 68 3B 0A 0A 20
20 20 20 23 20 4D 69 6E 6F 72 20 74 72 69 63 6B 65 72 79 3A 20 77 65 20
63 61 6E 27 74 20 63 68 64 69 72 28 29 20 62 65 66 6F 72 65 20 77 65 20
70 72 6F 63 65 73 73 65 64 20 74 68 65 20 68 65 61 64 65 72 73 0A 20 20
20 20 23 20 28 73 6F 20 6B 6E 6F 77 20 74 68 65 20 6E 61 6D 65 20 6F 66
20 74 68 65 20 65 78 74 65 6E 73 69 6F 6E 29 2C 20 62 75 74 20 74 68 65
20 68 65 61 64 65 72 20 6D 61 79 20 62 65 20 69 6E 20 74 68 65 0A 20 20
20 20 23 20 65 78 74 65 6E 73 69 6F 6E 20 64 69 72 65 63 74 6F 72 79 2E
2E 2E 0A 20 20 20 20 6D 79 20 24 74 6D 70 5F 70 61 74 68 5F 68 20 3D 20
24 70 61 74 68 5F 68 3B 0A 20 20 20 20 6D 79 20 24 72 65 6C 5F 70 61 74
68 5F 68 20 3D 20 24 70 61 74 68 5F 68 3B 0A 20 20 20 20 6D 79 20 40 64
69 72 73 20 3D 20 40 70 61 74 68 73 3B 0A 20 20 20 20 69 66 20 28 6E 6F
74 20 2D 66 20 24 70 61 74 68 5F 68 29 20 7B 0A 20 20 20 20 20 20 6D 79
20 24 66 6F 75 6E 64 3B 0A 20 20 20 20 20 20 66 6F 72 20 6D 79 20 24 64
69 72 20 28 40 70 61 74 68 73 29 20 7B 0A 09 24 66 6F 75 6E 64 2B 2B 2C
20 6C 61 73 74 0A 09 20 20 69 66 20 2D 66 20 28 24 70 61 74 68 5F 68 20
3D 20 46 69 6C 65 3A 3A 53 70 65 63 2D 3E 63 61 74 66 69 6C 65 28 24 64
69 72 2C 20 24 74 6D 70 5F 70 61 74 68 5F 68 29 29 3B 0A 20 20 20 20 20
20 7D 0A 20 20 20 20 20 20 69 66 20 28 24 66 6F 75 6E 64 29 20 7B 0A 09
24 72 65 6C 5F 70 61 74 68 5F 68 20 3D 20 24 70 61 74 68 5F 68 3B 0A 09
24 66 75 6C 6C 70 61 74 68 7B 24 70 61 74 68 5F 68 7D 20 3D 20 24 66 75
6C 6C 70 61 74 68 3B 0A 20 20 20 20 20 20 7D 20 65 6C 73 65 20 7B 0A 09
28 6D 79 20 24 65 70 61 74 68 20 3D 20 24 6D 6F 64 75 6C 65 29 20 3D 7E
20 73 2C 3A 3A 2C 2F 2C 67 3B 0A 09 24 65 70 61 74 68 20 3D 20 46 69 6C
65 3A 3A 53 70 65 63 2D 3E 63 61 74 64 69 72 28 27 65 78 74 27 2C 20 24
65 70 61 74 68 29 20 69 66 20 2D 64 20 27 65 78 74 27 3B 0A 09 24 72 65
6C 5F 70 61 74 68 5F 68 20 3D 20 46 69 6C 65 3A 3A 53 70 65 63 2D 3E 63
61 74 66 69 6C 65 28 24 65 70 61 74 68 2C 20 24 74 6D 70 5F 70 61 74 68
5F 68 29 3B 0A 09 24 70 61 74 68 5F 68 20 3D 20 24 74 6D 70 5F 70 61 74
68 5F 68 3B 09 23 20 55 73 65 64 20 64 75 72 69 6E 67 20 2D 78 0A 09 70
75 73 68 20 40 64 69 72 73 2C 20 24 65 70 61 74 68 3B 0A 20 20 20 20 20
20 7D 0A 20 20 20 20 7D 0A 0A 20 20 20 20 69 66 20 28 21 24 6F 70 74 5F
63 29 20 7B 0A 20 20 20 20 20 20 64 69 65 20 22 43 61 6E 27 74 20 66 69
6E 64 20 24 74 6D 70 5F 70 61 74 68 5F 68 20 69 6E 20 40 64 69 72 73 5C
6E 22 0A 09 69 66 20 28 20 21 20 24 6F 70 74 5F 66 20 26 26 20 21 20 2D
66 20 22 24 72 65 6C 5F 70 61 74 68 5F 68 22 20 29 3B 0A 20 20 20 20 20
20 23 20 53 63 61 6E 20 74 68 65 20 68 65 61 64 65 72 20 66 69 6C 65 20
28 77 65 20 73 68 6F 75 6C 64 20 64 65 61 6C 20 77 69 74 68 20 6E 65 73
74 65 64 20 68 65 61 64 65 72 20 66 69 6C 65 73 29 0A 20 20 20 20 20 20
23 20 52 65 63 6F 72 64 20 74 68 65 20 6E 61 6D 65 73 20 6F 66 20 73 69
6D 70 6C 65 20 23 64 65 66 69 6E 65 20 63 6F 6E 73 74 61 6E 74 73 20 69
6E 74 6F 20 63 6F 6E 73 74 5F 6E 61 6D 65 73 0A 20 20 20 20 20 20 20 20
20 20 20 20 23 20 46 75 6E 63 74 69 6F 6E 20 70 72 6F 74 6F 74 79 70 65
73 20 61 72 65 20 70 72 6F 63 65 73 73 65 64 20 62 65 6C 6F 77 2E 0A 20
20 20 20 20 20 6F 70 65 6E 28 43 48 2C 20 22 3C 24 72 65 6C 5F 70 61 74
68 5F 68 22 29 20 7C 7C 20 64 69 65 20 22 43 61 6E 27 74 20 6F 70 65 6E
20 24 72 65 6C 5F 70 61 74 68 5F 68 3A 20 24 21 5C 6E 22 3B 0A 20 20 20
20 64 65 66 69 6E 65 73 3A 0A 20 20 20 20 20 20 77 68 69 6C 65 20 28 3C
43 48 3E 29 20 7B 0A 09 69 66 20 28 24 70 72 65 5F 73 75 62 5F 74 72 69
5F 67 72 61 70 68 73 29 20 7B 0A 09 20 20 20 20 23 20 50 72 65 70 72 6F
63 65 73 73 20 61 6C 6C 20 74 72 69 2D 67 72 61 70 68 73 0A 09 20 20 20
20 23 20 69 6E 63 6C 75 64 69 6E 67 20 74 68 69 6E 67 73 20 73 74 75 63
6B 20 69 6E 20 71 75 6F 74 65 64 20 73 74 72 69 6E 67 20 63 6F 6E 73 74
61 6E 74 73 2E 0A 09 20 20 20 20 73 2F 5C 3F 5C 3F 3D 2F 23 2F 67 3B 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
23 20 7C 20 3F 3F 3D 7C 20 20 23 7C 0A 09 20 20 20 20 73 2F 5C 3F 5C 3F
5C 21 2F 7C 2F 67 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 23 20 7C 20 3F 3F 21 7C 20 20 7C 7C 0A 09 20 20 20
20 73 2F 5C 3F 5C 3F 27 2F 5E 2F 67 3B 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 20 7C 20 3F 3F 27 7C 20 20
5E 7C 0A 09 20 20 20 20 73 2F 5C 3F 5C 3F 5C 28 2F 5B 2F 67 3B 20 20 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 20 7C
20 3F 3F 28 7C 20 20 5B 7C 0A 09 20 20 20 20 73 2F 5C 3F 5C 3F 5C 29 2F
5D 2F 67 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 23 20 7C 20 3F 3F 29 7C 20 20 5D 7C 0A 09 20 20 20 20 73 2F
5C 3F 5C 3F 5C 2D 2F 7E 2F 67 3B 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 23 20 7C 20 3F 3F 2D 7C 20 20 7E 7C 0A
09 20 20 20 20 73 2F 5C 3F 5C 3F 5C 2F 2F 5C 5C 2F 67 3B 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 20 7C 20 3F 3F
2F 7C 20 20 5C 7C 0A 09 20 20 20 20 73 2F 5C 3F 5C 3F 3C 2F 7B 2F 67 3B
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
20 23 20 7C 20 3F 3F 3C 7C 20 20 7B 7C 0A 09 20 20 20 20 73 2F 5C 3F 5C
3F 3E 2F 7D 2F 67 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 23 20 7C 20 3F 3F 3E 7C 20 20 7D 7C 0A 09 7D 0A
09 69 66 20 28 2F 5E 5B 20 5C 74 5D 2A 23 5B 20 5C 74 5D 2A 64 65 66 69
6E 65 5C 73 2B 28 5B 5C 24 5C 77 5D 2B 29 5C 62 28 3F 21 5C 28 29 5C 73
2A 28 3F 3D 5B 5E 22 5C 73 5D 29 28 2E 2A 29 2F 29 20 7B 0A 09 20 20 20
20 6D 79 20 24 64 65 66 20 3D 20 24 31 3B 0A 09 20 20 20 20 6D 79 20 24
72 65 73 74 20 3D 20 24 32 3B 0A 09 20 20 20 20 24 72 65 73 74 20 3D 7E
20 73 21 2F 5C 2A 2E 2A 3F 28 5C 2A 2F 7C 5C 6E 29 7C 2F 2F 2E 2A 21 21
67 3B 20 23 20 52 65 6D 6F 76 65 20 63 6F 6D 6D 65 6E 74 73 0A 09 20 20
20 20 24 72 65 73 74 20 3D 7E 20 73 2F 5E 5C 73 2B 2F 2F 3B 0A 09 20 20
20 20 24 72 65 73 74 20 3D 7E 20 73 2F 5C 73 2B 24 2F 2F 3B 0A 09 20 20
20 20 23 20 43 61 6E 6E 6F 74 20 64 6F 3A 20 28 2D 31 29 20 61 6E 64 20
28 28 4C 48 41 4E 44 4C 45 29 33 29 20 61 72 65 20 4F 4B 3A 0A 09 20 20
20 20 23 70 72 69 6E 74 28 22 53 6B 69 70 20 6E 6F 6E 2D 77 6F 72 64 79
20 24 64 65 66 20 3D 3E 20 24 72 65 73 74 5C 6E 22 29 2C 0A 09 20 20 20
20 23 20 20 6E 65 78 74 20 64 65 66 69 6E 65 73 20 69 66 20 24 72 65 73
74 20 3D 7E 20 2F 5B 5E 5C 77 5C 24 5D 2F 3B 0A 09 20 20 20 20 69 66 20
28 24 72 65 73 74 20 3D 7E 20 2F 22 2F 29 20 7B 0A 09 20 20 20 20 20 20
70 72 69 6E 74 28 22 53 6B 69 70 20 73 74 72 69 6E 67 79 20 24 64 65 66
20 3D 3E 20 24 72 65 73 74 5C 6E 22 29 20 69 66 20 24 6F 70 74 5F 64 3B
0A 09 20 20 20 20 20 20 6E 65 78 74 20 64 65 66 69 6E 65 73 3B 0A 09 20
20 20 20 7D 0A 09 20 20 20 20 70 72 69 6E 74 20 22 4D 61 74 63 68 65 64
20 24 5F 20 28 24 64 65 66 29 5C 6E 22 20 69 66 20 24 6F 70 74 5F 64 3B
0A 09 20 20 20 20 24 73 65 65 6E 5F 64 65 66 69 6E 65 7B 24 64 65 66 7D
20 3D 20 24 72 65 73 74 3B 0A 09 20 20 20 20 24 5F 20 3D 20 24 64 65 66
3B 0A 09 20 20 20 20 6E 65 78 74 20 69 66 20 2F 5E 5F 2E 2A 5F 68 5F 2A
24 2F 69 3B 20 23 20 73 70 65 63 69 61 6C 20 63 61 73 65 2C 20 62 75 74
20 66 6F 72 20 77 68 61 74 3F 0A 09 20 20 20 20 69 66 20 28 64 65 66 69
6E 65 64 20 24 6F 70 74 5F 70 29 20 7B 0A 09 20 20 20 20 20 20 69 66 20
28 21 2F 5E 24 6F 70 74 5F 70 28 5C 64 29 2F 29 20 7B 0A 09 09 2B 2B 24
70 72 65 66 69 78 7B 24 5F 7D 20 69 66 20 73 2F 5E 24 6F 70 74 5F 70 2F
2F 3B 0A 09 20 20 20 20 20 20 7D 0A 09 20 20 20 20 20 20 65 6C 73 65 20
7B 0A 09 09 77 61 72 6E 20 22 63 61 6E 27 74 20 72 65 6D 6F 76 65 20 24
6F 70 74 5F 70 20 70 72 65 66 69 78 20 66 72 6F 6D 20 27 24 5F 27 21 5C
6E 22 3B 0A 09 20 20 20 20 20 20 7D 0A 09 20 20 20 20 7D 0A 09 20 20 20
20 24 70 72 65 66 69 78 6C 65 73 73 7B 24 64 65 66 7D 20 3D 20 24 5F 3B
0A 09 20 20 20 20 69 66 20 28 21 24 66 6D 61 73 6B 20 6F 72 20 2F 24 66
6D 61 73 6B 2F 29 20 7B 0A 09 09 70 72 69 6E 74 20 22 2E 2E 2E 20 50 61
73 73 65 73 20 6D 61 73 6B 20 6F 66 20 2D 4D 2E 5C 6E 22 20 69 66 20 24
6F 70 74 5F 64 20 61 6E 64 20 24 66 6D 61 73 6B 3B 0A 09 09 24 63 6F 6E
73 74 5F 6E 61 6D 65 73 7B 24 5F 7D 2B 2B 3B 0A 09 20 20 20 20 7D 0A 09
20 20 7D 0A 20 20 20 20 20 20 7D 0A 20 20 20 20 20 20 69 66 20 28 64 65
66 69 6E 65 64 20 24 6F 70 74 5F 65 20 61 6E 64 20 21 24 6F 70 74 5F 65
29 20 7B 0A 20 20 20 20 20 20 20 20 63 6C 6F 73 65 28 43 48 29 3B 0A 20
20 20 20 20 20 7D 0A 20 20 20 20 20 20 65 6C 73 65 20 7B 0A 09 23 20 57
6F 72 6B 20 66 72 6F 6D 20 6D 69 6E 69 70 65 72 6C 20 74 6F 6F 20 2D 20
6F 6E 20 22 6E 6F 72 6D 61 6C 22 20 73 79 73 74 65 6D 73 0A 20 20 20 20
20 20 20 20 6D 79 20 24 53 45 45 4B 5F 53 45 54 20 3D 20 65 76 61 6C 20
27 75 73 65 20 46 63 6E 74 6C 20 71 77 2F 53 45 45 4B 5F 53 45 54 2F 3B
20 53 45 45 4B 5F 53 45 54 27 20 6F 72 20 30 3B 0A 20 20 20 20 20 20 20
20 73 65 65 6B 20 43 48 2C 20 30 2C 20 24 53 45 45 4B 5F 53 45 54 3B 0A
20 20 20 20 20 20 20 20 6D 79 20 24 73 72 63 20 3D 20 64 6F 20 7B 20 6C
6F 63 61 6C 20 24 2F 3B 20 3C 43 48 3E 20 7D 3B 0A 20 20 20 20 20 20 20
20 63 6C 6F 73 65 20 43 48 3B 0A 20 20 20 20 20 20 20 20 6E 6F 20 77 61
72 6E 69 6E 67 73 20 27 75 6E 69 6E 69 74 69 61 6C 69 7A 65 64 27 3B 0A
0A 20 20 20 20 20 20 20 20 23 20 52 65 6D 6F 76 65 20 43 20 61 6E 64 20
43 2B 2B 20 63 6F 6D 6D 65 6E 74 73 0A 20 20 20 20 20 20 20 20 24 73 72
63 20 3D 7E 20 73 23 2F 5C 2A 5B 5E 2A 5D 2A 5C 2A 2B 28 5B 5E 2F 2A 5D
5B 5E 2A 5D 2A 5C 2A 2B 29 2A 2F 7C 28 22 28 5C 5C 2E 7C 5B 5E 22 5C 5C
5D 29 2A 22 7C 27 28 5C 5C 2E 7C 5B 5E 27 5C 5C 5D 29 2A 27 7C 2E 5B 5E
2F 22 27 5C 5C 5D 2A 29 23 24 32 23 67 73 3B 0A 0A 09 77 68 69 6C 65 20
28 24 73 72 63 20 3D 7E 20 2F 5C 62 65 6E 75 6D 5C 73 2A 28 5B 5C 77 5F
5D 2A 29 5C 73 2A 5C 7B 5C 73 28 5B 5E 7D 5D 2B 29 5C 7D 2F 67 73 63 29
20 7B 0A 09 20 20 20 20 6D 79 20 28 24 65 6E 75 6D 5F 6E 61 6D 65 2C 20
24 65 6E 75 6D 5F 62 6F 64 79 29 20 3D 20 28 24 31 2C 20 24 32 29 3B 0A
20 20 20 20 20 20 20 20 20 20 20 20 23 20 73 6B 69 70 20 65 6E 75 6D 73
20 6D 61 74 63 68 69 6E 67 20 24 6F 70 74 5F 65 0A 20 20 20 20 20 20 20
20 20 20 20 20 6E 65 78 74 20 69 66 20 24 6F 70 74 5F 65 20 26 26 20 24
65 6E 75 6D 5F 6E 61 6D 65 20 3D 7E 20 2F 24 6F 70 74 5F 65 2F 3B 0A 20
20 20 20 20 20 20 20 20 20 20 20 6D 79 20 24 76 61 6C 20 3D 20 30 3B 0A
20 20 20 20 20 20 20 20 20 20 20 20 66 6F 72 20 6D 79 20 24 69 74 65 6D
20 28 73 70 6C 69 74 20 2F 2C 2F 2C 20 24 65 6E 75 6D 5F 62 6F 64 79 29
20 7B 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6D 79 20 28 24
6B 65 79 2C 20 24 64 65 63 6C 61 72 65 64 5F 76 61 6C 29 20 3D 20 24 69
74 65 6D 20 3D 7E 20 2F 28 5C 77 2B 29 5C 73 2A 28 3F 3A 3D 5C 73 2A 28
2E 2A 29 29 3F 2F 3B 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
24 76 61 6C 20 3D 20 64 65 66 69 6E 65 64 28 24 64 65 63 6C 61 72 65 64
5F 76 61 6C 29 20 26 26 20 6C 65 6E 67 74 68 28 24 64 65 63 6C 61 72 65
64 5F 76 61 6C 29 20 3F 20 24 64 65 63 6C 61 72 65 64 5F 76 61 6C 20 3A
20 31 20 2B 20 24 76 61 6C 3B 0A 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 24 73 65 65 6E 5F 64 65 66 69 6E 65 7B 24 6B 65 79 7D 20 3D 20
24 76 61 6C 3B 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 63
6F 6E 73 74 5F 6E 61 6D 65 73 7B 24 6B 65 79 7D 2B 2B 3B 0A 20 20 20 20
20 20 20 20 20 20 20 20 7D 0A 20 20 20 20 20 20 20 20 7D 20 23 20 77 68
69 6C 65 20 28 2E 2E 2E 29 0A 20 20 20 20 20 20 7D 20 23 20 69 66 20 28
21 64 65 66 69 6E 65 64 20 24 6F 70 74 5F 65 20 6F 72 20 24 6F 70 74 5F
65 29 0A 20 20 20 20 7D 0A 20 20 20 20 7D 0A 7D 0A 0A 23 20 53 61 76 65
20 63 75 72 72 65 6E 74 20 64 69 72 65 63 74 6F 72 79 20 73 6F 20 74 68
61 74 20 43 3A 3A 53 63 61 6E 20 63 61 6E 20 75 73 65 20 69 74 0A 6D 79
20 24 63 77 64 20 3D 20 46 69 6C 65 3A 3A 53 70 65 63 2D 3E 72 65 6C 32
61 62 73 28 20 46 69 6C 65 3A 3A 53 70 65 63 2D 3E 63 75 72 64 69 72 20
29 3B 0A 0A 23 20 41 73 20 49 6C 79 61 20 73 75 67 67 65 73 74 65 64 2C
20 75 73 65 20 61 20 6E 61 6D 65 20 74 68 61 74 20 63 6F 6E 74 61 69 6E
73 20 2D 20 61 6E 64 20 74 68 65 6E 20 69 74 20 63 61 6E 27 74 20 63 6C
61 73 68 20 77 69 74 68 0A 23 20 74 68 65 20 6E 61 6D 65 73 20 6F 66 20
61 6E 79 20 70 61 63 6B 61 67 65 73 2E 20 41 20 64 69 72 65 63 74 6F 72
79 20 27 66 61 6C 6C 62 61 63 6B 27 20 77 69 6C 6C 20 63 6C 61 73 68 20
77 69 74 68 20 61 6E 79 0A 23 20 6E 65 77 20 70 72 61 67 6D 61 74 61 20
64 6F 77 6E 20 74 68 65 20 66 61 6C 6C 62 61 63 6B 3A 3A 20 74 72 65 65
2C 20 62 75 74 20 74 68 61 74 20 73 65 65 6D 73 20 75 6E 6C 69 6B 65 6C
79 2E 0A 6D 79 20 24 63 6F 6E 73 74 73 63 66 6E 61 6D 65 20 3D 20 27 63
6F 6E 73 74 2D 63 2E 69 6E 63 27 3B 0A 6D 79 20 24 63 6F 6E 73 74 73 78
73 66 6E 61 6D 65 20 3D 20 27 63 6F 6E 73 74 2D 78 73 2E 69 6E 63 27 3B
0A 6D 79 20 24 66 61 6C 6C 62 61 63 6B 64 69 72 6E 61 6D 65 20 3D 20 27
66 61 6C 6C 62 61 63 6B 27 3B 0A 0A 6D 79 20 24 65 78 74 20 3D 20 63 68
64 69 72 20 27 65 78 74 27 20 3F 20 27 65 78 74 2F 27 20 3A 20 27 27 3B
0A 0A 6D 79 20 40 6D 6F 64 70 61 72 74 73 20 20 3D 20 73 70 6C 69 74 28
2F 3A 3A 2F 2C 24 6D 6F 64 75 6C 65 29 3B 0A 6D 79 20 24 6D 6F 64 70 6E
61 6D 65 20 20 3D 20 6A 6F 69 6E 28 27 2D 27 2C 20 40 6D 6F 64 70 61 72
74 73 29 3B 0A 6D 79 20 24 6D 6F 64 66 6E 61 6D 65 20 20 3D 20 70 6F 70
20 40 6D 6F 64 70 61 72 74 73 3B 0A 6D 79 20 24 6D 6F 64 70 6D 64 69 72
20 20 3D 20 6A 6F 69 6E 20 27 2F 27 2C 20 27 6C 69 62 27 2C 20 40 6D 6F
64 70 61 72 74 73 3B 0A 6D 79 20 24 6D 6F 64 70 6D 6E 61 6D 65 20 3D 20
6A 6F 69 6E 20 27 2F 27 2C 20 24 6D 6F 64 70 6D 64 69 72 2C 20 24 6D 6F
64 66 6E 61 6D 65 2E 27 2E 70 6D 27 3B 0A 0A 69 66 20 28 24 6F 70 74 5F
4F 29 20 7B 0A 09 77 61 72 6E 20 22 4F 76 65 72 77 72 69 74 69 6E 67 20
65 78 69 73 74 69 6E 67 20 24 65 78 74 24 6D 6F 64 70 6E 61 6D 65 21 21
21 5C 6E 22 20 69 66 20 2D 65 20 24 6D 6F 64 70 6E 61 6D 65 3B 0A 7D 0A
65 6C 73 65 20 7B 0A 09 64 69 65 20 22 57 6F 6E 27 74 20 6F 76 65 72 77
72 69 74 65 20 65 78 69 73 74 69 6E 67 20 24 65 78 74 24 6D 6F 64 70 6E
61 6D 65 5C 6E 22 20 69 66 20 2D 65 20 24 6D 6F 64 70 6E 61 6D 65 3B 0A
7D 0A 2D 64 20 22 24 6D 6F 64 70 6E 61 6D 65 22 20 20 20 7C 7C 20 6D 6B
70 61 74 68 28 5B 24 6D 6F 64 70 6E 61 6D 65 5D 2C 20 30 2C 20 30 37 37
35 29 3B 0A 63 68 64 69 72 28 24 6D 6F 64 70 6E 61 6D 65 29 20 7C 7C 20
64 69 65 20 22 43 61 6E 27 74 20 63 68 64 69 72 20 24 65 78 74 24 6D 6F
64 70 6E 61 6D 65 3A 20 24 21 5C 6E 22 3B 0A 0A 6D 79 20 25 74 79 70 65
73 5F 73 65 65 6E 3B 0A 6D 79 20 25 73 74 64 5F 74 79 70 65 73 3B 0A 6D
79 20 24 66 64 65 63 6C 73 20 3D 20 5B 5D 3B 0A 6D 79 20 24 66 64 65 63
6C 73 5F 70 61 72 73 65 64 20 3D 20 5B 5D 3B 0A 6D 79 20 24 74 79 70 65
64 65 66 5F 72 65 78 3B 0A 6D 79 20 25 74 79 70 65 64 65 66 73 5F 70 72
65 3B 0A 6D 79 20 25 6B 6E 6F 77 6E 5F 66 6E 61 6D 65 73 3B 0A 6D 79 20
25 73 74 72 75 63 74 73 3B 0A 0A 6D 79 20 40 66 6E 61 6D 65 73 3B 0A 6D
79 20 40 66 6E 61 6D 65 73 5F 6E 6F 5F 70 72 65 66 69 78 3B 0A 6D 79 20
25 76 64 65 63 6C 5F 68 61 73 68 3B 0A 6D 79 20 40 76 64 65 63 6C 73 3B
0A 0A 69 66 28 20 21 20 24 6F 70 74 5F 58 20 29 7B 20 20 23 20 75 73 65
20 58 53 2C 20 75 6E 6C 65 73 73 20 69 74 20 77 61 73 20 64 69 73 61 62
6C 65 64 0A 20 20 75 6E 6C 65 73 73 20 28 24 73 6B 69 70 5F 70 70 70 6F
72 74 29 20 7B 0A 20 20 20 20 72 65 71 75 69 72 65 20 44 65 76 65 6C 3A
3A 50 50 50 6F 72 74 3B 0A 20 20 20 20 77 61 72 6E 20 22 57 72 69 74 69
6E 67 20 24 65 78 74 24 6D 6F 64 70 6E 61 6D 65 2F 70 70 70 6F 72 74 2E
68 5C 6E 22 3B 0A 20 20 20 20 44 65 76 65 6C 3A 3A 50 50 50 6F 72 74 3A
3A 57 72 69 74 65 46 69 6C 65 28 27 70 70 70 6F 72 74 2E 68 27 29 0A 20
20 20 20 20 20 20 20 7C 7C 20 64 69 65 20 22 43 61 6E 27 74 20 63 72 65
61 74 65 20 24 65 78 74 24 6D 6F 64 70 6E 61 6D 65 2F 70 70 70 6F 72 74
2E 68 3A 20 24 21 5C 6E 22 3B 0A 20 20 7D 0A 20 20 6F 70 65 6E 28 58 53
2C 20 22 3E 24 6D 6F 64 66 6E 61 6D 65 2E 78 73 22 29 20 7C 7C 20 64 69
65 20 22 43 61 6E 27 74 20 63 72 65 61 74 65 20 24 65 78 74 24 6D 6F 64
70 6E 61 6D 65 2F 24 6D 6F 64 66 6E 61 6D 65 2E 78 73 3A 20 24 21 5C 6E
22 3B 0A 20 20 69 66 20 28 24 6F 70 74 5F 78 29 20 7B 0A 20 20 20 20 77
61 72 6E 20 22 53 63 61 6E 6E 69 6E 67 20 74 79 70 65 6D 61 70 73 2E 2E
2E 5C 6E 22 3B 0A 20 20 20 20 67 65 74 5F 74 79 70 65 6D 61 70 28 29 3B
0A 20 20 20 20 6D 79 20 40 74 64 3B 0A 20 20 20 20 6D 79 20 40 67 6F 6F
64 5F 74 64 3B 0A 20 20 20 20 6D 79 20 24 61 64 64 66 6C 61 67 73 20 3D
20 24 6F 70 74 5F 46 20 7C 7C 20 27 27 3B 0A 0A 20 20 20 20 66 6F 72 65
61 63 68 20 6D 79 20 24 66 69 6C 65 6E 61 6D 65 20 28 40 70 61 74 68 5F
68 29 20 7B 0A 20 20 20 20 20 20 6D 79 20 24 63 3B 0A 20 20 20 20 20 20
6D 79 20 24 66 69 6C 74 65 72 3B 0A 0A 20 20 20 20 20 20 69 66 20 28 24
66 75 6C 6C 70 61 74 68 7B 24 66 69 6C 65 6E 61 6D 65 7D 20 3D 7E 20 2F
2C 2F 29 20 7B 0A 09 24 66 69 6C 65 6E 61 6D 65 20 3D 20 24 60 3B 0A 09
24 66 69 6C 74 65 72 20 3D 20 24 27 3B 0A 20 20 20 20 20 20 7D 0A 20 20
20 20 20 20 77 61 72 6E 20 22 53 63 61 6E 6E 69 6E 67 20 24 66 69 6C 65
6E 61 6D 65 20 66 6F 72 20 66 75 6E 63 74 69 6F 6E 73 2E 2E 2E 5C 6E 22
3B 0A 20 20 20 20 20 20 6D 79 20 40 73 74 79 6C 65 73 20 3D 20 24 43 6F
6E 66 69 67 7B 67 63 63 76 65 72 73 69 6F 6E 7D 20 3F 20 71 77 28 43 2B
2B 20 43 39 58 20 47 4E 55 29 20 3A 20 71 77 28 43 2B 2B 20 43 39 58 29
3B 0A 20 20 20 20 20 20 24 63 20 3D 20 6E 65 77 20 43 3A 3A 53 63 61 6E
20 27 66 69 6C 65 6E 61 6D 65 27 20 3D 3E 20 24 66 69 6C 65 6E 61 6D 65
2C 20 27 66 69 6C 65 6E 61 6D 65 5F 66 69 6C 74 65 72 27 20 3D 3E 20 24
66 69 6C 74 65 72 2C 0A 09 27 61 64 64 5F 63 70 70 66 6C 61 67 73 27 20
3D 3E 20 24 61 64 64 66 6C 61 67 73 2C 20 27 63 5F 73 74 79 6C 65 73 27
20 3D 3E 20 5C 40 73 74 79 6C 65 73 3B 0A 20 20 20 20 20 20 24 63 2D 3E
73 65 74 28 27 69 6E 63 6C 75 64 65 44 69 72 73 27 20 3D 3E 20 5B 22 24
43 6F 6E 66 69 67 3A 3A 43 6F 6E 66 69 67 7B 61 72 63 68 6C 69 62 7D 2F
43 4F 52 45 22 2C 20 24 63 77 64 5D 29 3B 0A 0A 20 20 20 20 20 20 24 63
2D 3E 67 65 74 28 27 6B 65 79 77 6F 72 64 73 27 29 2D 3E 7B 27 5F 5F 72
65 73 74 72 69 63 74 27 7D 20 3D 20 31 3B 0A 0A 20 20 20 20 20 20 70 75
73 68 20 40 24 66 64 65 63 6C 73 5F 70 61 72 73 65 64 2C 20 40 7B 20 24
63 2D 3E 67 65 74 28 27 70 61 72 73 65 64 5F 66 64 65 63 6C 73 27 29 20
7D 3B 0A 20 20 20 20 20 20 70 75 73 68 28 40 24 66 64 65 63 6C 73 2C 20
40 7B 24 63 2D 3E 67 65 74 28 27 66 64 65 63 6C 73 27 29 7D 29 3B 0A 0A
20 20 20 20 20 20 70 75 73 68 20 40 74 64 2C 20 40 7B 24 63 2D 3E 67 65
74 28 27 74 79 70 65 64 65 66 73 5F 6D 61 79 62 65 27 29 7D 3B 0A 20 20
20 20 20 20 69 66 20 28 24 6F 70 74 5F 61 29 20 7B 0A 09 6D 79 20 24 73
74 72 75 63 74 73 20 3D 20 24 63 2D 3E 67 65 74 28 27 74 79 70 65 64 65
66 5F 73 74 72 75 63 74 73 27 29 3B 0A 09 40 73 74 72 75 63 74 73 7B 6B
65 79 73 20 25 24 73 74 72 75 63 74 73 7D 20 3D 20 76 61 6C 75 65 73 20
25 24 73 74 72 75 63 74 73 3B 0A 20 20 20 20 20 20 7D 0A 0A 20 20 20 20
20 20 69 66 20 28 24 6F 70 74 5F 6D 29 20 7B 0A 09 25 76 64 65 63 6C 5F
68 61 73 68 20 3D 20 25 7B 20 24 63 2D 3E 67 65 74 28 27 76 64 65 63 6C
5F 68 61 73 68 27 29 20 7D 3B 0A 09 40 76 64 65 63 6C 73 20 3D 20 73 6F
72 74 20 6B 65 79 73 20 25 76 64 65 63 6C 5F 68 61 73 68 3B 0A 09 66 6F
72 20 28 6C 6F 63 61 6C 20 24 5F 20 3D 20 30 3B 20 24 5F 20 3C 20 40 76
64 65 63 6C 73 3B 20 2B 2B 24 5F 29 20 7B 0A 09 20 20 6D 79 20 24 76 61
72 20 3D 20 24 76 64 65 63 6C 73 5B 24 5F 5D 3B 0A 09 20 20 6D 79 28 24
74 79 70 65 2C 20 24 70 6F 73 74 29 20 3D 20 40 7B 20 24 76 64 65 63 6C
5F 68 61 73 68 7B 24 76 61 72 7D 20 7D 3B 0A 09 20 20 69 66 20 28 64 65
66 69 6E 65 64 20 24 70 6F 73 74 29 20 7B 0A 09 20 20 20 20 77 61 72 6E
20 22 43 61 6E 27 74 20 68 61 6E 64 6C 65 20 76 61 72 69 61 62 6C 65 20
27 24 74 79 70 65 20 24 76 61 72 20 24 70 6F 73 74 27 2C 20 73 6B 69 70
70 69 6E 67 2E 5C 6E 22 3B 0A 09 20 20 20 20 73 70 6C 69 63 65 20 40 76
64 65 63 6C 73 2C 20 24 5F 2C 20 31 3B 0A 09 20 20 20 20 72 65 64 6F 3B
0A 09 20 20 7D 0A 09 20 20 24 74 79 70 65 20 3D 20 6E 6F 72 6D 61 6C 69
7A 65 5F 74 79 70 65 28 24 74 79 70 65 29 3B 0A 09 20 20 24 76 64 65 63
6C 5F 68 61 73 68 7B 24 76 61 72 7D 20 3D 20 24 74 79 70 65 3B 0A 09 7D
0A 20 20 20 20 20 20 7D 0A 0A 20 20 20 20 20 20 75 6E 6C 65 73 73 20 28
24 74 6D 61 73 6B 5F 61 6C 6C 29 20 7B 0A 09 77 61 72 6E 20 22 53 63 61
6E 6E 69 6E 67 20 24 66 69 6C 65 6E 61 6D 65 20 66 6F 72 20 74 79 70 65
64 65 66 73 2E 2E 2E 5C 6E 22 3B 0A 09 6D 79 20 24 74 64 20 3D 20 24 63
2D 3E 67 65 74 28 27 74 79 70 65 64 65 66 5F 68 61 73 68 27 29 3B 0A 09
23 20 65 76 61 6C 20 7B 72 65 71 75 69 72 65 20 27 64 75 6D 70 76 61 72
2E 70 6C 27 3B 20 3A 3A 64 75 6D 70 56 61 6C 75 65 28 24 74 64 29 7D 20
6F 72 20 77 61 72 6E 20 24 40 20 69 66 20 24 6F 70 74 5F 64 3B 0A 09 6D
79 20 40 66 5F 67 6F 6F 64 5F 74 64 20 3D 20 67 72 65 70 20 24 74 64 2D
3E 7B 24 5F 7D 5B 31 5D 20 65 71 20 27 27 2C 20 6B 65 79 73 20 25 24 74
64 3B 0A 09 70 75 73 68 20 40 67 6F 6F 64 5F 74 64 2C 20 40 66 5F 67 6F
6F 64 5F 74 64 3B 0A 09 40 74 79 70 65 64 65 66 73 5F 70 72 65 7B 40 66
5F 67 6F 6F 64 5F 74 64 7D 20 20 3D 20 6D 61 70 20 24 5F 2D 3E 5B 30 5D
2C 20 40 24 74 64 7B 40 66 5F 67 6F 6F 64 5F 74 64 7D 3B 0A 20 20 20 20
20 20 7D 0A 20 20 20 20 7D 0A 20 20 20 20 7B 20 6C 6F 63 61 6C 20 24 22
20 3D 20 27 7C 27 3B 0A 20 20 20 20 20 20 24 74 79 70 65 64 65 66 5F 72
65 78 20 3D 20 71 72 28 5C 62 28 3F 3C 21 73 74 72 75 63 74 20 29 28 3F
3A 40 67 6F 6F 64 5F 74 64 29 5C 62 29 20 69 66 20 40 67 6F 6F 64 5F 74
64 3B 0A 20 20 20 20 7D 0A 20 20 20 20 25 6B 6E 6F 77 6E 5F 66 6E 61 6D
65 73 20 3D 20 6D 61 70 20 40 24 5F 5B 31 2C 33 5D 2C 20 40 24 66 64 65
63 6C 73 5F 70 61 72 73 65 64 3B 20 23 20 5B 31 2C 33 5D 20 69 73 20 4E
41 4D 45 2C 20 46 55 4C 4C 54 45 58 54 0A 20 20 20 20 69 66 20 28 24 66
6D 61 73 6B 29 20 7B 0A 20 20 20 20 20 20 6D 79 20 40 67 6F 6F 64 3B 0A
20 20 20 20 20 20 66 6F 72 20 6D 79 20 24 69 20 28 30 2E 2E 24 23 24 66
64 65 63 6C 73 5F 70 61 72 73 65 64 29 20 7B 0A 09 6E 65 78 74 20 75 6E
6C 65 73 73 20 24 66 64 65 63 6C 73 5F 70 61 72 73 65 64 2D 3E 5B 24 69
5D 5B 31 5D 20 3D 7E 20 2F 24 66 6D 61 73 6B 2F 3B 20 23 20 5B 31 5D 20
69 73 20 4E 41 4D 45 0A 09 70 75 73 68 20 40 67 6F 6F 64 2C 20 24 69 3B
0A 09 70 72 69 6E 74 20 22 2E 2E 2E 20 46 75 6E 63 74 69 6F 6E 20 24 66
64 65 63 6C 73 5F 70 61 72 73 65 64 2D 3E 5B 24 69 5D 5B 31 5D 20 70 61
73 73 65 73 20 2D 4D 20 6D 61 73 6B 2E 5C 6E 22 0A 09 20 20 69 66 20 24
6F 70 74 5F 64 3B 0A 20 20 20 20 20 20 7D 0A 20 20 20 20 20 20 24 66 64
65 63 6C 73 20 3D 20 5B 40 24 66 64 65 63 6C 73 5B 40 67 6F 6F 64 5D 5D
3B 0A 20 20 20 20 20 20 24 66 64 65 63 6C 73 5F 70 61 72 73 65 64 20 3D
20 5B 40 24 66 64 65 63 6C 73 5F 70 61 72 73 65 64 5B 40 67 6F 6F 64 5D
5D 3B 0A 20 20 20 20 7D 0A 20 20 20 20 40 66 6E 61 6D 65 73 20 3D 20 73
6F 72 74 20 6D 61 70 20 24 5F 2D 3E 5B 31 5D 2C 20 40 24 66 64 65 63 6C
73 5F 70 61 72 73 65 64 3B 20 23 20 31 20 69 73 20 4E 41 4D 45 0A 20 20
20 20 23 20 53 6F 72 74 20 64 65 63 6C 61 72 61 74 69 6F 6E 73 3A 0A 20
20 20 20 7B 0A 20 20 20 20 20 20 6D 79 20 25 68 20 3D 20 6D 61 70 28 20
28 24 5F 2D 3E 5B 31 5D 2C 20 24 5F 29 2C 20 40 24 66 64 65 63 6C 73 5F
70 61 72 73 65 64 29 3B 0A 20 20 20 20 20 20 24 66 64 65 63 6C 73 5F 70
61 72 73 65 64 20 3D 20 5B 20 40 68 7B 40 66 6E 61 6D 65 73 7D 20 5D 3B
0A 20 20 20 20 7D 0A 20 20 20 20 40 66 6E 61 6D 65 73 5F 6E 6F 5F 70 72
65 66 69 78 20 3D 20 40 66 6E 61 6D 65 73 3B 0A 20 20 20 20 40 66 6E 61
6D 65 73 5F 6E 6F 5F 70 72 65 66 69 78 0A 20 20 20 20 20 20 3D 20 73 6F
72 74 20 6D 61 70 20 7B 20 2B 2B 24 70 72 65 66 69 78 7B 24 5F 7D 20 69
66 20 73 2F 5E 24 6F 70 74 5F 70 28 3F 21 5C 64 29 2F 2F 3B 20 24 5F 20
7D 20 40 66 6E 61 6D 65 73 5F 6E 6F 5F 70 72 65 66 69 78 0A 20 20 20 20
20 20 20 20 20 69 66 20 64 65 66 69 6E 65 64 20 24 6F 70 74 5F 70 3B 0A
20 20 20 20 23 20 52 65 6D 6F 76 65 20 6D 61 63 72 6F 73 20 77 68 69 63
68 20 65 78 70 61 6E 64 20 74 6F 20 74 79 70 65 64 65 66 73 0A 20 20 20
20 70 72 69 6E 74 20 22 54 79 70 65 64 65 66 73 20 61 72 65 20 40 74 64
2E 5C 6E 22 20 69 66 20 24 6F 70 74 5F 64 3B 0A 20 20 20 20 6D 79 20 25
74 64 20 3D 20 6D 61 70 20 7B 28 24 5F 2C 20 24 5F 29 7D 20 40 74 64 3B
0A 20 20 20 20 23 20 41 64 64 20 73 6F 6D 65 20 6F 74 68 65 72 20 70 6F
73 73 69 62 6C 65 20 62 75 74 20 6D 65 61 6E 69 6E 67 6C 65 73 73 20 76
61 6C 75 65 73 20 66 6F 72 20 6D 61 63 72 6F 73 0A 20 20 20 20 66 6F 72
20 6D 79 20 24 6B 20 28 71 77 28 63 68 61 72 20 64 6F 75 62 6C 65 20 66
6C 6F 61 74 20 69 6E 74 20 6C 6F 6E 67 20 73 68 6F 72 74 20 75 6E 73 69
67 6E 65 64 20 73 69 67 6E 65 64 20 76 6F 69 64 29 29 20 7B 0A 20 20 20
20 20 20 24 74 64 7B 22 24 5F 24 6B 22 7D 20 3D 20 22 24 5F 24 6B 22 20
66 6F 72 20 28 27 27 2C 20 27 73 69 67 6E 65 64 20 27 2C 20 27 75 6E 73
69 67 6E 65 64 20 27 29 3B 0A 20 20 20 20 7D 0A 20 20 20 20 23 20 65 76
61 6C 20 7B 72 65 71 75 69 72 65 20 27 64 75 6D 70 76 61 72 2E 70 6C 27
3B 20 3A 3A 64 75 6D 70 56 61 6C 75 65 28 20 5B 5C 40 74 64 2C 20 5C 25
74 64 5D 20 29 3B 20 31 7D 20 6F 72 20 77 61 72 6E 20 24 40 3B 0A 20 20
20 20 6D 79 20 24 6E 20 3D 20 30 3B 0A 20 20 20 20 6D 79 20 25 62 61 64
5F 6D 61 63 73 3B 0A 20 20 20 20 77 68 69 6C 65 20 28 6B 65 79 73 20 25
74 64 20 3E 20 24 6E 29 20 7B 0A 20 20 20 20 20 20 24 6E 20 3D 20 6B 65
79 73 20 25 74 64 3B 0A 20 20 20 20 20 20 6D 79 20 28 24 6B 2C 20 24 76
29 3B 0A 20 20 20 20 20 20 77 68 69 6C 65 20 28 28 24 6B 2C 20 24 76 29
20 3D 20 65 61 63 68 20 25 73 65 65 6E 5F 64 65 66 69 6E 65 29 20 7B 0A
09 23 20 70 72 69 6E 74 28 22 66 6F 75 6E 64 20 27 24 6B 27 3D 3E 27 24
76 27 5C 6E 22 29 2C 0A 09 24 62 61 64 5F 6D 61 63 73 7B 24 6B 7D 20 3D
20 24 74 64 7B 24 6B 7D 20 3D 20 24 74 64 7B 24 76 7D 20 69 66 20 65 78
69 73 74 73 20 24 74 64 7B 24 76 7D 3B 0A 20 20 20 20 20 20 7D 0A 20 20
20 20 7D 0A 20 20 20 20 23 20 4E 6F 77 20 25 62 61 64 5F 6D 61 63 73 20
63 6F 6E 74 61 69 6E 73 20 6E 61 6D 65 73 20 6F 66 20 62 61 64 20 6D 61
63 72 6F 73 0A 20 20 20 20 66 6F 72 20 6D 79 20 24 6B 20 28 6B 65 79 73
20 25 62 61 64 5F 6D 61 63 73 29 20 7B 0A 20 20 20 20 20 20 64 65 6C 65
74 65 20 24 63 6F 6E 73 74 5F 6E 61 6D 65 73 7B 24 70 72 65 66 69 78 6C
65 73 73 7B 24 6B 7D 7D 3B 0A 20 20 20 20 20 20 70 72 69 6E 74 20 22 49
67 6E 6F 72 69 6E 67 20 6D 61 63 72 6F 20 24 6B 20 77 68 69 63 68 20 65
78 70 61 6E 64 73 20 74 6F 20 61 20 74 79 70 65 64 65 66 20 6E 61 6D 65
20 27 24 62 61 64 5F 6D 61 63 73 7B 24 6B 7D 27 5C 6E 22 20 69 66 20 24
6F 70 74 5F 64 3B 0A 20 20 20 20 7D 0A 20 20 7D 0A 7D 0A 6D 79 20 40 63
6F 6E 73 74 5F 6E 61 6D 65 73 20 3D 20 73 6F 72 74 20 6B 65 79 73 20 25
63 6F 6E 73 74 5F 6E 61 6D 65 73 3B 0A 0A 2D 64 20 24 6D 6F 64 70 6D 64
69 72 20 7C 7C 20 6D 6B 70 61 74 68 28 5B 24 6D 6F 64 70 6D 64 69 72 5D
2C 20 30 2C 20 30 37 37 35 29 3B 0A 6F 70 65 6E 28 50 4D 2C 20 22 3E 24
6D 6F 64 70 6D 6E 61 6D 65 22 29 20 7C 7C 20 64 69 65 20 22 43 61 6E 27
74 20 63 72 65 61 74 65 20 24 65 78 74 24 6D 6F 64 70 6E 61 6D 65 2F 24
6D 6F 64 70 6D 6E 61 6D 65 3A 20 24 21 5C 6E 22 3B 0A 0A 24 22 20 3D 20
22 5C 6E 5C 74 22 3B 0A 77 61 72 6E 20 22 57 72 69 74 69 6E 67 20 24 65
78 74 24 6D 6F 64 70 6E 61 6D 65 2F 24 6D 6F 64 70 6D 6E 61 6D 65 5C 6E
22 3B 0A 0A 70 72 69 6E 74 20 50 4D 20 3C 3C 22 45 4E 44 22 3B 0A 70 61
63 6B 61 67 65 20 24 6D 6F 64 75 6C 65 3B 0A 0A 75 73 65 20 24 63 6F 6D
70 61 74 5F 76 65 72 73 69 6F 6E 3B 0A 45 4E 44 0A 0A 70 72 69 6E 74 20
50 4D 20 3C 3C 22 45 4E 44 22 20 75 6E 6C 65 73 73 20 24 73 6B 69 70 5F
73 74 72 69 63 74 3B 0A 75 73 65 20 73 74 72 69 63 74 3B 0A 45 4E 44 0A
0A 70 72 69 6E 74 20 50 4D 20 22 75 73 65 20 77 61 72 6E 69 6E 67 73 3B
5C 6E 22 20 75 6E 6C 65 73 73 20 24 73 6B 69 70 5F 77 61 72 6E 69 6E 67
73 20 6F 72 20 24 63 6F 6D 70 61 74 5F 76 65 72 73 69 6F 6E 20 3C 20 35
2E 30 30 36 3B 0A 0A 75 6E 6C 65 73 73 28 20 24 6F 70 74 5F 58 20 7C 7C
20 24 6F 70 74 5F 63 20 7C 7C 20 24 6F 70 74 5F 41 20 29 7B 0A 09 23 20
77 65 27 6C 6C 20 68 61 76 65 20 61 6E 20 41 55 54 4F 4C 4F 41 44 28 29
2C 20 61 6E 64 20 69 74 20 77 69 6C 6C 20 68 61 76 65 20 24 41 55 54 4F
4C 4F 41 44 20 61 6E 64 0A 09 23 20 77 69 6C 6C 20 77 61 6E 74 20 43 61
72 70 2E 0A 09 70 72 69 6E 74 20 50 4D 20 3C 3C 27 45 4E 44 27 3B 0A 75
73 65 20 43 61 72 70 3B 0A 45 4E 44 0A 7D 0A 0A 70 72 69 6E 74 20 50 4D
20 3C 3C 27 45 4E 44 27 20 75 6E 6C 65 73 73 20 24 73 6B 69 70 5F 65 78
70 6F 72 74 65 72 3B 0A 0A 72 65 71 75 69 72 65 20 45 78 70 6F 72 74 65
72 3B 0A 45 4E 44 0A 0A 6D 79 20 24 75 73 65 5F 44 79 6E 61 20 3D 20 28
6E 6F 74 20 24 6F 70 74 5F 58 20 61 6E 64 20 24 63 6F 6D 70 61 74 5F 76
65 72 73 69 6F 6E 20 3C 20 35 2E 30 30 36 20 61 6E 64 20 6E 6F 74 20 24
75 73 65 5F 78 73 6C 6F 61 64 65 72 29 3B 0A 70 72 69 6E 74 20 50 4D 20
3C 3C 22 45 4E 44 22 20 69 66 20 24 75 73 65 5F 44 79 6E 61 3B 20 20 23
20 75 73 65 20 44 79 6E 61 4C 6F 61 64 65 72 2C 20 75 6E 6C 65 73 73 20
58 53 20 77 61 73 20 64 69 73 61 62 6C 65 64 0A 72 65 71 75 69 72 65 20
44 79 6E 61 4C 6F 61 64 65 72 3B 0A 45 4E 44 0A 0A 0A 23 20 41 72 65 20
77 65 20 75 73 69 6E 67 20 41 75 74 6F 4C 6F 61 64 65 72 20 6F 72 20 6E
6F 74 3F 0A 75 6E 6C 65 73 73 20 28 24 73 6B 69 70 5F 61 75 74 6F 6C 6F
61 64 65 72 29 20 7B 20 23 20 6E 6F 20 61 75 74 6F 6C 6F 61 64 65 72 20
77 68 61 74 73 6F 65 76 65 72 2E 0A 09 75 6E 6C 65 73 73 20 28 24 6F 70
74 5F 63 29 20 7B 20 23 20 77 65 27 72 65 20 64 6F 69 6E 67 20 74 68 65
20 41 55 54 4F 4C 4F 41 44 0A 09 09 70 72 69 6E 74 20 50 4D 20 22 75 73
65 20 41 75 74 6F 4C 6F 61 64 65 72 3B 5C 6E 22 3B 0A 09 7D 0A 09 65 6C
73 65 20 7B 0A 09 09 70 72 69 6E 74 20 50 4D 20 22 75 73 65 20 41 75 74
6F 4C 6F 61 64 65 72 20 71 77 28 41 55 54 4F 4C 4F 41 44 29 3B 5C 6E 22
0A 09 7D 0A 7D 0A 0A 69 66 20 28 20 24 63 6F 6D 70 61 74 5F 76 65 72 73
69 6F 6E 20 3C 20 35 2E 30 30 36 20 29 20 7B 0A 20 20 20 20 6D 79 20 24
76 61 72 73 20 3D 20 27 24 56 45 52 53 49 4F 4E 20 40 49 53 41 27 3B 0A
20 20 20 20 24 76 61 72 73 20 2E 3D 20 27 20 40 45 58 50 4F 52 54 20 40
45 58 50 4F 52 54 5F 4F 4B 20 25 45 58 50 4F 52 54 5F 54 41 47 53 27 20
75 6E 6C 65 73 73 20 24 73 6B 69 70 5F 65 78 70 6F 72 74 65 72 3B 0A 20
20 20 20 24 76 61 72 73 20 2E 3D 20 27 20 24 41 55 54 4F 4C 4F 41 44 27
20 75 6E 6C 65 73 73 20 24 6F 70 74 5F 58 20 7C 7C 20 24 6F 70 74 5F 63
20 7C 7C 20 24 6F 70 74 5F 41 3B 0A 20 20 20 20 24 76 61 72 73 20 2E 3D
20 27 20 24 58 53 5F 56 45 52 53 49 4F 4E 27 20 69 66 20 24 6F 70 74 5F
42 20 26 26 20 21 24 6F 70 74 5F 58 3B 0A 20 20 20 20 70 72 69 6E 74 20
50 4D 20 22 75 73 65 20 76 61 72 73 20 71 77 28 24 76 61 72 73 29 3B 22
3B 0A 7D 0A 0A 23 20 44 65 74 65 72 6D 69 6E 65 20 40 49 53 41 2E 0A 6D
79 20 40 6D 6F 64 49 53 41 3B 0A 70 75 73 68 20 40 6D 6F 64 49 53 41 2C
20 27 45 78 70 6F 72 74 65 72 27 09 75 6E 6C 65 73 73 20 24 73 6B 69 70
5F 65 78 70 6F 72 74 65 72 3B 0A 70 75 73 68 20 40 6D 6F 64 49 53 41 2C
20 27 44 79 6E 61 4C 6F 61 64 65 72 27 20 09 69 66 20 24 75 73 65 5F 44
79 6E 61 3B 20 20 23 20 6E 6F 20 58 53 0A 6D 79 20 24 6D 79 49 53 41 20
3D 20 22 6F 75 72 20 5C 40 49 53 41 20 3D 20 71 77 28 40 6D 6F 64 49 53
41 29 3B 22 3B 0A 24 6D 79 49 53 41 20 3D 7E 20 73 2F 5E 6F 75 72 20 2F
2F 20 69 66 20 24 63 6F 6D 70 61 74 5F 76 65 72 73 69 6F 6E 20 3C 20 35
2E 30 30 36 3B 0A 0A 70 72 69 6E 74 20 50 4D 20 22 5C 6E 24 6D 79 49 53
41 5C 6E 5C 6E 22 3B 0A 0A 6D 79 20 40 65 78 70 6F 72 74 65 64 5F 6E 61
6D 65 73 20 3D 20 28 40 63 6F 6E 73 74 5F 6E 61 6D 65 73 2C 20 40 66 6E
61 6D 65 73 5F 6E 6F 5F 70 72 65 66 69 78 2C 20 6D 61 70 20 27 24 27 2E
24 5F 2C 20 40 76 64 65 63 6C 73 29 3B 0A 0A 6D 79 20 24 74 6D 70 3D 27
27 3B 0A 24 74 6D 70 20 2E 3D 20 3C 3C 22 45 4E 44 22 20 75 6E 6C 65 73
73 20 24 73 6B 69 70 5F 65 78 70 6F 72 74 65 72 3B 0A 23 20 49 74 65 6D
73 20 74 6F 20 65 78 70 6F 72 74 20 69 6E 74 6F 20 63 61 6C 6C 65 72 73
20 6E 61 6D 65 73 70 61 63 65 20 62 79 20 64 65 66 61 75 6C 74 2E 20 4E
6F 74 65 3A 20 64 6F 20 6E 6F 74 20 65 78 70 6F 72 74 0A 23 20 6E 61 6D
65 73 20 62 79 20 64 65 66 61 75 6C 74 20 77 69 74 68 6F 75 74 20 61 20
76 65 72 79 20 67 6F 6F 64 20 72 65 61 73 6F 6E 2E 20 55 73 65 20 45 58
50 4F 52 54 5F 4F 4B 20 69 6E 73 74 65 61 64 2E 0A 23 20 44 6F 20 6E 6F
74 20 73 69 6D 70 6C 79 20 65 78 70 6F 72 74 20 61 6C 6C 20 79 6F 75 72
20 70 75 62 6C 69 63 20 66 75 6E 63 74 69 6F 6E 73 2F 6D 65 74 68 6F 64
73 2F 63 6F 6E 73 74 61 6E 74 73 2E 0A 0A 23 20 54 68 69 73 20 61 6C 6C
6F 77 73 20 64 65 63 6C 61 72 61 74 69 6F 6E 09 75 73 65 20 24 6D 6F 64
75 6C 65 20 27 3A 61 6C 6C 27 3B 0A 23 20 49 66 20 79 6F 75 20 64 6F 20
6E 6F 74 20 6E 65 65 64 20 74 68 69 73 2C 20 6D 6F 76 69 6E 67 20 74 68
69 6E 67 73 20 64 69 72 65 63 74 6C 79 20 69 6E 74 6F 20 5C 40 45 58 50
4F 52 54 20 6F 72 20 5C 40 45 58 50 4F 52 54 5F 4F 4B 0A 23 20 77 69 6C
6C 20 73 61 76 65 20 6D 65 6D 6F 72 79 2E 0A 6F 75 72 20 25 45 58 50 4F
52 54 5F 54 41 47 53 20 3D 20 28 20 27 61 6C 6C 27 20 3D 3E 20 5B 20 71
77 28 0A 09 40 65 78 70 6F 72 74 65 64 5F 6E 61 6D 65 73 0A 29 20 5D 20
29 3B 0A 0A 6F 75 72 20 5C 40 45 58 50 4F 52 54 5F 4F 4B 20 3D 20 28 20
5C 40 7B 20 5C 24 45 58 50 4F 52 54 5F 54 41 47 53 7B 27 61 6C 6C 27 7D
20 7D 20 29 3B 0A 0A 6F 75 72 20 5C 40 45 58 50 4F 52 54 20 3D 20 71 77
28 0A 09 40 63 6F 6E 73 74 5F 6E 61 6D 65 73 0A 29 3B 0A 0A 45 4E 44 0A
0A 24 74 6D 70 20 2E 3D 20 22 6F 75 72 20 5C 24 56 45 52 53 49 4F 4E 20
3D 20 27 24 54 45 4D 50 4C 41 54 45 5F 56 45 52 53 49 4F 4E 27 3B 5C 6E
22 3B 0A 69 66 20 28 24 6F 70 74 5F 42 29 20 7B 0A 20 20 20 20 24 74 6D
70 20 2E 3D 20 22 6F 75 72 20 5C 24 58 53 5F 56 45 52 53 49 4F 4E 20 3D
20 5C 24 56 45 52 53 49 4F 4E 3B 5C 6E 22 20 75 6E 6C 65 73 73 20 24 6F
70 74 5F 58 3B 0A 20 20 20 20 24 74 6D 70 20 2E 3D 20 22 5C 24 56 45 52
53 49 4F 4E 20 3D 20 65 76 61 6C 20 5C 24 56 45 52 53 49 4F 4E 3B 20 20
23 20 73 65 65 20 4C 3C 70 65 72 6C 6D 6F 64 73 74 79 6C 65 3E 5C 6E 22
3B 0A 7D 0A 24 74 6D 70 20 2E 3D 20 22 5C 6E 22 3B 0A 0A 24 74 6D 70 20
3D 7E 20 73 2F 5E 6F 75 72 20 2F 2F 6D 67 20 69 66 20 24 63 6F 6D 70 61
74 5F 76 65 72 73 69 6F 6E 20 3C 20 35 2E 30 30 36 3B 0A 70 72 69 6E 74
20 50 4D 20 24 74 6D 70 3B 0A 0A 69 66 20 28 40 76 64 65 63 6C 73 29 20
7B 0A 20 20 20 20 70 72 69 6E 74 66 20 50 4D 20 22 6F 75 72 28 40 7B 5B
20 6A 6F 69 6E 20 27 2C 20 27 2C 20 6D 61 70 20 27 24 27 2E 24 5F 2C 20
40 76 64 65 63 6C 73 20 5D 7D 29 3B 5C 6E 5C 6E 22 3B 0A 7D 0A 0A 0A 70
72 69 6E 74 20 50 4D 20 61 75 74 6F 6C 6F 61 64 20 28 24 6D 6F 64 75 6C
65 2C 20 24 63 6F 6D 70 61 74 5F 76 65 72 73 69 6F 6E 29 20 75 6E 6C 65
73 73 20 24 6F 70 74 5F 63 20 6F 72 20 24 6F 70 74 5F 58 3B 0A 0A 69 66
28 20 21 20 24 6F 70 74 5F 58 20 29 7B 20 23 20 70 72 69 6E 74 20 62 6F
6F 74 73 74 72 61 70 2C 20 75 6E 6C 65 73 73 20 58 53 20 69 73 20 64 69
73 61 62 6C 65 64 0A 20 20 69 66 20 28 24 75 73 65 5F 44 79 6E 61 29 20
7B 0A 09 24 74 6D 70 20 3D 20 3C 3C 22 45 4E 44 22 3B 0A 62 6F 6F 74 73
74 72 61 70 20 24 6D 6F 64 75 6C 65 20 5C 24 56 45 52 53 49 4F 4E 3B 0A
45 4E 44 0A 20 20 7D 20 65 6C 73 65 20 7B 0A 09 24 74 6D 70 20 3D 20 3C
3C 22 45 4E 44 22 3B 0A 72 65 71 75 69 72 65 20 58 53 4C 6F 61 64 65 72
3B 0A 58 53 4C 6F 61 64 65 72 3A 3A 6C 6F 61 64 28 27 24 6D 6F 64 75 6C
65 27 2C 20 5C 24 56 45 52 53 49 4F 4E 29 3B 0A 45 4E 44 0A 20 20 7D 0A
20 20 24 74 6D 70 20 3D 7E 20 73 3A 5C 24 56 45 52 53 49 4F 4E 3A 5C 24
58 53 5F 56 45 52 53 49 4F 4E 3A 67 20 69 66 20 24 6F 70 74 5F 42 3B 0A
20 20 70 72 69 6E 74 20 50 4D 20 24 74 6D 70 3B 0A 7D 0A 0A 23 20 74 79
69 6E 67 20 74 68 65 20 76 61 72 69 61 62 6C 65 73 20 63 61 6E 20 68 61
70 70 65 6E 20 6F 6E 6C 79 20 61 66 74 65 72 20 62 6F 6F 74 73 74 72 61
70 0A 69 66 20 28 40 76 64 65 63 6C 73 29 20 7B 0A 20 20 20 20 70 72 69
6E 74 66 20 50 4D 20 3C 3C 45 4E 44 3B 0A 7B 0A 40 7B 5B 20 6A 6F 69 6E
20 22 5C 6E 22 2C 20 6D 61 70 20 22 20 20 20 20 5F 74 69 65 76 61 72 5F
24 5F 28 5C 24 24 5F 29 3B 22 2C 20 40 76 64 65 63 6C 73 20 5D 7D 0A 7D
0A 0A 45 4E 44 0A 7D 0A 0A 6D 79 20 24 61 66 74 65 72 3B 0A 69 66 28 20
24 6F 70 74 5F 50 20 29 7B 20 23 20 69 66 20 50 4F 44 20 69 73 20 64 69
73 61 62 6C 65 64 0A 09 24 61 66 74 65 72 20 3D 20 27 5F 5F 45 4E 44 5F
5F 27 3B 0A 7D 0A 65 6C 73 65 20 7B 0A 09 24 61 66 74 65 72 20 3D 20 27
3D 63 75 74 27 3B 0A 7D 0A 0A 70 72 69 6E 74 20 50 4D 20 3C 3C 22 45 4E
44 22 3B 0A 0A 23 20 50 72 65 6C 6F 61 64 65 64 20 6D 65 74 68 6F 64 73
20 67 6F 20 68 65 72 65 2E 0A 45 4E 44 0A 0A 70 72 69 6E 74 20 50 4D 20
3C 3C 22 45 4E 44 22 20 75 6E 6C 65 73 73 20 24 6F 70 74 5F 41 3B 0A 0A
23 20 41 75 74 6F 6C 6F 61 64 20 6D 65 74 68 6F 64 73 20 67 6F 20 61 66
74 65 72 20 24 61 66 74 65 72 2C 20 61 6E 64 20 61 72 65 20 70 72 6F 63
65 73 73 65 64 20 62 79 20 74 68 65 20 61 75 74 6F 73 70 6C 69 74 20 70
72 6F 67 72 61 6D 2E 0A 45 4E 44 0A 0A 70 72 69 6E 74 20 50 4D 20 3C 3C
22 45 4E 44 22 3B 0A 0A 31 3B 0A 5F 5F 45 4E 44 5F 5F 0A 45 4E 44 0A 0A
6D 79 20 28 24 65 6D 61 69 6C 2C 24 61 75 74 68 6F 72 2C 24 6C 69 63 65
6E 63 65 29 3B 0A 0A 65 76 61 6C 20 7B 0A 20 20 20 20 20 20 20 6D 79 20
24 75 73 65 72 6E 61 6D 65 3B 0A 20 20 20 20 20 20 20 28 24 75 73 65 72
6E 61 6D 65 2C 24 61 75 74 68 6F 72 29 20 3D 20 28 67 65 74 70 77 75 69
64 28 24 3E 29 29 5B 30 2C 36 5D 3B 0A 20 20 20 20 20 20 20 69 66 20 28
64 65 66 69 6E 65 64 20 24 75 73 65 72 6E 61 6D 65 20 26 26 20 64 65 66
69 6E 65 64 20 24 61 75 74 68 6F 72 29 20 7B 0A 09 20 20 20 24 61 75 74
68 6F 72 20 3D 7E 20 73 2F 2C 2E 2A 24 2F 2F 3B 20 23 20 69 6E 20 63 61
73 65 20 6F 66 20 73 75 62 20 66 69 65 6C 64 73 0A 09 20 20 20 6D 79 20
24 64 6F 6D 61 69 6E 20 3D 20 24 43 6F 6E 66 69 67 7B 27 6D 79 64 6F 6D
61 69 6E 27 7D 3B 0A 09 20 20 20 24 64 6F 6D 61 69 6E 20 3D 7E 20 73 2F
5E 5C 2E 2F 2F 3B 0A 09 20 20 20 24 65 6D 61 69 6C 20 3D 20 22 24 75 73
65 72 6E 61 6D 65 5C 40 24 64 6F 6D 61 69 6E 22 3B 0A 20 20 20 20 20 20
20 7D 0A 20 20 20 20 20 7D 3B 0A 0A 24 61 75 74 68 6F 72 20 3D 7E 20 73
2F 27 2F 5C 5C 27 2F 67 20 69 66 20 64 65 66 69 6E 65 64 20 24 61 75 74
68 6F 72 3B 0A 24 61 75 74 68 6F 72 20 7C 7C 3D 20 22 41 2E 20 55 2E 20
54 68 6F 72 22 3B 0A 24 65 6D 61 69 6C 20 20 7C 7C 3D 20 27 61 2E 75 2E
74 68 6F 72 40 61 2E 67 61 6C 61 78 79 2E 66 61 72 2E 66 61 72 2E 61 77
61 79 27 3B 0A 0A 24 6C 69 63 65 6E 63 65 20 3D 20 73 70 72 69 6E 74 66
20 3C 3C 20 22 44 45 46 41 55 4C 54 22 2C 20 24 5E 56 3B 0A 43 6F 70 79
72 69 67 68 74 20 28 43 29 20 24 7B 5C 28 31 39 30 30 20 2B 20 28 6C 6F
63 61 6C 74 69 6D 65 29 20 5B 35 5D 29 7D 20 62 79 20 24 61 75 74 68 6F
72 0A 0A 54 68 69 73 20 6C 69 62 72 61 72 79 20 69 73 20 66 72 65 65 20
73 6F 66 74 77 61 72 65 3B 20 79 6F 75 20 63 61 6E 20 72 65 64 69 73 74
72 69 62 75 74 65 20 69 74 20 61 6E 64 2F 6F 72 20 6D 6F 64 69 66 79 0A
69 74 20 75 6E 64 65 72 20 74 68 65 20 73 61 6D 65 20 74 65 72 6D 73 20
61 73 20 50 65 72 6C 20 69 74 73 65 6C 66 2C 20 65 69 74 68 65 72 20 50
65 72 6C 20 76 65 72 73 69 6F 6E 20 25 76 64 20 6F 72 2C 0A 61 74 20 79
6F 75 72 20 6F 70 74 69 6F 6E 2C 20 61 6E 79 20 6C 61 74 65 72 20 76 65
72 73 69 6F 6E 20 6F 66 20 50 65 72 6C 20 35 20 79 6F 75 20 6D 61 79 20
68 61 76 65 20 61 76 61 69 6C 61 62 6C 65 2E 0A 44 45 46 41 55 4C 54 0A
0A 6D 79 20 24 72 65 76 68 69 73 74 20 3D 20 27 27 3B 0A 24 72 65 76 68
69 73 74 20 3D 20 3C 3C 45 4F 54 20 69 66 20 24 6F 70 74 5F 43 3B 0A 23
0A 23 3D 68 65 61 64 31 20 48 49 53 54 4F 52 59 0A 23 0A 23 3D 6F 76 65
72 20 38 0A 23 0A 23 3D 69 74 65 6D 20 24 54 45 4D 50 4C 41 54 45 5F 56
45 52 53 49 4F 4E 0A 23 0A 23 4F 72 69 67 69 6E 61 6C 20 76 65 72 73 69
6F 6E 3B 20 63 72 65 61 74 65 64 20 62 79 20 68 32 78 73 20 24 48 32 58
53 5F 56 45 52 53 49 4F 4E 20 77 69 74 68 20 6F 70 74 69 6F 6E 73 0A 23
0A 23 20 20 40 41 52 47 53 0A 23 0A 23 3D 62 61 63 6B 0A 23 0A 45 4F 54
0A 0A 6D 79 20 24 65 78 70 5F 64 6F 63 20 3D 20 24 73 6B 69 70 5F 65 78
70 6F 72 74 65 72 20 3F 20 27 27 20 3A 20 3C 3C 45 4F 44 3B 0A 23 0A 23
3D 68 65 61 64 32 20 45 58 50 4F 52 54 0A 23 0A 23 4E 6F 6E 65 20 62 79
20 64 65 66 61 75 6C 74 2E 0A 23 0A 45 4F 44 0A 0A 69 66 20 28 40 63 6F
6E 73 74 5F 6E 61 6D 65 73 20 61 6E 64 20 6E 6F 74 20 24 6F 70 74 5F 50
29 20 7B 0A 20 20 24 65 78 70 5F 64 6F 63 20 2E 3D 20 3C 3C 45 4F 44 20
75 6E 6C 65 73 73 20 24 73 6B 69 70 5F 65 78 70 6F 72 74 65 72 3B 0A 23
3D 68 65 61 64 32 20 45 78 70 6F 72 74 61 62 6C 65 20 63 6F 6E 73 74 61
6E 74 73 0A 23 0A 23 20 20 40 7B 5B 6A 6F 69 6E 20 22 5C 6E 20 20 22 2C
20 40 63 6F 6E 73 74 5F 6E 61 6D 65 73 5D 7D 0A 23 0A 45 4F 44 0A 7D 0A
0A 69 66 20 28 64 65 66 69 6E 65 64 20 24 66 64 65 63 6C 73 20 61 6E 64
20 40 24 66 64 65 63 6C 73 20 61 6E 64 20 6E 6F 74 20 24 6F 70 74 5F 50
29 20 7B 0A 20 20 24 65 78 70 5F 64 6F 63 20 2E 3D 20 3C 3C 45 4F 44 20
75 6E 6C 65 73 73 20 24 73 6B 69 70 5F 65 78 70 6F 72 74 65 72 3B 0A 23
3D 68 65 61 64 32 20 45 78 70 6F 72 74 61 62 6C 65 20 66 75 6E 63 74 69
6F 6E 73 0A 23 0A 45 4F 44 0A 0A 23 20 20 24 65 78 70 5F 64 6F 63 20 2E
3D 20 3C 3C 45 4F 44 20 69 66 20 24 6F 70 74 5F 70 3B 0A 23 57 68 65 6E
20 61 63 63 65 73 73 69 6E 67 20 74 68 65 73 65 20 66 75 6E 63 74 69 6F
6E 73 20 66 72 6F 6D 20 50 65 72 6C 2C 20 70 72 65 66 69 78 20 43 3C 24
6F 70 74 5F 70 3E 20 73 68 6F 75 6C 64 20 62 65 20 72 65 6D 6F 76 65 64
2E 0A 23 0A 23 45 4F 44 0A 20 20 24 65 78 70 5F 64 6F 63 20 2E 3D 20 3C
3C 45 4F 44 20 75 6E 6C 65 73 73 20 24 73 6B 69 70 5F 65 78 70 6F 72 74
65 72 3B 0A 23 20 20 40 7B 5B 6A 6F 69 6E 20 22 5C 6E 20 20 22 2C 20 40
6B 6E 6F 77 6E 5F 66 6E 61 6D 65 73 7B 40 66 6E 61 6D 65 73 7D 5D 7D 0A
23 0A 45 4F 44 0A 7D 0A 0A 6D 79 20 24 6D 65 74 68 5F 64 6F 63 20 3D 20
27 27 3B 0A 0A 69 66 20 28 24 6F 70 74 5F 78 20 26 26 20 24 6F 70 74 5F
61 29 20 7B 0A 20 20 6D 79 28 24 6E 61 6D 65 2C 20 24 73 74 72 75 63 74
29 3B 0A 20 20 24 6D 65 74 68 5F 64 6F 63 20 2E 3D 20 61 63 63 65 73 73
6F 72 5F 64 6F 63 73 28 24 6E 61 6D 65 2C 20 24 73 74 72 75 63 74 29 0A
20 20 20 20 77 68 69 6C 65 20 28 24 6E 61 6D 65 2C 20 24 73 74 72 75 63
74 29 20 3D 20 65 61 63 68 20 25 73 74 72 75 63 74 73 3B 0A 7D 0A 0A 23
20 50 72 65 66 69 78 20 74 68 65 20 64 65 66 61 75 6C 74 20 6C 69 63 65
6E 63 65 20 77 69 74 68 20 68 61 73 68 20 73 79 6D 62 6F 6C 73 2E 0A 23
20 49 73 20 74 68 69 73 20 6A 75 73 74 20 63 61 72 67 6F 20 63 75 6C 74
20 2D 20 69 74 20 73 65 65 6D 73 20 74 68 61 74 20 74 68 65 20 66 69 72
73 74 20 74 68 69 6E 67 20 74 68 61 74 20 68 61 70 70 65 6E 73 20 74 6F
20 74 68 69 73 0A 23 20 62 6C 6F 63 6B 20 69 73 20 74 68 61 74 20 61 6C
6C 20 74 68 65 20 68 61 73 68 65 73 20 61 72 65 20 74 68 65 6E 20 73 2F
2F 2F 67 20 6F 75 74 2E 0A 6D 79 20 24 6C 69 63 65 6E 63 65 5F 68 61 73
68 20 3D 20 24 6C 69 63 65 6E 63 65 3B 0A 24 6C 69 63 65 6E 63 65 5F 68
61 73 68 20 3D 7E 20 73 2F 5E 2F 23 2F 67 6D 3B 0A 0A 6D 79 20 24 70 6F
64 3B 0A 24 70 6F 64 20 3D 20 3C 3C 22 45 4E 44 22 20 75 6E 6C 65 73 73
20 24 6F 70 74 5F 50 3B 0A 23 23 20 42 65 6C 6F 77 20 69 73 20 73 74 75
62 20 64 6F 63 75 6D 65 6E 74 61 74 69 6F 6E 20 66 6F 72 20 79 6F 75 72
20 6D 6F 64 75 6C 65 2E 20 59 6F 75 27 64 20 62 65 74 74 65 72 20 65 64
69 74 20 69 74 21 0A 23 0A 23 3D 68 65 61 64 31 20 4E 41 4D 45 0A 23 0A
23 24 6D 6F 64 75 6C 65 20 2D 20 50 65 72 6C 20 65 78 74 65 6E 73 69 6F
6E 20 66 6F 72 20 62 6C 61 68 20 62 6C 61 68 20 62 6C 61 68 0A 23 0A 23
3D 68 65 61 64 31 20 53 59 4E 4F 50 53 49 53 0A 23 0A 23 20 20 75 73 65
20 24 6D 6F 64 75 6C 65 3B 0A 23 20 20 62 6C 61 68 20 62 6C 61 68 20 62
6C 61 68 0A 23 0A 23 3D 68 65 61 64 31 20 44 45 53 43 52 49 50 54 49 4F
4E 0A 23 0A 23 53 74 75 62 20 64 6F 63 75 6D 65 6E 74 61 74 69 6F 6E 20
66 6F 72 20 24 6D 6F 64 75 6C 65 2C 20 63 72 65 61 74 65 64 20 62 79 20
68 32 78 73 2E 20 49 74 20 6C 6F 6F 6B 73 20 6C 69 6B 65 20 74 68 65 0A
23 61 75 74 68 6F 72 20 6F 66 20 74 68 65 20 65 78 74 65 6E 73 69 6F 6E
20 77 61 73 20 6E 65 67 6C 69 67 65 6E 74 20 65 6E 6F 75 67 68 20 74 6F
20 6C 65 61 76 65 20 74 68 65 20 73 74 75 62 0A 23 75 6E 65 64 69 74 65
64 2E 0A 23 0A 23 42 6C 61 68 20 62 6C 61 68 20 62 6C 61 68 2E 0A 24 65
78 70 5F 64 6F 63 24 6D 65 74 68 5F 64 6F 63 24 72 65 76 68 69 73 74 0A
23 0A 23 3D 68 65 61 64 31 20 53 45 45 20 41 4C 53 4F 0A 23 0A 23 4D 65
6E 74 69 6F 6E 20 6F 74 68 65 72 20 75 73 65 66 75 6C 20 64 6F 63 75 6D
65 6E 74 61 74 69 6F 6E 20 73 75 63 68 20 61 73 20 74 68 65 20 64 6F 63
75 6D 65 6E 74 61 74 69 6F 6E 20 6F 66 0A 23 72 65 6C 61 74 65 64 20 6D
6F 64 75 6C 65 73 20 6F 72 20 6F 70 65 72 61 74 69 6E 67 20 73 79 73 74
65 6D 20 64 6F 63 75 6D 65 6E 74 61 74 69 6F 6E 20 28 73 75 63 68 20 61
73 20 6D 61 6E 20 70 61 67 65 73 0A 23 69 6E 20 55 4E 49 58 29 2C 20 6F
72 20 61 6E 79 20 72 65 6C 65 76 61 6E 74 20 65 78 74 65 72 6E 61 6C 20
64 6F 63 75 6D 65 6E 74 61 74 69 6F 6E 20 73 75 63 68 20 61 73 20 52 46
43 73 20 6F 72 0A 23 73 74 61 6E 64 61 72 64 73 2E 0A 23 0A 23 49 66 20
79 6F 75 20 68 61 76 65 20 61 20 6D 61 69 6C 69 6E 67 20 6C 69 73 74 20
73 65 74 20 75 70 20 66 6F 72 20 79 6F 75 72 20 6D 6F 64 75 6C 65 2C 20
6D 65 6E 74 69 6F 6E 20 69 74 20 68 65 72 65 2E 0A 23 0A 23 49 66 20 79
6F 75 20 68 61 76 65 20 61 20 77 65 62 20 73 69 74 65 20 73 65 74 20 75
70 20 66 6F 72 20 79 6F 75 72 20 6D 6F 64 75 6C 65 2C 20 6D 65 6E 74 69
6F 6E 20 69 74 20 68 65 72 65 2E 0A 23 0A 23 3D 68 65 61 64 31 20 41 55
54 48 4F 52 0A 23 0A 23 24 61 75 74 68 6F 72 2C 20 45 3C 6C 74 3E 24 7B
65 6D 61 69 6C 7D 45 3C 67 74 3E 0A 23 0A 23 3D 68 65 61 64 31 20 43 4F
50 59 52 49 47 48 54 20 41 4E 44 20 4C 49 43 45 4E 53 45 0A 23 0A 24 6C
69 63 65 6E 63 65 5F 68 61 73 68 0A 23 0A 23 3D 63 75 74 0A 45 4E 44 0A
0A 24 70 6F 64 20 3D 7E 20 73 2F 5E 5C 23 2F 2F 67 6D 20 75 6E 6C 65 73
73 20 24 6F 70 74 5F 50 3B 0A 70 72 69 6E 74 20 50 4D 20 24 70 6F 64 20
75 6E 6C 65 73 73 20 24 6F 70 74 5F 50 3B 0A 0A 63 6C 6F 73 65 20 50 4D
3B 0A 0A 0A 69 66 28 20 21 20 24 6F 70 74 5F 58 20 29 7B 20 23 20 70 72
69 6E 74 20 58 53 2C 20 75 6E 6C 65 73 73 20 69 74 20 69 73 20 64 69 73
61 62 6C 65 64 0A 77 61 72 6E 20 22 57 72 69 74 69 6E 67 20 24 65 78 74
24 6D 6F 64 70 6E 61 6D 65 2F 24 6D 6F 64 66 6E 61 6D 65 2E 78 73 5C 6E
22 3B 0A 0A 70 72 69 6E 74 20 58 53 20 3C 3C 22 45 4E 44 22 3B 0A 23 69
6E 63 6C 75 64 65 20 22 45 58 54 45 52 4E 2E 68 22 0A 23 69 6E 63 6C 75
64 65 20 22 70 65 72 6C 2E 68 22 0A 23 69 6E 63 6C 75 64 65 20 22 58 53
55 42 2E 68 22 0A 0A 45 4E 44 0A 0A 70 72 69 6E 74 20 58 53 20 3C 3C 22
45 4E 44 22 20 75 6E 6C 65 73 73 20 24 73 6B 69 70 5F 70 70 70 6F 72 74
3B 0A 23 69 6E 63 6C 75 64 65 20 22 70 70 70 6F 72 74 2E 68 22 0A 0A 45
4E 44 0A 0A 69 66 28 20 40 70 61 74 68 5F 68 20 29 7B 0A 20 20 20 20 66
6F 72 65 61 63 68 20 6D 79 20 24 70 61 74 68 5F 68 20 28 40 70 61 74 68
5F 68 5F 69 6E 69 29 20 7B 0A 09 6D 79 28 24 68 29 20 3D 20 24 70 61 74
68 5F 68 3B 0A 09 24 68 20 3D 7E 20 73 23 5E 2F 75 73 72 2F 69 6E 63 6C
75 64 65 2F 23 23 3B 0A 09 69 66 20 28 24 5E 4F 20 65 71 20 27 56 4D 53
27 29 20 7B 20 24 68 20 3D 7E 20 73 23 2E 2A 76 6D 73 5C 5D 23 73 79 73
2F 23 20 6F 72 20 24 68 20 3D 7E 20 73 23 2E 2A 5B 3A 3E 5C 5D 5D 23 23
3B 20 7D 0A 20 20 20 20 20 20 20 20 70 72 69 6E 74 20 58 53 20 71 71 7B
23 69 6E 63 6C 75 64 65 20 3C 24 68 3E 5C 6E 7D 3B 0A 20 20 20 20 7D 0A
20 20 20 20 70 72 69 6E 74 20 58 53 20 22 5C 6E 22 3B 0A 7D 0A 0A 70 72
69 6E 74 20 58 53 20 3C 3C 22 45 4E 44 22 20 69 66 20 24 6F 70 74 5F 67
3B 0A 0A 2F 2A 20 47 6C 6F 62 61 6C 20 44 61 74 61 20 2A 2F 0A 0A 23 64
65 66 69 6E 65 20 4D 59 5F 43 58 54 5F 4B 45 59 20 22 24 7B 6D 6F 64 75
6C 65 7D 3A 3A 5F 67 75 74 73 22 20 58 53 5F 56 45 52 53 49 4F 4E 0A 0A
74 79 70 65 64 65 66 20 73 74 72 75 63 74 20 7B 0A 20 20 20 20 2F 2A 20
50 75 74 20 47 6C 6F 62 61 6C 20 44 61 74 61 20 69 6E 20 68 65 72 65 20
2A 2F 0A 20 20 20 20 69 6E 74 20 64 75 6D 6D 79 3B 09 09 2F 2A 20 79 6F
75 20 63 61 6E 20 61 63 63 65 73 73 20 74 68 69 73 20 65 6C 73 65 77 68
65 72 65 20 61 73 20 4D 59 5F 43 58 54 2E 64 75 6D 6D 79 20 2A 2F 0A 7D
20 6D 79 5F 63 78 74 5F 74 3B 0A 0A 53 54 41 52 54 5F 4D 59 5F 43 58 54
0A 0A 45 4E 44 0A 0A 6D 79 20 25 70 6F 69 6E 74 65 72 5F 74 79 70 65 64
65 66 73 3B 0A 6D 79 20 25 73 74 72 75 63 74 5F 74 79 70 65 64 65 66 73
3B 0A 0A 73 75 62 20 74 64 5F 69 73 5F 70 6F 69 6E 74 65 72 20 7B 0A 20
20 6D 79 20 24 74 79 70 65 20 3D 20 73 68 69 66 74 3B 0A 20 20 6D 79 20
24 6F 75 74 20 3D 20 24 70 6F 69 6E 74 65 72 5F 74 79 70 65 64 65 66 73
7B 24 74 79 70 65 7D 3B 0A 20 20 72 65 74 75 72 6E 20 24 6F 75 74 20 69
66 20 64 65 66 69 6E 65 64 20 24 6F 75 74 3B 0A 20 20 6D 79 20 24 6F 74
79 70 65 20 3D 20 24 74 79 70 65 3B 0A 20 20 24 6F 75 74 20 3D 20 28 24
74 79 70 65 20 3D 7E 20 2F 5C 2A 24 2F 29 3B 0A 20 20 23 20 54 68 69 73
20 63 6F 6E 76 65 72 74 73 20 6F 6E 6C 79 20 74 68 65 20 67 75 79 73 20
77 68 69 63 68 20 64 6F 20 6E 6F 74 20 68 61 76 65 20 74 72 61 69 6C 69
6E 67 20 70 61 72 74 20 69 6E 20 74 68 65 20 74 79 70 65 64 65 66 0A 20
20 69 66 20 28 6E 6F 74 20 24 6F 75 74 0A 20 20 20 20 20 20 61 6E 64 20
24 74 79 70 65 64 65 66 5F 72 65 78 20 61 6E 64 20 24 74 79 70 65 20 3D
7E 20 73 2F 28 24 74 79 70 65 64 65 66 5F 72 65 78 29 2F 24 74 79 70 65
64 65 66 73 5F 70 72 65 7B 24 31 7D 2F 67 6F 29 20 7B 0A 20 20 20 20 24
74 79 70 65 20 3D 20 6E 6F 72 6D 61 6C 69 7A 65 5F 74 79 70 65 28 24 74
79 70 65 29 3B 0A 20 20 20 20 70 72 69 6E 74 20 22 49 73 2D 50 6F 69 6E
74 65 72 3A 20 54 79 70 65 20 6D 75 74 61 74 69 6F 6E 20 76 69 61 20 74
79 70 65 64 65 66 73 3A 20 24 6F 74 79 70 65 20 3D 3D 3E 20 24 74 79 70
65 5C 6E 22 0A 20 20 20 20 20 20 69 66 20 24 6F 70 74 5F 64 3B 0A 20 20
20 20 24 6F 75 74 20 3D 20 74 64 5F 69 73 5F 70 6F 69 6E 74 65 72 28 24
74 79 70 65 29 3B 0A 20 20 7D 0A 20 20 72 65 74 75 72 6E 20 28 24 70 6F
69 6E 74 65 72 5F 74 79 70 65 64 65 66 73 7B 24 6F 74 79 70 65 7D 20 3D
20 24 6F 75 74 29 3B 0A 7D 0A 0A 73 75 62 20 74 64 5F 69 73 5F 73 74 72
75 63 74 20 7B 0A 20 20 6D 79 20 24 74 79 70 65 20 3D 20 73 68 69 66 74
3B 0A 20 20 6D 79 20 24 6F 75 74 20 3D 20 24 73 74 72 75 63 74 5F 74 79
70 65 64 65 66 73 7B 24 74 79 70 65 7D 3B 0A 20 20 72 65 74 75 72 6E 20
24 6F 75 74 20 69 66 20 64 65 66 69 6E 65 64 20 24 6F 75 74 3B 0A 20 20
6D 79 20 24 6F 74 79 70 65 20 3D 20 24 74 79 70 65 3B 0A 20 20 24 6F 75
74 20 3D 20 28 24 74 79 70 65 20 3D 7E 20 2F 5E 28 73 74 72 75 63 74 7C
75 6E 69 6F 6E 29 5C 62 2F 29 20 26 26 20 21 74 64 5F 69 73 5F 70 6F 69
6E 74 65 72 28 24 74 79 70 65 29 3B 0A 20 20 23 20 54 68 69 73 20 63 6F
6E 76 65 72 74 73 20 6F 6E 6C 79 20 74 68 65 20 67 75 79 73 20 77 68 69
63 68 20 64 6F 20 6E 6F 74 20 68 61 76 65 20 74 72 61 69 6C 69 6E 67 20
70 61 72 74 20 69 6E 20 74 68 65 20 74 79 70 65 64 65 66 0A 20 20 69 66
20 28 6E 6F 74 20 24 6F 75 74 0A 20 20 20 20 20 20 61 6E 64 20 24 74 79
70 65 64 65 66 5F 72 65 78 20 61 6E 64 20 24 74 79 70 65 20 3D 7E 20 73
2F 28 24 74 79 70 65 64 65 66 5F 72 65 78 29 2F 24 74 79 70 65 64 65 66
73 5F 70 72 65 7B 24 31 7D 2F 67 6F 29 20 7B 0A 20 20 20 20 24 74 79 70
65 20 3D 20 6E 6F 72 6D 61 6C 69 7A 65 5F 74 79 70 65 28 24 74 79 70 65
29 3B 0A 20 20 20 20 70 72 69 6E 74 20 22 49 73 2D 53 74 72 75 63 74 3A
20 54 79 70 65 20 6D 75 74 61 74 69 6F 6E 20 76 69 61 20 74 79 70 65 64
65 66 73 3A 20 24 6F 74 79 70 65 20 3D 3D 3E 20 24 74 79 70 65 5C 6E 22
0A 20 20 20 20 20 20 69 66 20 24 6F 70 74 5F 64 3B 0A 20 20 20 20 24 6F
75 74 20 3D 20 74 64 5F 69 73 5F 73 74 72 75 63 74 28 24 74 79 70 65 29
3B 0A 20 20 7D 0A 20 20 72 65 74 75 72 6E 20 28 24 73 74 72 75 63 74 5F
74 79 70 65 64 65 66 73 7B 24 6F 74 79 70 65 7D 20 3D 20 24 6F 75 74 29
3B 0A 7D 0A 0A 70 72 69 6E 74 5F 74 69 65 76 61 72 5F 73 75 62 73 28 5C
2A 58 53 2C 20 24 5F 2C 20 24 76 64 65 63 6C 5F 68 61 73 68 7B 24 5F 7D
29 20 66 6F 72 20 40 76 64 65 63 6C 73 3B 0A 0A 69 66 28 20 21 20 24 6F
70 74 5F 63 20 29 20 7B 0A 20 20 23 20 57 65 20 77 72 69 74 65 20 74 68
65 20 22 73 61 6D 70 6C 65 22 20 66 69 6C 65 73 20 75 73 65 64 20 77 68
65 6E 20 74 68 69 73 20 6D 6F 64 75 6C 65 20 69 73 20 62 75 69 6C 74 20
62 79 20 70 65 72 6C 20 77 69 74 68 6F 75 74 0A 20 20 23 20 45 78 74 55
74 69 6C 73 3A 3A 43 6F 6E 73 74 61 6E 74 2E 0A 20 20 23 20 68 32 78 73
20 77 69 6C 6C 20 6C 61 74 65 72 20 63 68 65 63 6B 20 74 68 61 74 20 74
68 65 73 65 20 61 72 65 20 74 68 65 20 73 61 6D 65 20 61 73 20 74 68 6F
73 65 20 67 65 6E 65 72 61 74 65 64 20 62 79 20 74 68 65 0A 20 20 23 20
63 6F 64 65 20 65 6D 62 65 64 64 65 64 20 69 6E 74 6F 20 4D 61 6B 65 66
69 6C 65 2E 50 4C 0A 20 20 75 6E 6C 65 73 73 20 28 2D 64 20 24 66 61 6C
6C 62 61 63 6B 64 69 72 6E 61 6D 65 29 20 7B 0A 20 20 20 20 6D 6B 64 69
72 20 22 24 66 61 6C 6C 62 61 63 6B 64 69 72 6E 61 6D 65 22 20 6F 72 20
64 69 65 20 22 43 61 6E 6E 6F 74 20 6D 6B 64 69 72 20 24 66 61 6C 6C 62
61 63 6B 64 69 72 6E 61 6D 65 3A 20 24 21 5C 6E 22 3B 0A 20 20 7D 0A 20
20 77 61 72 6E 20 22 57 72 69 74 69 6E 67 20 24 65 78 74 24 6D 6F 64 70
6E 61 6D 65 2F 24 66 61 6C 6C 62 61 63 6B 64 69 72 6E 61 6D 65 2F 24 63
6F 6E 73 74 73 63 66 6E 61 6D 65 5C 6E 22 3B 0A 20 20 77 61 72 6E 20 22
57 72 69 74 69 6E 67 20 24 65 78 74 24 6D 6F 64 70 6E 61 6D 65 2F 24 66
61 6C 6C 62 61 63 6B 64 69 72 6E 61 6D 65 2F 24 63 6F 6E 73 74 73 78 73
66 6E 61 6D 65 5C 6E 22 3B 0A 20 20 6D 79 20 24 63 66 61 6C 6C 62 61 63
6B 20 3D 20 46 69 6C 65 3A 3A 53 70 65 63 2D 3E 63 61 74 66 69 6C 65 28
24 66 61 6C 6C 62 61 63 6B 64 69 72 6E 61 6D 65 2C 20 24 63 6F 6E 73 74
73 63 66 6E 61 6D 65 29 3B 0A 20 20 6D 79 20 24 78 73 66 61 6C 6C 62 61
63 6B 20 3D 20 46 69 6C 65 3A 3A 53 70 65 63 2D 3E 63 61 74 66 69 6C 65
28 24 66 61 6C 6C 62 61 63 6B 64 69 72 6E 61 6D 65 2C 20 24 63 6F 6E 73
74 73 78 73 66 6E 61 6D 65 29 3B 0A 20 20 57 72 69 74 65 43 6F 6E 73 74
61 6E 74 73 20 28 20 43 5F 46 49 4C 45 20 3D 3E 20 20 20 20 20 20 20 24
63 66 61 6C 6C 62 61 63 6B 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 58 53 5F 46 49 4C 45 20 3D 3E 20 20 20 20 20 20 24 78
73 66 61 6C 6C 62 61 63 6B 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 44 45 46 41 55 4C 54 5F 54 59 50 45 20 3D 3E 20 24 6F
70 74 5F 74 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
20 4E 41 4D 45 20 3D 3E 20 20 20 20 20 20 20 20 20 24 6D 6F 64 75 6C 65
2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4E 41 4D
45 53 20 3D 3E 20 20 20 20 20 20 20 20 5C 40 63 6F 6E 73 74 5F 6E 61 6D
65 73 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 3B 0A
20 20 70 72 69 6E 74 20 58 53 20 22 23 69 6E 63 6C 75 64 65 20 5C 22 24
63 6F 6E 73 74 73 63 66 6E 61 6D 65 5C 22 5C 6E 22 3B 0A 7D 0A 0A 0A 6D
79 20 24 70 72 65 66 69 78 20 3D 20 64 65 66 69 6E 65 64 20 24 6F 70 74
5F 70 20 3F 20 22 50 52 45 46 49 58 20 3D 20 24 6F 70 74 5F 70 22 20 3A
20 27 27 3B 0A 0A 23 20 4E 6F 77 20 73 77 69 74 63 68 20 66 72 6F 6D 20
43 20 74 6F 20 58 53 20 62 79 20 69 73 73 75 69 6E 67 20 74 68 65 20 66
69 72 73 74 20 4D 4F 44 55 4C 45 20 64 65 63 6C 61 72 61 74 69 6F 6E 3A
0A 70 72 69 6E 74 20 58 53 20 3C 3C 22 45 4E 44 22 3B 0A 0A 4D 4F 44 55
4C 45 20 3D 20 24 6D 6F 64 75 6C 65 09 09 50 41 43 4B 41 47 45 20 3D 20
24 6D 6F 64 75 6C 65 09 09 24 70 72 65 66 69 78 0A 0A 45 4E 44 0A 0A 23
20 49 66 20 61 20 63 6F 6E 73 74 61 6E 74 28 29 20 66 75 6E 63 74 69 6F
6E 20 77 61 73 20 23 69 6E 63 6C 75 64 65 64 20 74 68 65 6E 20 6F 75 74
70 75 74 20 61 20 63 6F 72 72 65 73 70 6F 6E 64 69 6E 67 0A 23 20 58 53
20 64 65 63 6C 61 72 61 74 69 6F 6E 3A 0A 70 72 69 6E 74 20 58 53 20 22
49 4E 43 4C 55 44 45 3A 20 24 63 6F 6E 73 74 73 78 73 66 6E 61 6D 65 5C
6E 22 20 75 6E 6C 65 73 73 20 24 6F 70 74 5F 63 3B 0A 0A 70 72 69 6E 74
20 58 53 20 3C 3C 22 45 4E 44 22 20 69 66 20 24 6F 70 74 5F 67 3B 0A 0A
42 4F 4F 54 3A 0A 7B 0A 20 20 20 20 4D 59 5F 43 58 54 5F 49 4E 49 54 3B
0A 20 20 20 20 2F 2A 20 49 66 20 61 6E 79 20 6F 66 20 74 68 65 20 66 69
65 6C 64 73 20 69 6E 20 74 68 65 20 6D 79 5F 63 78 74 5F 74 20 73 74 72
75 63 74 20 6E 65 65 64 0A 20 20 20 20 20 20 20 74 6F 20 62 65 20 69 6E
69 74 69 61 6C 69 73 65 64 2C 20 64 6F 20 69 74 20 68 65 72 65 2E 0A 20
20 20 20 20 2A 2F 0A 7D 0A 0A 45 4E 44 0A 0A 66 6F 72 65 61 63 68 20 28
73 6F 72 74 20 6B 65 79 73 20 25 63 6F 6E 73 74 5F 78 73 75 62 29 20 7B
0A 20 20 20 20 70 72 69 6E 74 20 58 53 20 3C 3C 22 45 4E 44 22 3B 0A 63
68 61 72 20 2A 0A 24 5F 28 29 0A 0A 20 20 20 20 43 4F 44 45 3A 0A 23 69
66 64 65 66 20 24 5F 0A 09 52 45 54 56 41 4C 20 3D 20 24 5F 3B 0A 23 65
6C 73 65 0A 09 63 72 6F 61 6B 28 22 59 6F 75 72 20 76 65 6E 64 6F 72 20
68 61 73 20 6E 6F 74 20 64 65 66 69 6E 65 64 20 74 68 65 20 24 6D 6F 64
75 6C 65 20 6D 61 63 72 6F 20 24 5F 22 29 3B 0A 23 65 6E 64 69 66 0A 0A
20 20 20 20 4F 55 54 50 55 54 3A 0A 09 52 45 54 56 41 4C 0A 0A 45 4E 44
0A 7D 0A 0A 6D 79 20 25 73 65 65 6E 5F 64 65 63 6C 3B 0A 6D 79 20 25 74
79 70 65 6D 61 70 3B 0A 0A 73 75 62 20 70 72 69 6E 74 5F 64 65 63 6C 20
7B 0A 20 20 6D 79 20 24 66 68 20 3D 20 73 68 69 66 74 3B 0A 20 20 6D 79
20 24 64 65 63 6C 20 3D 20 73 68 69 66 74 3B 0A 20 20 6D 79 20 28 24 74
79 70 65 2C 20 24 6E 61 6D 65 2C 20 24 61 72 67 73 29 20 3D 20 40 24 64
65 63 6C 3B 0A 20 20 72 65 74 75 72 6E 20 69 66 20 24 73 65 65 6E 5F 64
65 63 6C 7B 24 6E 61 6D 65 7D 2B 2B 3B 20 23 20 4E 65 65 64 20 74 6F 20
64 6F 20 74 68 65 20 73 61 6D 65 20 66 6F 72 20 64 6F 63 73 20 61 73 20
77 65 6C 6C 3F 0A 0A 20 20 6D 79 20 40 61 72 67 6E 61 6D 65 73 20 3D 20
6D 61 70 20 7B 24 5F 2D 3E 5B 31 5D 7D 20 40 24 61 72 67 73 3B 0A 20 20
6D 79 20 40 61 72 67 74 79 70 65 73 20 3D 20 6D 61 70 20 7B 20 6E 6F 72
6D 61 6C 69 7A 65 5F 74 79 70 65 28 20 24 5F 2D 3E 5B 30 5D 2C 20 31 20
29 20 7D 20 40 24 61 72 67 73 3B 0A 20 20 69 66 20 28 24 6F 70 74 5F 6B
29 20 7B 0A 20 20 20 20 73 2F 5E 5C 73 2A 63 6F 6E 73 74 5C 62 5C 73 2A
2F 2F 20 66 6F 72 20 40 61 72 67 74 79 70 65 73 3B 0A 20 20 7D 0A 20 20
6D 79 20 40 61 72 67 61 72 72 61 79 73 20 3D 20 6D 61 70 20 7B 20 24 5F
2D 3E 5B 34 5D 20 7C 7C 20 27 27 20 7D 20 40 24 61 72 67 73 3B 0A 20 20
6D 79 20 24 6E 75 6D 61 72 67 73 20 3D 20 40 24 61 72 67 73 3B 0A 20 20
69 66 20 28 24 6E 75 6D 61 72 67 73 20 61 6E 64 20 24 61 72 67 74 79 70
65 73 5B 2D 31 5D 20 65 71 20 27 2E 2E 2E 27 29 20 7B 0A 20 20 20 20 24
6E 75 6D 61 72 67 73 2D 2D 3B 0A 20 20 20 20 24 61 72 67 6E 61 6D 65 73
5B 2D 31 5D 20 3D 20 27 2E 2E 2E 27 3B 0A 20 20 7D 0A 20 20 6C 6F 63 61
6C 20 24 22 20 3D 20 27 2C 20 27 3B 0A 20 20 24 74 79 70 65 20 3D 20 6E
6F 72 6D 61 6C 69 7A 65 5F 74 79 70 65 28 24 74 79 70 65 2C 20 31 29 3B
0A 0A 20 20 70 72 69 6E 74 20 24 66 68 20 3C 3C 22 45 4F 50 22 3B 0A 0A
24 74 79 70 65 0A 24 6E 61 6D 65 28 40 61 72 67 6E 61 6D 65 73 29 0A 45
4F 50 0A 0A 20 20 66 6F 72 20 6D 79 20 24 61 72 67 20 28 30 20 2E 2E 20
24 6E 75 6D 61 72 67 73 20 2D 20 31 29 20 7B 0A 20 20 20 20 70 72 69 6E
74 20 24 66 68 20 3C 3C 22 45 4F 50 22 3B 0A 09 24 61 72 67 74 79 70 65
73 5B 24 61 72 67 5D 09 24 61 72 67 6E 61 6D 65 73 5B 24 61 72 67 5D 24
61 72 67 61 72 72 61 79 73 5B 24 61 72 67 5D 0A 45 4F 50 0A 20 20 7D 0A
7D 0A 0A 73 75 62 20 70 72 69 6E 74 5F 74 69 65 76 61 72 5F 73 75 62 73
20 7B 0A 20 20 6D 79 28 24 66 68 2C 20 24 6E 61 6D 65 2C 20 24 74 79 70
65 29 20 3D 20 40 5F 3B 0A 20 20 70 72 69 6E 74 20 24 66 68 20 3C 3C 45
4E 44 3B 0A 49 33 32 0A 5F 67 65 74 5F 24 6E 61 6D 65 28 49 56 20 69 6E
64 65 78 2C 20 53 56 20 2A 73 76 29 20 7B 0A 20 20 20 20 64 53 50 3B 0A
20 20 20 20 50 55 53 48 4D 41 52 4B 28 53 50 29 3B 0A 20 20 20 20 58 50
55 53 48 73 28 73 76 29 3B 0A 20 20 20 20 50 55 54 42 41 43 4B 3B 0A 20
20 20 20 28 76 6F 69 64 29 63 61 6C 6C 5F 70 76 28 22 24 6D 6F 64 75 6C
65 5C 3A 3A 5F 67 65 74 5F 24 6E 61 6D 65 22 2C 20 47 5F 44 49 53 43 41
52 44 29 3B 0A 20 20 20 20 72 65 74 75 72 6E 20 28 49 33 32 29 30 3B 0A
7D 0A 0A 49 33 32 0A 5F 73 65 74 5F 24 6E 61 6D 65 28 49 56 20 69 6E 64
65 78 2C 20 53 56 20 2A 73 76 29 20 7B 0A 20 20 20 20 64 53 50 3B 0A 20
20 20 20 50 55 53 48 4D 41 52 4B 28 53 50 29 3B 0A 20 20 20 20 58 50 55
53 48 73 28 73 76 29 3B 0A 20 20 20 20 50 55 54 42 41 43 4B 3B 0A 20 20
20 20 28 76 6F 69 64 29 63 61 6C 6C 5F 70 76 28 22 24 6D 6F 64 75 6C 65
5C 3A 3A 5F 73 65 74 5F 24 6E 61 6D 65 22 2C 20 47 5F 44 49 53 43 41 52
44 29 3B 0A 20 20 20 20 72 65 74 75 72 6E 20 28 49 33 32 29 30 3B 0A 7D
0A 0A 45 4E 44 0A 7D 0A 0A 73 75 62 20 70 72 69 6E 74 5F 74 69 65 76 61
72 5F 78 73 75 62 73 20 7B 0A 20 20 6D 79 28 24 66 68 2C 20 24 6E 61 6D
65 2C 20 24 74 79 70 65 29 20 3D 20 40 5F 3B 0A 20 20 70 72 69 6E 74 20
24 66 68 20 3C 3C 45 4E 44 3B 0A 76 6F 69 64 0A 5F 74 69 65 76 61 72 5F
24 6E 61 6D 65 28 73 76 29 0A 09 53 56 2A 20 73 76 0A 20 20 20 20 50 52
45 49 4E 49 54 3A 0A 09 73 74 72 75 63 74 20 75 66 75 6E 63 73 20 75 66
3B 0A 20 20 20 20 43 4F 44 45 3A 0A 09 75 66 2E 75 66 5F 76 61 6C 20 3D
20 26 5F 67 65 74 5F 24 6E 61 6D 65 3B 0A 09 75 66 2E 75 66 5F 73 65 74
20 3D 20 26 5F 73 65 74 5F 24 6E 61 6D 65 3B 0A 09 75 66 2E 75 66 5F 69
6E 64 65 78 20 3D 20 28 49 56 29 26 5F 67 65 74 5F 24 6E 61 6D 65 3B 0A
09 73 76 5F 6D 61 67 69 63 28 73 76 2C 20 30 2C 20 27 55 27 2C 20 28 63
68 61 72 2A 29 26 75 66 2C 20 73 69 7A 65 6F 66 28 75 66 29 29 3B 0A 0A
76 6F 69 64 0A 5F 67 65 74 5F 24 6E 61 6D 65 28 54 48 49 53 29 0A 09 24
74 79 70 65 20 54 48 49 53 20 3D 20 4E 4F 5F 49 4E 49 54 0A 20 20 20 20
43 4F 44 45 3A 0A 09 54 48 49 53 20 3D 20 24 6E 61 6D 65 3B 0A 20 20 20
20 4F 55 54 50 55 54 3A 0A 09 53 45 54 4D 41 47 49 43 3A 20 44 49 53 41
42 4C 45 0A 09 54 48 49 53 0A 0A 76 6F 69 64 0A 5F 73 65 74 5F 24 6E 61
6D 65 28 54 48 49 53 29 0A 09 24 74 79 70 65 20 54 48 49 53 0A 20 20 20
20 43 4F 44 45 3A 0A 09 24 6E 61 6D 65 20 3D 20 54 48 49 53 3B 0A 0A 45
4E 44 0A 7D 0A 0A 73 75 62 20 70 72 69 6E 74 5F 61 63 63 65 73 73 6F 72
73 20 7B 0A 20 20 6D 79 28 24 66 68 2C 20 24 6E 61 6D 65 2C 20 24 73 74
72 75 63 74 29 20 3D 20 40 5F 3B 0A 20 20 72 65 74 75 72 6E 20 75 6E 6C
65 73 73 20 64 65 66 69 6E 65 64 20 24 73 74 72 75 63 74 20 26 26 20 24
6E 61 6D 65 20 21 7E 20 2F 5C 73 7C 5F 41 4E 4F 4E 2F 3B 0A 20 20 24 6E
61 6D 65 20 3D 20 6E 6F 72 6D 61 6C 69 7A 65 5F 74 79 70 65 28 24 6E 61
6D 65 29 3B 0A 20 20 6D 79 20 24 70 74 72 6E 61 6D 65 20 3D 20 6E 6F 72
6D 61 6C 69 7A 65 5F 74 79 70 65 28 22 24 6E 61 6D 65 20 2A 22 29 3B 0A
20 20 70 72 69 6E 74 20 24 66 68 20 3C 3C 22 45 4F 46 22 3B 0A 0A 4D 4F
44 55 4C 45 20 3D 20 24 6D 6F 64 75 6C 65 09 09 50 41 43 4B 41 47 45 20
3D 20 24 7B 6E 61 6D 65 7D 09 09 24 70 72 65 66 69 78 0A 0A 24 6E 61 6D
65 20 2A 0A 5F 74 6F 5F 70 74 72 28 54 48 49 53 29 0A 09 24 6E 61 6D 65
20 54 48 49 53 20 3D 20 4E 4F 5F 49 4E 49 54 0A 20 20 20 20 50 52 4F 54
4F 54 59 50 45 3A 20 5C 24 0A 20 20 20 20 43 4F 44 45 3A 0A 09 69 66 20
28 73 76 5F 64 65 72 69 76 65 64 5F 66 72 6F 6D 28 53 54 28 30 29 2C 20
22 24 6E 61 6D 65 22 29 29 20 7B 0A 09 20 20 20 20 53 54 52 4C 45 4E 20
6C 65 6E 3B 0A 09 20 20 20 20 63 68 61 72 20 2A 73 20 3D 20 53 76 50 56
28 28 53 56 2A 29 53 76 52 56 28 53 54 28 30 29 29 2C 20 6C 65 6E 29 3B
0A 09 20 20 20 20 69 66 20 28 6C 65 6E 20 21 3D 20 73 69 7A 65 6F 66 28
54 48 49 53 29 29 0A 09 09 63 72 6F 61 6B 28 22 53 69 7A 65 20 5C 25 64
20 6F 66 20 70 61 63 6B 65 64 20 64 61 74 61 20 21 3D 20 65 78 70 65 63
74 65 64 20 5C 25 64 22 2C 0A 09 09 09 6C 65 6E 2C 20 73 69 7A 65 6F 66
28 54 48 49 53 29 29 3B 0A 09 20 20 20 20 52 45 54 56 41 4C 20 3D 20 28
24 6E 61 6D 65 20 2A 29 73 3B 0A 09 7D 0A 09 65 6C 73 65 0A 09 20 20 20
20 63 72 6F 61 6B 28 22 54 48 49 53 20 69 73 20 6E 6F 74 20 6F 66 20 74
79 70 65 20 24 6E 61 6D 65 22 29 3B 0A 20 20 20 20 4F 55 54 50 55 54 3A
0A 09 52 45 54 56 41 4C 0A 0A 24 6E 61 6D 65 0A 6E 65 77 28 43 4C 41 53
53 29 0A 09 63 68 61 72 20 2A 43 4C 41 53 53 20 3D 20 4E 4F 5F 49 4E 49
54 0A 20 20 20 20 50 52 4F 54 4F 54 59 50 45 3A 20 5C 24 0A 20 20 20 20
43 4F 44 45 3A 0A 09 5A 65 72 6F 28 28 76 6F 69 64 2A 29 26 52 45 54 56
41 4C 2C 20 73 69 7A 65 6F 66 28 52 45 54 56 41 4C 29 2C 20 63 68 61 72
29 3B 0A 20 20 20 20 4F 55 54 50 55 54 3A 0A 09 52 45 54 56 41 4C 0A 0A
4D 4F 44 55 4C 45 20 3D 20 24 6D 6F 64 75 6C 65 09 09 50 41 43 4B 41 47
45 20 3D 20 24 7B 6E 61 6D 65 7D 50 74 72 09 09 24 70 72 65 66 69 78 0A
0A 45 4F 46 0A 20 20 6D 79 20 40 69 74 65 6D 73 20 3D 20 40 24 73 74 72
75 63 74 3B 0A 20 20 77 68 69 6C 65 20 28 40 69 74 65 6D 73 29 20 7B 0A
20 20 20 20 6D 79 20 24 69 74 65 6D 20 3D 20 73 68 69 66 74 20 40 69 74
65 6D 73 3B 0A 20 20 20 20 69 66 20 28 24 69 74 65 6D 2D 3E 5B 30 5D 20
3D 7E 20 2F 5F 41 4E 4F 4E 2F 29 20 7B 0A 20 20 20 20 20 20 69 66 20 28
64 65 66 69 6E 65 64 20 24 69 74 65 6D 2D 3E 5B 32 5D 29 20 7B 0A 09 70
75 73 68 20 40 69 74 65 6D 73 2C 20 6D 61 70 20 5B 0A 09 20 20 40 24 5F
5B 30 2C 20 31 5D 2C 20 22 24 69 74 65 6D 2D 3E 5B 32 5D 5F 24 5F 2D 3E
5B 32 5D 22 2C 20 22 24 69 74 65 6D 2D 3E 5B 32 5D 2E 24 5F 2D 3E 5B 32
5D 22 2C 0A 09 5D 2C 20 40 7B 20 24 73 74 72 75 63 74 73 7B 24 69 74 65
6D 2D 3E 5B 30 5D 7D 20 7D 3B 0A 20 20 20 20 20 20 7D 20 65 6C 73 65 20
7B 0A 09 70 75 73 68 20 40 69 74 65 6D 73 2C 20 40 7B 20 24 73 74 72 75
63 74 73 7B 24 69 74 65 6D 2D 3E 5B 30 5D 7D 20 7D 3B 0A 20 20 20 20 20
20 7D 0A 20 20 20 20 7D 20 65 6C 73 65 20 7B 0A 20 20 20 20 20 20 6D 79
20 24 74 79 70 65 20 3D 20 6E 6F 72 6D 61 6C 69 7A 65 5F 74 79 70 65 28
24 69 74 65 6D 2D 3E 5B 30 5D 29 3B 0A 20 20 20 20 20 20 6D 79 20 24 74
74 79 70 65 20 3D 20 24 73 74 72 75 63 74 73 7B 24 74 79 70 65 7D 20 3F
20 6E 6F 72 6D 61 6C 69 7A 65 5F 74 79 70 65 28 22 24 74 79 70 65 20 2A
22 29 20 3A 20 24 74 79 70 65 3B 0A 20 20 20 20 20 20 70 72 69 6E 74 20
24 66 68 20 3C 3C 22 45 4F 46 22 3B 0A 24 74 74 79 70 65 0A 24 69 74 65
6D 2D 3E 5B 32 5D 28 54 48 49 53 2C 20 5F 5F 76 61 6C 75 65 20 3D 20 4E
4F 5F 49 4E 49 54 29 0A 09 24 70 74 72 6E 61 6D 65 20 54 48 49 53 0A 09
24 74 79 70 65 20 5F 5F 76 61 6C 75 65 0A 20 20 20 20 50 52 4F 54 4F 54
59 50 45 3A 20 5C 24 3B 5C 24 0A 20 20 20 20 43 4F 44 45 3A 0A 09 69 66
20 28 69 74 65 6D 73 20 3E 20 31 29 0A 09 20 20 20 20 54 48 49 53 2D 3E
24 69 74 65 6D 2D 3E 5B 2D 31 5D 20 3D 20 5F 5F 76 61 6C 75 65 3B 0A 09
52 45 54 56 41 4C 20 3D 20 40 7B 5B 0A 09 20 20 20 20 24 74 79 70 65 20
65 71 20 24 74 74 79 70 65 20 3F 20 22 54 48 49 53 2D 3E 24 69 74 65 6D
2D 3E 5B 2D 31 5D 22 20 3A 20 22 26 28 54 48 49 53 2D 3E 24 69 74 65 6D
2D 3E 5B 2D 31 5D 29 22 0A 09 5D 7D 3B 0A 20 20 20 20 4F 55 54 50 55 54
3A 0A 09 52 45 54 56 41 4C 0A 0A 45 4F 46 0A 20 20 20 20 7D 0A 20 20 7D
0A 7D 0A 0A 73 75 62 20 61 63 63 65 73 73 6F 72 5F 64 6F 63 73 20 7B 0A
20 20 6D 79 28 24 6E 61 6D 65 2C 20 24 73 74 72 75 63 74 29 20 3D 20 40
5F 3B 0A 20 20 72 65 74 75 72 6E 20 75 6E 6C 65 73 73 20 64 65 66 69 6E
65 64 20 24 73 74 72 75 63 74 20 26 26 20 24 6E 61 6D 65 20 21 7E 20 2F
5C 73 7C 5F 41 4E 4F 4E 2F 3B 0A 20 20 24 6E 61 6D 65 20 3D 20 6E 6F 72
6D 61 6C 69 7A 65 5F 74 79 70 65 28 24 6E 61 6D 65 29 3B 0A 20 20 6D 79
20 24 70 74 72 6E 61 6D 65 20 3D 20 24 6E 61 6D 65 20 2E 20 27 50 74 72
27 3B 0A 20 20 6D 79 20 40 69 74 65 6D 73 20 3D 20 40 24 73 74 72 75 63
74 3B 0A 20 20 6D 79 20 40 6C 69 73 74 3B 0A 20 20 77 68 69 6C 65 20 28
40 69 74 65 6D 73 29 20 7B 0A 20 20 20 20 6D 79 20 24 69 74 65 6D 20 3D
20 73 68 69 66 74 20 40 69 74 65 6D 73 3B 0A 20 20 20 20 69 66 20 28 24
69 74 65 6D 2D 3E 5B 30 5D 20 3D 7E 20 2F 5F 41 4E 4F 4E 2F 29 20 7B 0A
20 20 20 20 20 20 69 66 20 28 64 65 66 69 6E 65 64 20 24 69 74 65 6D 2D
3E 5B 32 5D 29 20 7B 0A 09 70 75 73 68 20 40 69 74 65 6D 73 2C 20 6D 61
70 20 5B 0A 09 20 20 40 24 5F 5B 30 2C 20 31 5D 2C 20 22 24 69 74 65 6D
2D 3E 5B 32 5D 5F 24 5F 2D 3E 5B 32 5D 22 2C 20 22 24 69 74 65 6D 2D 3E
5B 32 5D 2E 24 5F 2D 3E 5B 32 5D 22 2C 0A 09 5D 2C 20 40 7B 20 24 73 74
72 75 63 74 73 7B 24 69 74 65 6D 2D 3E 5B 30 5D 7D 20 7D 3B 0A 20 20 20
20 20 20 7D 20 65 6C 73 65 20 7B 0A 09 70 75 73 68 20 40 69 74 65 6D 73
2C 20 40 7B 20 24 73 74 72 75 63 74 73 7B 24 69 74 65 6D 2D 3E 5B 30 5D
7D 20 7D 3B 0A 20 20 20 20 20 20 7D 0A 20 20 20 20 7D 20 65 6C 73 65 20
7B 0A 20 20 20 20 20 20 70 75 73 68 20 40 6C 69 73 74 2C 20 24 69 74 65
6D 2D 3E 5B 32 5D 3B 0A 20 20 20 20 7D 0A 20 20 7D 0A 20 20 6D 79 20 24
6D 65 74 68 6F 64 73 20 3D 20 28 6A 6F 69 6E 20 27 28 2E 2E 2E 29 3E 2C
20 43 3C 27 2C 20 40 6C 69 73 74 29 20 2E 20 27 28 2E 2E 2E 29 27 3B 0A
0A 20 20 6D 79 20 24 70 6F 64 20 3D 20 3C 3C 22 45 4F 46 22 3B 0A 23 0A
23 3D 68 65 61 64 32 20 4F 62 6A 65 63 74 20 61 6E 64 20 63 6C 61 73 73
20 6D 65 74 68 6F 64 73 20 66 6F 72 20 43 3C 24 6E 61 6D 65 3E 2F 43 3C
24 70 74 72 6E 61 6D 65 3E 0A 23 0A 23 54 68 65 20 70 72 69 6E 63 69 70
61 6C 20 50 65 72 6C 20 72 65 70 72 65 73 65 6E 74 61 74 69 6F 6E 20 6F
66 20 61 20 43 20 6F 62 6A 65 63 74 20 6F 66 20 74 79 70 65 20 43 3C 24
6E 61 6D 65 3E 20 69 73 20 61 6E 0A 23 6F 62 6A 65 63 74 20 6F 66 20 63
6C 61 73 73 20 43 3C 24 70 74 72 6E 61 6D 65 3E 20 77 68 69 63 68 20 69
73 20 61 20 72 65 66 65 72 65 6E 63 65 20 74 6F 20 61 6E 20 69 6E 74 65
67 65 72 0A 23 72 65 70 72 65 73 65 6E 74 61 74 69 6F 6E 20 6F 66 20 61
20 43 20 70 6F 69 6E 74 65 72 2E 20 20 54 6F 20 63 72 65 61 74 65 20 73
75 63 68 20 61 6E 20 6F 62 6A 65 63 74 2C 20 6F 6E 65 20 6D 61 79 20 75
73 65 0A 23 61 20 63 6F 6D 62 69 6E 61 74 69 6F 6E 0A 23 0A 23 20 20 6D
79 20 5C 24 62 75 66 66 65 72 20 3D 20 24 6E 61 6D 65 2D 3E 6E 65 77 28
29 3B 0A 23 20 20 6D 79 20 5C 24 6F 62 6A 20 3D 20 5C 24 62 75 66 66 65
72 2D 3E 5F 74 6F 5F 70 74 72 28 29 3B 0A 23 0A 23 54 68 69 73 20 65 78
65 72 73 69 7A 65 73 20 74 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 20 74 77
6F 20 6D 65 74 68 6F 64 73 2C 20 61 6E 64 20 61 6E 20 61 64 64 69 74 69
6F 6E 61 6C 20 63 6C 61 73 73 0A 23 43 3C 24 6E 61 6D 65 3E 2C 20 74 68
65 20 69 6E 74 65 72 6E 61 6C 20 72 65 70 72 65 73 65 6E 74 61 74 69 6F
6E 20 6F 66 20 77 68 69 63 68 20 69 73 20 61 20 72 65 66 65 72 65 6E 63
65 20 74 6F 20 61 0A 23 70 61 63 6B 65 64 20 73 74 72 69 6E 67 20 77 69
74 68 20 74 68 65 20 43 20 73 74 72 75 63 74 75 72 65 2E 20 20 4B 65 65
70 20 69 6E 20 6D 69 6E 64 20 74 68 61 74 20 5C 24 62 75 66 66 65 72 20
73 68 6F 75 6C 64 0A 23 62 65 74 74 65 72 20 73 75 72 76 69 76 65 20 6C
6F 6E 67 65 72 20 74 68 61 6E 20 5C 24 6F 62 6A 2E 0A 23 0A 23 3D 6F 76
65 72 0A 23 0A 23 3D 69 74 65 6D 20 43 3C 5C 24 6F 62 6A 65 63 74 5F 6F
66 5F 74 79 70 65 5F 24 6E 61 6D 65 2D 45 3C 67 74 3E 5F 74 6F 5F 70 74
72 28 29 3E 0A 23 0A 23 43 6F 6E 76 65 72 74 73 20 61 6E 20 6F 62 6A 65
63 74 20 6F 66 20 74 79 70 65 20 43 3C 24 6E 61 6D 65 3E 20 74 6F 20 61
6E 20 6F 62 6A 65 63 74 20 6F 66 20 74 79 70 65 20 43 3C 24 70 74 72 6E
61 6D 65 3E 2E 0A 23 0A 23 3D 69 74 65 6D 20 43 3C 24 6E 61 6D 65 2D 45
3C 67 74 3E 6E 65 77 28 29 3E 0A 23 0A 23 43 72 65 61 74 65 73 20 61 6E
20 65 6D 70 74 79 20 6F 62 6A 65 63 74 20 6F 66 20 74 79 70 65 20 43 3C
24 6E 61 6D 65 3E 2E 20 20 54 68 65 20 63 6F 72 72 65 73 70 6F 6E 64 69
6E 67 20 70 61 63 6B 65 64 0A 23 73 74 72 69 6E 67 20 69 73 20 7A 65 72
6F 65 64 20 6F 75 74 2E 0A 23 0A 23 3D 69 74 65 6D 20 43 3C 24 6D 65 74
68 6F 64 73 3E 0A 23 0A 23 72 65 74 75 72 6E 20 74 68 65 20 63 75 72 72
65 6E 74 20 76 61 6C 75 65 20 6F 66 20 74 68 65 20 63 6F 72 72 65 73 70
6F 6E 64 69 6E 67 20 65 6C 65 6D 65 6E 74 20 69 66 20 63 61 6C 6C 65 64
0A 23 77 69 74 68 6F 75 74 20 61 64 64 69 74 69 6F 6E 61 6C 20 61 72 67
75 6D 65 6E 74 73 2E 20 20 53 65 74 20 74 68 65 20 65 6C 65 6D 65 6E 74
20 74 6F 20 74 68 65 20 73 75 70 70 6C 69 65 64 20 76 61 6C 75 65 0A 23
28 61 6E 64 20 72 65 74 75 72 6E 20 74 68 65 20 6E 65 77 20 76 61 6C 75
65 29 20 69 66 20 63 61 6C 6C 65 64 20 77 69 74 68 20 61 6E 20 61 64 64
69 74 69 6F 6E 61 6C 20 61 72 67 75 6D 65 6E 74 2E 0A 23 0A 23 41 70 70
6C 69 63 61 62 6C 65 20 74 6F 20 6F 62 6A 65 63 74 73 20 6F 66 20 74 79
70 65 20 43 3C 24 70 74 72 6E 61 6D 65 3E 2E 0A 23 0A 23 3D 62 61 63 6B
0A 23 0A 45 4F 46 0A 20 20 24 70 6F 64 20 3D 7E 20 73 2F 5E 5C 23 2F 2F
67 6D 3B 0A 20 20 72 65 74 75 72 6E 20 24 70 6F 64 3B 0A 7D 0A 0A 23 20
53 68 6F 75 6C 64 20 62 65 20 63 61 6C 6C 65 64 20 62 65 66 6F 72 65 20
61 6E 79 20 61 63 74 75 61 6C 20 63 61 6C 6C 20 74 6F 20 6E 6F 72 6D 61
6C 69 7A 65 5F 74 79 70 65 28 29 2E 0A 73 75 62 20 67 65 74 5F 74 79 70
65 6D 61 70 20 7B 0A 20 20 23 20 57 65 20 64 6F 20 6E 6F 74 20 77 61 6E
74 20 74 6F 20 72 65 61 64 20 2E 2F 74 79 70 65 6D 61 70 20 62 79 20 6F
62 76 69 6F 73 20 72 65 61 73 6F 6E 73 2E 0A 20 20 6D 79 20 40 74 6D 20
3D 20 20 71 77 28 2E 2E 2F 2E 2E 2F 2E 2E 2F 74 79 70 65 6D 61 70 20 2E
2E 2F 2E 2E 2F 74 79 70 65 6D 61 70 20 2E 2E 2F 74 79 70 65 6D 61 70 29
3B 0A 20 20 6D 79 20 24 73 74 64 74 79 70 65 6D 61 70 20 3D 20 20 22 24
43 6F 6E 66 69 67 3A 3A 43 6F 6E 66 69 67 7B 70 72 69 76 6C 69 62 7D 2F
45 78 74 55 74 69 6C 73 2F 74 79 70 65 6D 61 70 22 3B 0A 20 20 75 6E 73
68 69 66 74 20 40 74 6D 2C 20 24 73 74 64 74 79 70 65 6D 61 70 3B 0A 20
20 6D 79 20 24 70 72 6F 74 6F 5F 72 65 20 3D 20 22 5B 22 20 2E 20 71 75
6F 74 65 6D 65 74 61 28 27 5C 24 25 26 2A 40 3B 27 29 20 2E 20 22 5D 22
20 3B 0A 0A 20 20 23 20 53 74 61 72 74 20 77 69 74 68 20 75 73 65 66 75
6C 20 64 65 66 61 75 6C 74 20 76 61 6C 75 65 73 0A 20 20 24 74 79 70 65
6D 61 70 7B 66 6C 6F 61 74 7D 20 3D 20 27 54 5F 4E 56 27 3B 0A 0A 20 20
66 6F 72 65 61 63 68 20 6D 79 20 24 74 79 70 65 6D 61 70 20 28 40 74 6D
29 20 7B 0A 20 20 20 20 6E 65 78 74 20 75 6E 6C 65 73 73 20 2D 65 20 24
74 79 70 65 6D 61 70 20 3B 0A 20 20 20 20 23 20 73 6B 69 70 20 64 69 72
65 63 74 6F 72 69 65 73 2C 20 62 69 6E 61 72 79 20 66 69 6C 65 73 20 65
74 63 2E 0A 20 20 20 20 77 61 72 6E 20 22 20 53 63 61 6E 6E 69 6E 67 20
24 74 79 70 65 6D 61 70 5C 6E 22 3B 0A 20 20 20 20 77 61 72 6E 28 22 57
61 72 6E 69 6E 67 3A 20 69 67 6E 6F 72 69 6E 67 20 6E 6F 6E 2D 74 65 78
74 20 74 79 70 65 6D 61 70 20 66 69 6C 65 20 27 24 74 79 70 65 6D 61 70
27 5C 6E 22 29 2C 20 6E 65 78 74 0A 20 20 20 20 20 20 75 6E 6C 65 73 73
20 2D 54 20 24 74 79 70 65 6D 61 70 20 3B 0A 20 20 20 20 6F 70 65 6E 28
54 59 50 45 4D 41 50 2C 20 24 74 79 70 65 6D 61 70 29 0A 20 20 20 20 20
20 6F 72 20 77 61 72 6E 20 28 22 57 61 72 6E 69 6E 67 3A 20 63 6F 75 6C
64 20 6E 6F 74 20 6F 70 65 6E 20 74 79 70 65 6D 61 70 20 66 69 6C 65 20
27 24 74 79 70 65 6D 61 70 27 3A 20 24 21 5C 6E 22 29 2C 20 6E 65 78 74
3B 0A 20 20 20 20 6D 79 20 24 6D 6F 64 65 20 3D 20 27 54 79 70 65 6D 61
70 27 3B 0A 20 20 20 20 77 68 69 6C 65 20 28 3C 54 59 50 45 4D 41 50 3E
29 20 7B 0A 20 20 20 20 20 20 6E 65 78 74 20 69 66 20 2F 5E 5C 73 2A 5C
23 2F 3B 0A 20 20 20 20 20 20 69 66 20 28 2F 5E 49 4E 50 55 54 5C 73 2A
24 2F 29 20 20 20 7B 20 24 6D 6F 64 65 20 3D 20 27 49 6E 70 75 74 27 3B
20 6E 65 78 74 3B 20 7D 0A 20 20 20 20 20 20 65 6C 73 69 66 20 28 2F 5E
4F 55 54 50 55 54 5C 73 2A 24 2F 29 20 20 7B 20 24 6D 6F 64 65 20 3D 20
27 4F 75 74 70 75 74 27 3B 20 6E 65 78 74 3B 20 7D 0A 20 20 20 20 20 20
65 6C 73 69 66 20 28 2F 5E 54 59 50 45 4D 41 50 5C 73 2A 24 2F 29 20 7B
20 24 6D 6F 64 65 20 3D 20 27 54 79 70 65 6D 61 70 27 3B 20 6E 65 78 74
3B 20 7D 0A 20 20 20 20 20 20 65 6C 73 69 66 20 28 24 6D 6F 64 65 20 65
71 20 27 54 79 70 65 6D 61 70 27 29 20 7B 0A 09 6E 65 78 74 20 69 66 20
2F 5E 5C 73 2A 28 24 7C 5C 23 29 2F 20 3B 0A 09 6D 79 20 28 24 74 79 70
65 2C 20 24 69 6D 61 67 65 29 3B 0A 09 69 66 20 28 20 28 24 74 79 70 65
2C 20 24 69 6D 61 67 65 29 20 3D 0A 09 20 20 20 20 20 2F 5E 5C 73 2A 28
2E 2A 3F 5C 53 29 5C 73 2B 28 5C 53 2B 29 5C 73 2A 28 24 70 72 6F 74 6F
5F 72 65 2A 29 5C 73 2A 24 2F 6F 0A 09 20 20 20 20 20 23 20 54 68 69 73
20 6D 61 79 20 72 65 66 65 72 65 6E 63 65 20 75 6E 64 65 66 69 6E 65 64
20 66 75 6E 63 74 69 6F 6E 73 3A 0A 09 20 20 20 20 20 61 6E 64 20 6E 6F
74 20 28 24 69 6D 61 67 65 20 65 71 20 27 54 5F 50 41 43 4B 45 44 27 20
61 6E 64 20 24 74 79 70 65 6D 61 70 20 65 71 20 24 73 74 64 74 79 70 65
6D 61 70 29 29 20 7B 0A 09 20 20 24 74 79 70 65 6D 61 70 7B 6E 6F 72 6D
61 6C 69 7A 65 5F 74 79 70 65 28 24 74 79 70 65 29 7D 20 3D 20 24 69 6D
61 67 65 3B 0A 09 7D 0A 20 20 20 20 20 20 7D 0A 20 20 20 20 7D 0A 20 20
20 20 63 6C 6F 73 65 28 54 59 50 45 4D 41 50 29 20 6F 72 20 64 69 65 20
22 43 61 6E 6E 6F 74 20 63 6C 6F 73 65 20 24 74 79 70 65 6D 61 70 3A 20
24 21 22 3B 0A 20 20 7D 0A 20 20 25 73 74 64 5F 74 79 70 65 73 20 3D 20
25 74 79 70 65 73 5F 73 65 65 6E 3B 0A 20 20 25 74 79 70 65 73 5F 73 65
65 6E 20 3D 20 28 29 3B 0A 7D 0A 0A 0A 73 75 62 20 6E 6F 72 6D 61 6C 69
7A 65 5F 74 79 70 65 20 7B 09 09 23 20 53 65 63 6F 6E 64 20 61 72 67 3A
20 64 6F 20 6E 6F 74 20 73 74 72 69 70 20 63 6F 6E 73 74 27 73 20 62 65
66 6F 72 65 20 5C 2A 0A 20 20 6D 79 20 24 74 79 70 65 20 3D 20 73 68 69
66 74 3B 0A 20 20 6D 79 20 24 64 6F 5F 6B 65 65 70 5F 64 65 65 70 5F 63
6F 6E 73 74 20 3D 20 73 68 69 66 74 3B 0A 20 20 23 20 49 66 20 24 64 6F
5F 6B 65 65 70 5F 64 65 65 70 5F 63 6F 6E 73 74 20 74 68 69 73 20 69 73
20 68 65 75 72 69 73 74 69 63 61 6C 20 6F 6E 6C 79 0A 20 20 6D 79 20 24
6B 65 65 70 5F 64 65 65 70 5F 63 6F 6E 73 74 20 3D 20 28 24 64 6F 5F 6B
65 65 70 5F 64 65 65 70 5F 63 6F 6E 73 74 20 3F 20 27 5C 62 28 3F 21 5B
5E 28 2C 29 5D 2A 5C 2A 29 27 20 3A 20 27 27 29 3B 0A 20 20 6D 79 20 24
69 67 6E 6F 72 65 5F 6D 6F 64 73 0A 20 20 20 20 3D 20 22 28 3F 3A 5C 5C
62 28 3F 3A 28 3F 3A 5F 5F 63 6F 6E 73 74 5F 5F 7C 63 6F 6E 73 74 29 24
6B 65 65 70 5F 64 65 65 70 5F 63 6F 6E 73 74 7C 73 74 61 74 69 63 7C 69
6E 6C 69 6E 65 7C 5F 5F 69 6E 6C 69 6E 65 5F 5F 29 5C 5C 62 5C 5C 73 2A
29 2A 22 3B 0A 20 20 69 66 20 28 24 64 6F 5F 6B 65 65 70 5F 64 65 65 70
5F 63 6F 6E 73 74 29 20 7B 09 23 20 4B 65 65 70 20 64 69 66 66 65 72 65
6E 74 20 63 6F 6D 70 69 6C 65 64 20 2F 52 45 78 65 6E 2F 6F 20 73 65 70
61 72 61 74 65 6C 79 21 0A 20 20 20 20 24 74 79 70 65 20 3D 7E 20 73 2F
24 69 67 6E 6F 72 65 5F 6D 6F 64 73 2F 2F 67 6F 3B 0A 20 20 7D 0A 20 20
65 6C 73 65 20 7B 0A 20 20 20 20 24 74 79 70 65 20 3D 7E 20 73 2F 24 69
67 6E 6F 72 65 5F 6D 6F 64 73 2F 2F 67 6F 3B 0A 20 20 7D 0A 20 20 24 74
79 70 65 20 3D 7E 20 73 2F 28 5B 5E 5C 73 5C 77 5D 29 2F 20 24 31 20 2F
67 3B 0A 20 20 24 74 79 70 65 20 3D 7E 20 73 2F 5C 73 2B 24 2F 2F 3B 0A
20 20 24 74 79 70 65 20 3D 7E 20 73 2F 5E 5C 73 2B 2F 2F 3B 0A 20 20 24
74 79 70 65 20 3D 7E 20 73 2F 5C 73 2B 2F 20 2F 67 3B 0A 20 20 24 74 79
70 65 20 3D 7E 20 73 2F 5C 2A 20 28 3F 3D 5C 2A 29 2F 2A 2F 67 3B 0A 20
20 24 74 79 70 65 20 3D 7E 20 73 2F 5C 2E 20 5C 2E 20 5C 2E 2F 2E 2E 2E
2F 67 3B 0A 20 20 24 74 79 70 65 20 3D 7E 20 73 2F 20 2C 2F 2C 2F 67 3B
0A 20 20 24 74 79 70 65 73 5F 73 65 65 6E 7B 24 74 79 70 65 7D 2B 2B 0A
20 20 20 20 75 6E 6C 65 73 73 20 24 74 79 70 65 20 65 71 20 27 2E 2E 2E
27 20 6F 72 20 24 74 79 70 65 20 65 71 20 27 76 6F 69 64 27 20 6F 72 20
24 73 74 64 5F 74 79 70 65 73 7B 24 74 79 70 65 7D 3B 0A 20 20 24 74 79
70 65 3B 0A 7D 0A 0A 6D 79 20 24 6E 65 65 64 5F 6F 70 61 71 75 65 3B 0A
0A 73 75 62 20 61 73 73 69 67 6E 5F 74 79 70 65 6D 61 70 5F 65 6E 74 72
79 20 7B 0A 20 20 6D 79 20 24 74 79 70 65 20 3D 20 73 68 69 66 74 3B 0A
20 20 6D 79 20 24 6F 74 79 70 65 20 3D 20 24 74 79 70 65 3B 0A 20 20 6D
79 20 24 65 6E 74 72 79 3B 0A 20 20 69 66 20 28 24 74 6D 61 73 6B 20 61
6E 64 20 24 74 79 70 65 20 3D 7E 20 2F 24 74 6D 61 73 6B 2F 29 20 7B 0A
20 20 20 20 70 72 69 6E 74 20 22 54 79 70 65 20 24 74 79 70 65 20 6D 61
74 63 68 65 73 20 2D 6F 20 6D 61 73 6B 5C 6E 22 20 69 66 20 24 6F 70 74
5F 64 3B 0A 20 20 20 20 24 65 6E 74 72 79 20 3D 20 28 74 64 5F 69 73 5F
73 74 72 75 63 74 28 24 74 79 70 65 29 20 3F 20 22 54 5F 4F 50 41 51 55
45 5F 53 54 52 55 43 54 22 20 3A 20 22 54 5F 50 54 52 4F 42 4A 22 29 3B
0A 20 20 7D 0A 20 20 65 6C 73 69 66 20 28 24 74 79 70 65 64 65 66 5F 72
65 78 20 61 6E 64 20 24 74 79 70 65 20 3D 7E 20 73 2F 28 24 74 79 70 65
64 65 66 5F 72 65 78 29 2F 24 74 79 70 65 64 65 66 73 5F 70 72 65 7B 24
31 7D 2F 67 6F 29 20 7B 0A 20 20 20 20 24 74 79 70 65 20 3D 20 6E 6F 72
6D 61 6C 69 7A 65 5F 74 79 70 65 20 24 74 79 70 65 3B 0A 20 20 20 20 70
72 69 6E 74 20 22 54 79 70 65 20 6D 75 74 61 74 69 6F 6E 20 76 69 61 20
74 79 70 65 64 65 66 73 3A 20 24 6F 74 79 70 65 20 3D 3D 3E 20 24 74 79
70 65 5C 6E 22 20 69 66 20 24 6F 70 74 5F 64 3B 0A 20 20 20 20 24 65 6E
74 72 79 20 3D 20 61 73 73 69 67 6E 5F 74 79 70 65 6D 61 70 5F 65 6E 74
72 79 28 24 74 79 70 65 29 3B 0A 20 20 7D 0A 20 20 23 20 58 58 58 20 67
6F 6F 64 20 64 6F 20 62 65 74 74 65 72 20 69 66 20 6F 75 72 20 55 56 20
68 61 70 70 65 6E 73 20 74 6F 20 62 65 20 6C 6F 6E 67 20 6C 6F 6E 67 0A
20 20 72 65 74 75 72 6E 20 22 54 5F 4E 56 22 20 69 66 20 24 74 79 70 65
20 3D 7E 20 2F 5E 28 75 6E 73 69 67 6E 65 64 5C 73 2B 29 3F 6C 6F 6E 67
5C 73 2B 28 6C 6F 6E 67 7C 64 6F 75 62 6C 65 29 5C 7A 2F 3B 0A 20 20 24
65 6E 74 72 79 20 7C 7C 3D 20 24 74 79 70 65 6D 61 70 7B 24 6F 74 79 70
65 7D 0A 20 20 20 20 7C 7C 20 28 74 64 5F 69 73 5F 73 74 72 75 63 74 28
24 74 79 70 65 29 20 3F 20 22 54 5F 4F 50 41 51 55 45 5F 53 54 52 55 43
54 22 20 3A 20 22 54 5F 50 54 52 4F 42 4A 22 29 3B 0A 20 20 24 74 79 70
65 6D 61 70 7B 24 6F 74 79 70 65 7D 20 3D 20 24 65 6E 74 72 79 3B 0A 20
20 24 6E 65 65 64 5F 6F 70 61 71 75 65 20 3D 20 31 20 69 66 20 24 65 6E
74 72 79 20 65 71 20 22 54 5F 4F 50 41 51 55 45 5F 53 54 52 55 43 54 22
3B 0A 20 20 72 65 74 75 72 6E 20 24 65 6E 74 72 79 3B 0A 7D 0A 0A 66 6F
72 20 28 40 76 64 65 63 6C 73 29 20 7B 0A 20 20 70 72 69 6E 74 5F 74 69
65 76 61 72 5F 78 73 75 62 73 28 5C 2A 58 53 2C 20 24 5F 2C 20 24 76 64
65 63 6C 5F 68 61 73 68 7B 24 5F 7D 29 3B 0A 7D 0A 0A 69 66 20 28 24 6F
70 74 5F 78 29 20 7B 0A 20 20 66 6F 72 20 6D 79 20 24 64 65 63 6C 20 28
40 24 66 64 65 63 6C 73 5F 70 61 72 73 65 64 29 20 7B 20 70 72 69 6E 74
5F 64 65 63 6C 28 5C 2A 58 53 2C 20 24 64 65 63 6C 29 20 7D 0A 20 20 69
66 20 28 24 6F 70 74 5F 61 29 20 7B 0A 20 20 20 20 77 68 69 6C 65 20 28
6D 79 28 24 6E 61 6D 65 2C 20 24 73 74 72 75 63 74 29 20 3D 20 65 61 63
68 20 25 73 74 72 75 63 74 73 29 20 7B 0A 20 20 20 20 20 20 70 72 69 6E
74 5F 61 63 63 65 73 73 6F 72 73 28 5C 2A 58 53 2C 20 24 6E 61 6D 65 2C
20 24 73 74 72 75 63 74 29 3B 0A 20 20 20 20 7D 0A 20 20 7D 0A 7D 0A 0A
63 6C 6F 73 65 20 58 53 3B 0A 0A 69 66 20 28 25 74 79 70 65 73 5F 73 65
65 6E 29 20 7B 0A 20 20 6D 79 20 24 74 79 70 65 3B 0A 20 20 77 61 72 6E
20 22 57 72 69 74 69 6E 67 20 24 65 78 74 24 6D 6F 64 70 6E 61 6D 65 2F
74 79 70 65 6D 61 70 5C 6E 22 3B 0A 20 20 6F 70 65 6E 20 54 4D 2C 20 22
3E 74 79 70 65 6D 61 70 22 20 6F 72 20 64 69 65 20 22 43 61 6E 6E 6F 74
20 6F 70 65 6E 20 74 79 70 65 6D 61 70 20 66 69 6C 65 20 66 6F 72 20 77
72 69 74 65 3A 20 24 21 22 3B 0A 0A 20 20 66 6F 72 20 24 74 79 70 65 20
28 73 6F 72 74 20 6B 65 79 73 20 25 74 79 70 65 73 5F 73 65 65 6E 29 20
7B 0A 20 20 20 20 6D 79 20 24 65 6E 74 72 79 20 3D 20 61 73 73 69 67 6E
5F 74 79 70 65 6D 61 70 5F 65 6E 74 72 79 20 24 74 79 70 65 3B 0A 20 20
20 20 70 72 69 6E 74 20 54 4D 20 24 74 79 70 65 2C 20 22 5C 74 22 20 78
20 28 35 20 2D 20 69 6E 74 28 28 6C 65 6E 67 74 68 20 24 74 79 70 65 29
2F 38 29 29 2C 20 22 5C 74 24 65 6E 74 72 79 5C 6E 22 0A 20 20 7D 0A 0A
20 20 70 72 69 6E 74 20 54 4D 20 3C 3C 27 45 4F 50 27 20 69 66 20 24 6E
65 65 64 5F 6F 70 61 71 75 65 3B 20 23 20 4F 6C 64 65 72 20 50 65 72 6C
73 20 64 6F 20 6E 6F 74 20 68 61 76 65 20 63 6F 72 72 65 63 74 20 65 6E
74 72 79 0A 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23
23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23
23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23
23 23 23 23 23 23 23 23 23 0A 49 4E 50 55 54 0A 54 5F 4F 50 41 51 55 45
5F 53 54 52 55 43 54 0A 09 69 66 20 28 73 76 5F 64 65 72 69 76 65 64 5F
66 72 6F 6D 28 24 61 72 67 2C 20 5C 22 24 7B 6E 74 79 70 65 7D 5C 22 29
29 20 7B 0A 09 20 20 20 20 53 54 52 4C 45 4E 20 6C 65 6E 3B 0A 09 20 20
20 20 63 68 61 72 20 20 2A 73 20 3D 20 53 76 50 56 28 28 53 56 2A 29 53
76 52 56 28 24 61 72 67 29 2C 20 6C 65 6E 29 3B 0A 0A 09 20 20 20 20 69
66 20 28 6C 65 6E 20 21 3D 20 73 69 7A 65 6F 66 28 24 76 61 72 29 29 0A
09 09 63 72 6F 61 6B 28 5C 22 53 69 7A 65 20 25 64 20 6F 66 20 70 61 63
6B 65 64 20 64 61 74 61 20 21 3D 20 65 78 70 65 63 74 65 64 20 25 64 5C
22 2C 0A 09 09 09 6C 65 6E 2C 20 73 69 7A 65 6F 66 28 24 76 61 72 29 29
3B 0A 09 20 20 20 20 24 76 61 72 20 3D 20 2A 28 24 74 79 70 65 20 2A 29
73 3B 0A 09 7D 0A 09 65 6C 73 65 0A 09 20 20 20 20 63 72 6F 61 6B 28 5C
22 24 76 61 72 20 69 73 20 6E 6F 74 20 6F 66 20 74 79 70 65 20 24 7B 6E
74 79 70 65 7D 5C 22 29 0A 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23
23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23
23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23
23 23 23 23 23 23 23 23 23 23 23 23 23 23 0A 4F 55 54 50 55 54 0A 54 5F
4F 50 41 51 55 45 5F 53 54 52 55 43 54 0A 09 73 76 5F 73 65 74 72 65 66
5F 70 76 6E 28 24 61 72 67 2C 20 5C 22 24 7B 6E 74 79 70 65 7D 5C 22 2C
20 28 63 68 61 72 20 2A 29 26 24 76 61 72 2C 20 73 69 7A 65 6F 66 28 24
76 61 72 29 29 3B 0A 45 4F 50 0A 0A 20 20 63 6C 6F 73 65 20 54 4D 20 6F
72 20 64 69 65 20 22 43 61 6E 6E 6F 74 20 63 6C 6F 73 65 20 74 79 70 65
6D 61 70 20 66 69 6C 65 20 66 6F 72 20 77 72 69 74 65 3A 20 24 21 22 3B
0A 7D 0A 0A 7D 20 23 20 69 66 28 20 21 20 24 6F 70 74 5F 58 20 29 0A 0A
77 61 72 6E 20 22 57 72 69 74 69 6E 67 20 24 65 78 74 24 6D 6F 64 70 6E
61 6D 65 2F 4D 61 6B 65 66 69 6C 65 2E 50 4C 5C 6E 22 3B 0A 6F 70 65 6E
28 50 4C 2C 20 22 3E 4D 61 6B 65 66 69 6C 65 2E 50 4C 22 29 20 7C 7C 20
64 69 65 20 22 43 61 6E 27 74 20 63 72 65 61 74 65 20 24 65 78 74 24 6D
6F 64 70 6E 61 6D 65 2F 4D 61 6B 65 66 69 6C 65 2E 50 4C 3A 20 24 21 5C
6E 22 3B 0A 0A 6D 79 20 24 70 72 65 72 65 71 5F 70 6D 20 3D 20 27 27 3B
0A 0A 69 66 20 28 20 24 63 6F 6D 70 61 74 5F 76 65 72 73 69 6F 6E 20 3C
20 35 2E 30 30 37 30 32 20 61 6E 64 20 24 6E 65 77 5F 74 65 73 74 20 29
0A 7B 0A 20 20 24 70 72 65 72 65 71 5F 70 6D 20 2E 3D 20 71 25 27 54 65
73 74 3A 3A 4D 6F 72 65 27 20 20 3D 3E 20 20 30 2C 20 25 3B 0A 7D 0A 0A
69 66 20 28 20 24 63 6F 6D 70 61 74 5F 76 65 72 73 69 6F 6E 20 3C 20 35
2E 30 30 36 30 30 20 61 6E 64 20 21 24 6F 70 74 5F 58 20 61 6E 64 20 24
75 73 65 5F 78 73 6C 6F 61 64 65 72 29 0A 7B 0A 20 20 24 70 72 65 72 65
71 5F 70 6D 20 2E 3D 20 71 25 27 58 53 4C 6F 61 64 65 72 27 20 20 3D 3E
20 20 30 2C 20 25 3B 0A 7D 0A 0A 70 72 69 6E 74 20 50 4C 20 3C 3C 22 45
4E 44 22 3B 0A 75 73 65 20 24 63 6F 6D 70 61 74 5F 76 65 72 73 69 6F 6E
3B 0A 75 73 65 20 45 78 74 55 74 69 6C 73 3A 3A 4D 61 6B 65 4D 61 6B 65
72 3B 0A 23 20 53 65 65 20 6C 69 62 2F 45 78 74 55 74 69 6C 73 2F 4D 61
6B 65 4D 61 6B 65 72 2E 70 6D 20 66 6F 72 20 64 65 74 61 69 6C 73 20 6F
66 20 68 6F 77 20 74 6F 20 69 6E 66 6C 75 65 6E 63 65 0A 23 20 74 68 65
20 63 6F 6E 74 65 6E 74 73 20 6F 66 20 74 68 65 20 4D 61 6B 65 66 69 6C
65 20 74 68 61 74 20 69 73 20 77 72 69 74 74 65 6E 2E 0A 57 72 69 74 65
4D 61 6B 65 66 69 6C 65 28 0A 20 20 20 20 4E 41 4D 45 20 20 20 20 20 20
20 20 20 20 20 20 20 20 3D 3E 20 27 24 6D 6F 64 75 6C 65 27 2C 0A 20 20
20 20 56 45 52 53 49 4F 4E 5F 46 52 4F 4D 20 20 20 20 20 20 3D 3E 20 27
24 6D 6F 64 70 6D 6E 61 6D 65 27 2C 20 23 20 66 69 6E 64 73 20 5C 24 56
45 52 53 49 4F 4E 0A 20 20 20 20 50 52 45 52 45 51 5F 50 4D 20 20 20 20
20 20 20 20 20 3D 3E 20 7B 24 70 72 65 72 65 71 5F 70 6D 7D 2C 20 23 20
65 2E 67 2E 2C 20 4D 6F 64 75 6C 65 3A 3A 4E 61 6D 65 20 3D 3E 20 31 2E
31 0A 20 20 20 20 28 5C 24 5D 20 3E 3D 20 35 2E 30 30 35 20 3F 20 20 20
20 20 23 23 20 41 64 64 20 74 68 65 73 65 20 6E 65 77 20 6B 65 79 77 6F
72 64 73 20 73 75 70 70 6F 72 74 65 64 20 73 69 6E 63 65 20 35 2E 30 30
35 0A 20 20 20 20 20 20 28 41 42 53 54 52 41 43 54 5F 46 52 4F 4D 20 20
3D 3E 20 27 24 6D 6F 64 70 6D 6E 61 6D 65 27 2C 20 23 20 72 65 74 72 69
65 76 65 20 61 62 73 74 72 61 63 74 20 66 72 6F 6D 20 6D 6F 64 75 6C 65
0A 20 20 20 20 20 20 20 41 55 54 48 4F 52 20 20 20 20 20 20 20 20 20 3D
3E 20 27 24 61 75 74 68 6F 72 20 3C 24 65 6D 61 69 6C 3E 27 29 20 3A 20
28 29 29 2C 0A 45 4E 44 0A 69 66 20 28 21 24 6F 70 74 5F 58 29 20 7B 20
23 20 70 72 69 6E 74 20 43 20 73 74 75 66 66 2C 20 75 6E 6C 65 73 73 20
58 53 20 69 73 20 64 69 73 61 62 6C 65 64 0A 20 20 24 6F 70 74 5F 46 20
3D 20 27 27 20 75 6E 6C 65 73 73 20 64 65 66 69 6E 65 64 20 24 6F 70 74
5F 46 3B 0A 20 20 6D 79 20 24 49 20 3D 20 28 28 28 67 6C 6F 62 20 27 2A
2E 68 27 29 20 7C 7C 20 28 67 6C 6F 62 20 27 2A 2E 68 68 27 29 29 20 3F
20 27 2D 49 2E 27 20 3A 20 27 27 29 3B 0A 20 20 6D 79 20 24 49 68 65 6C
70 20 3D 20 28 24 49 20 3F 20 27 2D 49 2E 20 27 20 3A 20 27 27 29 3B 0A
20 20 6D 79 20 24 49 63 6F 6D 6D 65 6E 74 20 3D 20 28 24 49 20 3F 20 27
27 20 3A 20 3C 3C 45 4F 43 29 3B 0A 09 23 20 49 6E 73 65 72 74 20 2D 49
2E 20 69 66 20 79 6F 75 20 61 64 64 20 2A 2E 68 20 66 69 6C 65 73 20 6C
61 74 65 72 3A 0A 45 4F 43 0A 0A 20 20 70 72 69 6E 74 20 50 4C 20 3C 3C
45 4E 44 3B 0A 20 20 20 20 4C 49 42 53 20 20 20 20 20 20 20 20 20 20 20
20 20 20 3D 3E 20 5B 27 24 65 78 74 72 61 6C 69 62 73 27 5D 2C 20 23 20
65 2E 67 2E 2C 20 27 2D 6C 6D 27 0A 20 20 20 20 44 45 46 49 4E 45 20 20
20 20 20 20 20 20 20 20 20 20 3D 3E 20 27 24 6F 70 74 5F 46 27 2C 20 23
20 65 2E 67 2E 2C 20 27 2D 44 48 41 56 45 5F 53 4F 4D 45 54 48 49 4E 47
27 0A 24 49 63 6F 6D 6D 65 6E 74 20 20 20 20 49 4E 43 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 3D 3E 20 27 24 49 27 2C 20 23 20 65 2E 67 2E
2C 20 27 24 7B 49 68 65 6C 70 7D 2D 49 2F 75 73 72 2F 69 6E 63 6C 75 64
65 2F 6F 74 68 65 72 27 0A 45 4E 44 0A 0A 20 20 6D 79 20 24 43 20 3D 20
67 72 65 70 20 7B 24 5F 20 6E 65 20 22 24 6D 6F 64 66 6E 61 6D 65 2E 63
22 7D 0A 20 20 20 20 28 67 6C 6F 62 20 27 2A 2E 63 27 29 2C 20 28 67 6C
6F 62 20 27 2A 2E 63 63 27 29 2C 20 28 67 6C 6F 62 20 27 2A 2E 43 27 29
3B 0A 20 20 6D 79 20 24 43 70 72 65 20 3D 20 28 24 43 20 3F 20 27 27 20
3A 20 27 23 20 27 29 3B 0A 20 20 6D 79 20 24 43 63 6F 6D 6D 65 6E 74 20
3D 20 28 24 43 20 3F 20 27 27 20 3A 20 3C 3C 45 4F 43 29 3B 0A 09 23 20
55 6E 2D 63 6F 6D 6D 65 6E 74 20 74 68 69 73 20 69 66 20 79 6F 75 20 61
64 64 20 43 20 66 69 6C 65 73 20 74 6F 20 6C 69 6E 6B 20 77 69 74 68 20
6C 61 74 65 72 3A 0A 45 4F 43 0A 0A 20 20 70 72 69 6E 74 20 50 4C 20 3C
3C 45 4E 44 3B 0A 24 43 63 6F 6D 6D 65 6E 74 20 20 20 20 24 7B 43 70 72
65 7D 4F 42 4A 45 43 54 20 20 20 20 20 20 20 20 20 20 20 20 3D 3E 20 27
5C 24 28 4F 5F 46 49 4C 45 53 29 27 2C 20 23 20 6C 69 6E 6B 20 61 6C 6C
20 74 68 65 20 43 20 66 69 6C 65 73 20 74 6F 6F 0A 45 4E 44 0A 7D 20 23
20 27 20 23 20 47 72 72 0A 70 72 69 6E 74 20 50 4C 20 22 29 3B 5C 6E 22
3B 0A 69 66 20 28 21 24 6F 70 74 5F 63 29 20 7B 0A 20 20 6D 79 20 24 67
65 6E 65 72 61 74 65 5F 63 6F 64 65 20 3D 0A 20 20 20 20 57 72 69 74 65
4D 61 6B 65 66 69 6C 65 53 6E 69 70 70 65 74 20 28 20 43 5F 46 49 4C 45
20 3D 3E 20 20 20 20 20 20 20 24 63 6F 6E 73 74 73 63 66 6E 61 6D 65 2C
0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 58 53 5F 46 49 4C 45 20 3D 3E 20 20 20 20 20 20 24 63 6F 6E
73 74 73 78 73 66 6E 61 6D 65 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 45 46 41 55 4C 54 5F 54
59 50 45 20 3D 3E 20 24 6F 70 74 5F 74 2C 0A 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4E 41 4D 45 20 3D
3E 20 20 20 20 20 20 20 20 20 24 6D 6F 64 75 6C 65 2C 0A 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4E 41
4D 45 53 20 3D 3E 20 20 20 20 20 20 20 20 5C 40 63 6F 6E 73 74 5F 6E 61
6D 65 73 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 3B
0A 20 20 70 72 69 6E 74 20 50 4C 20 3C 3C 22 45 4E 44 22 3B 0A 69 66 20
20 28 65 76 61 6C 20 7B 72 65 71 75 69 72 65 20 45 78 74 55 74 69 6C 73
3A 3A 43 6F 6E 73 74 61 6E 74 3B 20 31 7D 29 20 7B 0A 20 20 23 20 49 66
20 79 6F 75 20 65 64 69 74 20 74 68 65 73 65 20 64 65 66 69 6E 69 74 69
6F 6E 73 20 74 6F 20 63 68 61 6E 67 65 20 74 68 65 20 63 6F 6E 73 74 61
6E 74 73 20 75 73 65 64 20 62 79 20 74 68 69 73 20 6D 6F 64 75 6C 65 2C
0A 20 20 23 20 79 6F 75 20 77 69 6C 6C 20 6E 65 65 64 20 74 6F 20 75 73
65 20 74 68 65 20 67 65 6E 65 72 61 74 65 64 20 24 63 6F 6E 73 74 73 63
66 6E 61 6D 65 20 61 6E 64 20 24 63 6F 6E 73 74 73 78 73 66 6E 61 6D 65
0A 20 20 23 20 66 69 6C 65 73 20 74 6F 20 72 65 70 6C 61 63 65 20 74 68
65 69 72 20 22 66 61 6C 6C 62 61 63 6B 22 20 63 6F 75 6E 74 65 72 70 61
72 74 73 20 62 65 66 6F 72 65 20 64 69 73 74 72 69 62 75 74 69 6E 67 20
79 6F 75 72 0A 20 20 23 20 63 68 61 6E 67 65 73 2E 0A 24 67 65 6E 65 72
61 74 65 5F 63 6F 64 65 0A 7D 0A 65 6C 73 65 20 7B 0A 20 20 75 73 65 20
46 69 6C 65 3A 3A 43 6F 70 79 3B 0A 20 20 75 73 65 20 46 69 6C 65 3A 3A
53 70 65 63 3B 0A 20 20 66 6F 72 65 61 63 68 20 6D 79 20 5C 24 66 69 6C
65 20 28 27 24 63 6F 6E 73 74 73 63 66 6E 61 6D 65 27 2C 20 27 24 63 6F
6E 73 74 73 78 73 66 6E 61 6D 65 27 29 20 7B 0A 20 20 20 20 6D 79 20 5C
24 66 61 6C 6C 62 61 63 6B 20 3D 20 46 69 6C 65 3A 3A 53 70 65 63 2D 3E
63 61 74 66 69 6C 65 28 27 24 66 61 6C 6C 62 61 63 6B 64 69 72 6E 61 6D
65 27 2C 20 5C 24 66 69 6C 65 29 3B 0A 20 20 20 20 63 6F 70 79 20 28 5C
24 66 61 6C 6C 62 61 63 6B 2C 20 5C 24 66 69 6C 65 29 20 6F 72 20 64 69
65 20 22 43 61 6E 27 74 20 63 6F 70 79 20 5C 24 66 61 6C 6C 62 61 63 6B
20 74 6F 20 5C 24 66 69 6C 65 3A 20 5C 24 21 22 3B 0A 20 20 7D 0A 7D 0A
45 4E 44 0A 0A 20 20 65 76 61 6C 20 24 67 65 6E 65 72 61 74 65 5F 63 6F
64 65 3B 0A 20 20 69 66 20 28 24 40 29 20 7B 0A 20 20 20 20 77 61 72 6E
20 3C 3C 22 45 4F 4D 22 3B 0A 41 74 74 65 6D 70 74 69 6E 67 20 74 6F 20
74 65 73 74 20 63 6F 6E 73 74 61 6E 74 20 63 6F 64 65 20 69 6E 20 24 65
78 74 24 6D 6F 64 70 6E 61 6D 65 2F 4D 61 6B 65 66 69 6C 65 2E 50 4C 3A
0A 24 67 65 6E 65 72 61 74 65 5F 63 6F 64 65 0A 5F 5F 45 4E 44 5F 5F 0A
67 61 76 65 20 75 6E 65 78 70 65 63 74 65 64 20 65 72 72 6F 72 20 24 40
0A 50 6C 65 61 73 65 20 72 65 70 6F 72 74 20 74 68 65 20 63 69 72 63 75
6D 73 74 61 6E 63 65 73 20 6F 66 20 74 68 69 73 20 62 75 67 20 69 6E 20
68 32 78 73 20 76 65 72 73 69 6F 6E 20 24 48 32 58 53 5F 56 45 52 53 49
4F 4E 0A 75 73 69 6E 67 20 74 68 65 20 70 65 72 6C 62 75 67 20 73 63 72
69 70 74 2E 0A 45 4F 4D 0A 20 20 7D 20 65 6C 73 65 20 7B 0A 20 20 20 20
6D 79 20 24 66 61 69 6C 3B 0A 0A 20 20 20 20 66 6F 72 65 61 63 68 20 6D
79 20 24 66 69 6C 65 20 28 24 63 6F 6E 73 74 73 63 66 6E 61 6D 65 2C 20
24 63 6F 6E 73 74 73 78 73 66 6E 61 6D 65 29 20 7B 0A 20 20 20 20 20 20
6D 79 20 24 66 61 6C 6C 62 61 63 6B 20 3D 20 46 69 6C 65 3A 3A 53 70 65
63 2D 3E 63 61 74 66 69 6C 65 28 24 66 61 6C 6C 62 61 63 6B 64 69 72 6E
61 6D 65 2C 20 24 66 69 6C 65 29 3B 0A 20 20 20 20 20 20 69 66 20 28 63
6F 6D 70 61 72 65 28 24 66 69 6C 65 2C 20 24 66 61 6C 6C 62 61 63 6B 29
29 20 7B 0A 20 20 20 20 20 20 20 20 77 61 72 6E 20 3C 3C 20 22 45 4F 4D
22 3B 0A 46 69 6C 65 73 20 22 24 65 78 74 24 6D 6F 64 70 6E 61 6D 65 2F
24 66 61 6C 6C 62 61 63 6B 64 69 72 6E 61 6D 65 2F 24 66 69 6C 65 22 20
61 6E 64 20 22 24 65 78 74 24 6D 6F 64 70 6E 61 6D 65 2F 24 66 69 6C 65
22 20 64 69 66 66 65 72 2E 0A 45 4F 4D 0A 20 20 20 20 20 20 20 20 24 66
61 69 6C 2B 2B 3B 0A 20 20 20 20 20 20 7D 0A 20 20 20 20 7D 0A 20 20 20
20 69 66 20 28 24 66 61 69 6C 29 20 7B 0A 20 20 20 20 20 20 77 61 72 6E
20 66 69 6C 6C 20 28 27 27 2C 27 27 2C 20 3C 3C 22 45 4F 4D 22 29 20 2E
20 22 5C 6E 22 3B 0A 49 74 20 61 70 70 65 61 72 73 20 74 68 61 74 20 74
68 65 20 63 6F 64 65 20 69 6E 20 24 65 78 74 24 6D 6F 64 70 6E 61 6D 65
2F 4D 61 6B 65 66 69 6C 65 2E 50 4C 20 64 6F 65 73 20 6E 6F 74 20 61 75
74 6F 67 65 6E 65 72 61 74 65 0A 74 68 65 20 66 69 6C 65 73 20 24 65 78
74 24 6D 6F 64 70 6E 61 6D 65 2F 24 63 6F 6E 73 74 73 63 66 6E 61 6D 65
20 61 6E 64 20 24 65 78 74 24 6D 6F 64 70 6E 61 6D 65 2F 24 63 6F 6E 73
74 73 78 73 66 6E 61 6D 65 0A 63 6F 72 72 65 63 74 6C 79 2E 0A 0A 50 6C
65 61 73 65 20 72 65 70 6F 72 74 20 74 68 65 20 63 69 72 63 75 6D 73 74
61 6E 63 65 73 20 6F 66 20 74 68 69 73 20 62 75 67 20 69 6E 20 68 32 78
73 20 76 65 72 73 69 6F 6E 20 24 48 32 58 53 5F 56 45 52 53 49 4F 4E 0A
75 73 69 6E 67 20 74 68 65 20 70 65 72 6C 62 75 67 20 73 63 72 69 70 74
2E 0A 45 4F 4D 0A 20 20 20 20 7D 20 65 6C 73 65 20 7B 0A 20 20 20 20 20
20 75 6E 6C 69 6E 6B 20 24 63 6F 6E 73 74 73 63 66 6E 61 6D 65 2C 20 24
63 6F 6E 73 74 73 78 73 66 6E 61 6D 65 3B 0A 20 20 20 20 7D 0A 20 20 7D
0A 7D 0A 63 6C 6F 73 65 28 50 4C 29 20 7C 7C 20 64 69 65 20 22 43 61 6E
27 74 20 63 6C 6F 73 65 20 24 65 78 74 24 6D 6F 64 70 6E 61 6D 65 2F 4D
61 6B 65 66 69 6C 65 2E 50 4C 3A 20 24 21 5C 6E 22 3B 0A 0A 23 20 43 72
65 61 74 65 20 61 20 73 69 6D 70 6C 65 20 52 45 41 44 4D 45 20 73 69 6E
63 65 20 74 68 69 73 20 69 73 20 61 20 43 50 41 4E 20 72 65 71 75 69 72
65 6D 65 6E 74 0A 23 20 61 6E 64 20 69 74 20 64 6F 65 73 6E 74 20 68 75
72 74 20 74 6F 20 68 61 76 65 20 6F 6E 65 0A 77 61 72 6E 20 22 57 72 69
74 69 6E 67 20 24 65 78 74 24 6D 6F 64 70 6E 61 6D 65 2F 52 45 41 44 4D
45 5C 6E 22 3B 0A 6F 70 65 6E 28 52 4D 2C 20 22 3E 52 45 41 44 4D 45 22
29 20 7C 7C 20 64 69 65 20 22 43 61 6E 27 74 20 63 72 65 61 74 65 20 24
65 78 74 24 6D 6F 64 70 6E 61 6D 65 2F 52 45 41 44 4D 45 3A 24 21 5C 6E
22 3B 0A 6D 79 20 24 74 68 69 73 79 65 61 72 20 3D 20 28 67 6D 74 69 6D
65 29 5B 35 5D 20 2B 20 31 39 30 30 3B 0A 6D 79 20 24 72 6D 68 65 61 64
20 3D 20 22 24 6D 6F 64 70 6E 61 6D 65 20 76 65 72 73 69 6F 6E 20 24 54
45 4D 50 4C 41 54 45 5F 56 45 52 53 49 4F 4E 22 3B 0A 6D 79 20 24 72 6D
68 65 61 64 65 71 20 3D 20 22 3D 22 20 78 20 6C 65 6E 67 74 68 28 24 72
6D 68 65 61 64 29 3B 0A 0A 6D 79 20 24 72 6D 5F 70 72 65 72 65 71 3B 0A
0A 69 66 20 28 20 24 63 6F 6D 70 61 74 5F 76 65 72 73 69 6F 6E 20 3C 20
35 2E 30 30 37 30 32 20 61 6E 64 20 24 6E 65 77 5F 74 65 73 74 20 29 0A
7B 0A 20 20 20 24 72 6D 5F 70 72 65 72 65 71 20 3D 20 27 54 65 73 74 3A
3A 4D 6F 72 65 27 3B 0A 7D 0A 65 6C 73 65 0A 7B 0A 20 20 20 24 72 6D 5F
70 72 65 72 65 71 20 3D 20 27 62 6C 61 68 20 62 6C 61 68 20 62 6C 61 68
27 3B 0A 7D 0A 0A 70 72 69 6E 74 20 52 4D 20 3C 3C 5F 52 4D 45 4E 44 5F
3B 0A 24 72 6D 68 65 61 64 0A 24 72 6D 68 65 61 64 65 71 0A 0A 54 68 65
20 52 45 41 44 4D 45 20 69 73 20 75 73 65 64 20 74 6F 20 69 6E 74 72 6F
64 75 63 65 20 74 68 65 20 6D 6F 64 75 6C 65 20 61 6E 64 20 70 72 6F 76
69 64 65 20 69 6E 73 74 72 75 63 74 69 6F 6E 73 20 6F 6E 0A 68 6F 77 20
74 6F 20 69 6E 73 74 61 6C 6C 20 74 68 65 20 6D 6F 64 75 6C 65 2C 20 61
6E 79 20 6D 61 63 68 69 6E 65 20 64 65 70 65 6E 64 65 6E 63 69 65 73 20
69 74 20 6D 61 79 20 68 61 76 65 20 28 66 6F 72 0A 65 78 61 6D 70 6C 65
20 43 20 63 6F 6D 70 69 6C 65 72 73 20 61 6E 64 20 69 6E 73 74 61 6C 6C
65 64 20 6C 69 62 72 61 72 69 65 73 29 20 61 6E 64 20 61 6E 79 20 6F 74
68 65 72 20 69 6E 66 6F 72 6D 61 74 69 6F 6E 0A 74 68 61 74 20 73 68 6F
75 6C 64 20 62 65 20 70 72 6F 76 69 64 65 64 20 62 65 66 6F 72 65 20 74
68 65 20 6D 6F 64 75 6C 65 20 69 73 20 69 6E 73 74 61 6C 6C 65 64 2E 0A
0A 41 20 52 45 41 44 4D 45 20 66 69 6C 65 20 69 73 20 72 65 71 75 69 72
65 64 20 66 6F 72 20 43 50 41 4E 20 6D 6F 64 75 6C 65 73 20 73 69 6E 63
65 20 43 50 41 4E 20 65 78 74 72 61 63 74 73 20 74 68 65 0A 52 45 41 44
4D 45 20 66 69 6C 65 20 66 72 6F 6D 20 61 20 6D 6F 64 75 6C 65 20 64 69
73 74 72 69 62 75 74 69 6F 6E 20 73 6F 20 74 68 61 74 20 70 65 6F 70 6C
65 20 62 72 6F 77 73 69 6E 67 20 74 68 65 0A 61 72 63 68 69 76 65 20 63
61 6E 20 75 73 65 20 69 74 20 67 65 74 20 61 6E 20 69 64 65 61 20 6F 66
20 74 68 65 20 6D 6F 64 75 6C 65 73 20 75 73 65 73 2E 20 49 74 20 69 73
20 75 73 75 61 6C 6C 79 20 61 0A 67 6F 6F 64 20 69 64 65 61 20 74 6F 20
70 72 6F 76 69 64 65 20 76 65 72 73 69 6F 6E 20 69 6E 66 6F 72 6D 61 74
69 6F 6E 20 68 65 72 65 20 73 6F 20 74 68 61 74 20 70 65 6F 70 6C 65 20
63 61 6E 0A 64 65 63 69 64 65 20 77 68 65 74 68 65 72 20 66 69 78 65 73
20 66 6F 72 20 74 68 65 20 6D 6F 64 75 6C 65 20 61 72 65 20 77 6F 72 74
68 20 64 6F 77 6E 6C 6F 61 64 69 6E 67 2E 0A 0A 49 4E 53 54 41 4C 4C 41
54 49 4F 4E 0A 0A 54 6F 20 69 6E 73 74 61 6C 6C 20 74 68 69 73 20 6D 6F
64 75 6C 65 20 74 79 70 65 20 74 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 3A
0A 0A 20 20 20 70 65 72 6C 20 4D 61 6B 65 66 69 6C 65 2E 50 4C 0A 20 20
20 6D 61 6B 65 0A 20 20 20 6D 61 6B 65 20 74 65 73 74 0A 20 20 20 6D 61
6B 65 20 69 6E 73 74 61 6C 6C 0A 0A 44 45 50 45 4E 44 45 4E 43 49 45 53
0A 0A 54 68 69 73 20 6D 6F 64 75 6C 65 20 72 65 71 75 69 72 65 73 20 74
68 65 73 65 20 6F 74 68 65 72 20 6D 6F 64 75 6C 65 73 20 61 6E 64 20 6C
69 62 72 61 72 69 65 73 3A 0A 0A 20 20 24 72 6D 5F 70 72 65 72 65 71 0A
0A 43 4F 50 59 52 49 47 48 54 20 41 4E 44 20 4C 49 43 45 4E 43 45 0A 0A
50 75 74 20 74 68 65 20 63 6F 72 72 65 63 74 20 63 6F 70 79 72 69 67 68
74 20 61 6E 64 20 6C 69 63 65 6E 63 65 20 69 6E 66 6F 72 6D 61 74 69 6F
6E 20 68 65 72 65 2E 0A 0A 24 6C 69 63 65 6E 63 65 0A 0A 5F 52 4D 45 4E
44 5F 0A 63 6C 6F 73 65 28 52 4D 29 20 7C 7C 20 64 69 65 20 22 43 61 6E
27 74 20 63 6C 6F 73 65 20 24 65 78 74 24 6D 6F 64 70 6E 61 6D 65 2F 52
45 41 44 4D 45 3A 20 24 21 5C 6E 22 3B 0A 0A 6D 79 20 24 74 65 73 74 64
69 72 20 20 3D 20 22 74 22 3B 0A 6D 79 20 24 74 65 73 74 66 69 6C 65 20
3D 20 22 24 74 65 73 74 64 69 72 2F 24 6D 6F 64 70 6E 61 6D 65 2E 74 22
3B 0A 75 6E 6C 65 73 73 20 28 2D 64 20 22 24 74 65 73 74 64 69 72 22 29
20 7B 0A 20 20 6D 6B 64 69 72 20 22 24 74 65 73 74 64 69 72 22 20 6F 72
20 64 69 65 20 22 43 61 6E 6E 6F 74 20 6D 6B 64 69 72 20 24 74 65 73 74
64 69 72 3A 20 24 21 5C 6E 22 3B 0A 7D 0A 77 61 72 6E 20 22 57 72 69 74
69 6E 67 20 24 65 78 74 24 6D 6F 64 70 6E 61 6D 65 2F 24 74 65 73 74 66
69 6C 65 5C 6E 22 3B 0A 6D 79 20 24 74 65 73 74 73 20 3D 20 40 63 6F 6E
73 74 5F 6E 61 6D 65 73 20 3F 20 32 20 3A 20 31 3B 0A 0A 6F 70 65 6E 20
45 58 2C 20 22 3E 24 74 65 73 74 66 69 6C 65 22 20 6F 72 20 64 69 65 20
22 43 61 6E 27 74 20 63 72 65 61 74 65 20 24 65 78 74 24 6D 6F 64 70 6E
61 6D 65 2F 24 74 65 73 74 66 69 6C 65 3A 20 24 21 5C 6E 22 3B 0A 0A 70
72 69 6E 74 20 45 58 20 3C 3C 5F 45 4E 44 5F 3B 0A 23 20 42 65 66 6F 72
65 20 60 6D 61 6B 65 20 69 6E 73 74 61 6C 6C 27 20 69 73 20 70 65 72 66
6F 72 6D 65 64 20 74 68 69 73 20 73 63 72 69 70 74 20 73 68 6F 75 6C 64
20 62 65 20 72 75 6E 6E 61 62 6C 65 20 77 69 74 68 0A 23 20 60 6D 61 6B
65 20 74 65 73 74 27 2E 20 41 66 74 65 72 20 60 6D 61 6B 65 20 69 6E 73
74 61 6C 6C 27 20 69 74 20 73 68 6F 75 6C 64 20 77 6F 72 6B 20 61 73 20
60 70 65 72 6C 20 24 6D 6F 64 70 6E 61 6D 65 2E 74 27 0A 0A 23 23 23 23
23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 0A 0A 23
20 63 68 61 6E 67 65 20 27 74 65 73 74 73 20 3D 3E 20 24 74 65 73 74 73
27 20 74 6F 20 27 74 65 73 74 73 20 3D 3E 20 6C 61 73 74 5F 74 65 73 74
5F 74 6F 5F 70 72 69 6E 74 27 3B 0A 0A 5F 45 4E 44 5F 0A 0A 6D 79 20 24
74 65 73 74 5F 6D 6F 64 20 3D 20 27 54 65 73 74 3A 3A 4D 6F 72 65 27 3B
0A 0A 69 66 20 28 20 24 6F 6C 64 5F 74 65 73 74 20 6F 72 20 28 24 63 6F
6D 70 61 74 5F 76 65 72 73 69 6F 6E 20 3C 20 35 2E 30 30 37 20 61 6E 64
20 6E 6F 74 20 24 6E 65 77 5F 74 65 73 74 20 29 29 0A 7B 0A 20 20 6D 79
20 24 74 65 73 74 5F 6D 6F 64 20 3D 20 27 54 65 73 74 27 3B 0A 0A 20 20
70 72 69 6E 74 20 45 58 20 3C 3C 5F 45 4E 44 5F 3B 0A 75 73 65 20 54 65
73 74 3B 0A 42 45 47 49 4E 20 7B 20 70 6C 61 6E 20 74 65 73 74 73 20 3D
3E 20 24 74 65 73 74 73 20 7D 3B 0A 75 73 65 20 24 6D 6F 64 75 6C 65 3B
0A 6F 6B 28 31 29 3B 20 23 20 49 66 20 77 65 20 6D 61 64 65 20 69 74 20
74 68 69 73 20 66 61 72 2C 20 77 65 27 72 65 20 6F 6B 2E 0A 0A 5F 45 4E
44 5F 0A 0A 20 20 20 69 66 20 28 40 63 6F 6E 73 74 5F 6E 61 6D 65 73 29
20 7B 0A 20 20 20 20 20 6D 79 20 24 63 6F 6E 73 74 5F 6E 61 6D 65 73 20
3D 20 6A 6F 69 6E 20 22 20 22 2C 20 40 63 6F 6E 73 74 5F 6E 61 6D 65 73
3B 0A 20 20 20 20 20 70 72 69 6E 74 20 45 58 20 3C 3C 27 5F 45 4E 44 5F
27 3B 0A 0A 6D 79 20 24 66 61 69 6C 3B 0A 66 6F 72 65 61 63 68 20 6D 79
20 24 63 6F 6E 73 74 6E 61 6D 65 20 28 71 77 28 0A 5F 45 4E 44 5F 0A 0A
20 20 20 20 20 70 72 69 6E 74 20 45 58 20 77 72 61 70 20 28 22 5C 74 22
2C 20 22 5C 74 22 2C 20 24 63 6F 6E 73 74 5F 6E 61 6D 65 73 29 3B 0A 20
20 20 20 20 70 72 69 6E 74 20 45 58 20 28 22 29 29 20 7B 5C 6E 22 29 3B
0A 0A 20 20 20 20 20 70 72 69 6E 74 20 45 58 20 3C 3C 5F 45 4E 44 5F 3B
0A 20 20 6E 65 78 74 20 69 66 20 28 65 76 61 6C 20 22 6D 79 20 5C 5C 5C
24 61 20 3D 20 5C 24 63 6F 6E 73 74 6E 61 6D 65 3B 20 31 22 29 3B 0A 20
20 69 66 20 28 5C 24 5C 40 20 3D 7E 20 2F 5E 59 6F 75 72 20 76 65 6E 64
6F 72 20 68 61 73 20 6E 6F 74 20 64 65 66 69 6E 65 64 20 24 6D 6F 64 75
6C 65 20 6D 61 63 72 6F 20 5C 24 63 6F 6E 73 74 6E 61 6D 65 2F 29 20 7B
0A 20 20 20 20 70 72 69 6E 74 20 22 23 20 70 61 73 73 3A 20 5C 24 5C 40
22 3B 0A 20 20 7D 20 65 6C 73 65 20 7B 0A 20 20 20 20 70 72 69 6E 74 20
22 23 20 66 61 69 6C 3A 20 5C 24 5C 40 22 3B 0A 20 20 20 20 5C 24 66 61
69 6C 20 3D 20 31 3B 0A 20 20 7D 0A 7D 0A 69 66 20 28 5C 24 66 61 69 6C
29 20 7B 0A 20 20 70 72 69 6E 74 20 22 6E 6F 74 20 6F 6B 20 32 5C 5C 6E
22 3B 0A 7D 20 65 6C 73 65 20 7B 0A 20 20 70 72 69 6E 74 20 22 6F 6B 20
32 5C 5C 6E 22 3B 0A 7D 0A 0A 5F 45 4E 44 5F 0A 20 20 7D 0A 7D 0A 65 6C
73 65 0A 7B 0A 20 20 70 72 69 6E 74 20 45 58 20 3C 3C 5F 45 4E 44 5F 3B
0A 75 73 65 20 54 65 73 74 3A 3A 4D 6F 72 65 20 74 65 73 74 73 20 3D 3E
20 24 74 65 73 74 73 3B 0A 42 45 47 49 4E 20 7B 20 75 73 65 5F 6F 6B 28
27 24 6D 6F 64 75 6C 65 27 29 20 7D 3B 0A 0A 5F 45 4E 44 5F 0A 0A 20 20
20 69 66 20 28 40 63 6F 6E 73 74 5F 6E 61 6D 65 73 29 20 7B 0A 20 20 20
20 20 6D 79 20 24 63 6F 6E 73 74 5F 6E 61 6D 65 73 20 3D 20 6A 6F 69 6E
20 22 20 22 2C 20 40 63 6F 6E 73 74 5F 6E 61 6D 65 73 3B 0A 20 20 20 20
20 70 72 69 6E 74 20 45 58 20 3C 3C 27 5F 45 4E 44 5F 27 3B 0A 0A 6D 79
20 24 66 61 69 6C 20 3D 20 30 3B 0A 66 6F 72 65 61 63 68 20 6D 79 20 24
63 6F 6E 73 74 6E 61 6D 65 20 28 71 77 28 0A 5F 45 4E 44 5F 0A 0A 20 20
20 20 20 70 72 69 6E 74 20 45 58 20 77 72 61 70 20 28 22 5C 74 22 2C 20
22 5C 74 22 2C 20 24 63 6F 6E 73 74 5F 6E 61 6D 65 73 29 3B 0A 20 20 20
20 20 70 72 69 6E 74 20 45 58 20 28 22 29 29 20 7B 5C 6E 22 29 3B 0A 0A
20 20 20 20 20 70 72 69 6E 74 20 45 58 20 3C 3C 5F 45 4E 44 5F 3B 0A 20
20 6E 65 78 74 20 69 66 20 28 65 76 61 6C 20 22 6D 79 20 5C 5C 5C 24 61
20 3D 20 5C 24 63 6F 6E 73 74 6E 61 6D 65 3B 20 31 22 29 3B 0A 20 20 69
66 20 28 5C 24 5C 40 20 3D 7E 20 2F 5E 59 6F 75 72 20 76 65 6E 64 6F 72
20 68 61 73 20 6E 6F 74 20 64 65 66 69 6E 65 64 20 24 6D 6F 64 75 6C 65
20 6D 61 63 72 6F 20 5C 24 63 6F 6E 73 74 6E 61 6D 65 2F 29 20 7B 0A 20
20 20 20 70 72 69 6E 74 20 22 23 20 70 61 73 73 3A 20 5C 24 5C 40 22 3B
0A 20 20 7D 20 65 6C 73 65 20 7B 0A 20 20 20 20 70 72 69 6E 74 20 22 23
20 66 61 69 6C 3A 20 5C 24 5C 40 22 3B 0A 20 20 20 20 5C 24 66 61 69 6C
20 3D 20 31 3B 0A 20 20 7D 0A 0A 7D 0A 0A 6F 6B 28 20 5C 24 66 61 69 6C
20 3D 3D 20 30 20 2C 20 27 43 6F 6E 73 74 61 6E 74 73 27 20 29 3B 0A 5F
45 4E 44 5F 0A 20 20 7D 0A 7D 0A 0A 70 72 69 6E 74 20 45 58 20 3C 3C 5F
45 4E 44 5F 3B 0A 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23
23 23 23 23 23 23 23 0A 0A 23 20 49 6E 73 65 72 74 20 79 6F 75 72 20 74
65 73 74 20 63 6F 64 65 20 62 65 6C 6F 77 2C 20 74 68 65 20 24 74 65 73
74 5F 6D 6F 64 20 6D 6F 64 75 6C 65 20 69 73 20 75 73 65 28 29 65 64 20
68 65 72 65 20 73 6F 20 72 65 61 64 0A 23 20 69 74 73 20 6D 61 6E 20 70
61 67 65 20 28 20 70 65 72 6C 64 6F 63 20 24 74 65 73 74 5F 6D 6F 64 20
29 20 66 6F 72 20 68 65 6C 70 20 77 72 69 74 69 6E 67 20 74 68 69 73 20
74 65 73 74 20 73 63 72 69 70 74 2E 0A 0A 5F 45 4E 44 5F 0A 0A 63 6C 6F
73 65 28 45 58 29 20 7C 7C 20 64 69 65 20 22 43 61 6E 27 74 20 63 6C 6F
73 65 20 24 65 78 74 24 6D 6F 64 70 6E 61 6D 65 2F 24 74 65 73 74 66 69
6C 65 3A 20 24 21 5C 6E 22 3B 0A 0A 75 6E 6C 65 73 73 20 28 24 6F 70 74
5F 43 29 20 7B 0A 20 20 77 61 72 6E 20 22 57 72 69 74 69 6E 67 20 24 65
78 74 24 6D 6F 64 70 6E 61 6D 65 2F 43 68 61 6E 67 65 73 5C 6E 22 3B 0A
20 20 24 22 20 3D 20 27 20 27 3B 0A 20 20 6F 70 65 6E 28 45 58 2C 20 22
3E 43 68 61 6E 67 65 73 22 29 20 7C 7C 20 64 69 65 20 22 43 61 6E 27 74
20 63 72 65 61 74 65 20 24 65 78 74 24 6D 6F 64 70 6E 61 6D 65 2F 43 68
61 6E 67 65 73 3A 20 24 21 5C 6E 22 3B 0A 20 20 40 41 52 47 53 20 3D 20
6D 61 70 20 7B 2F 5B 5C 73 5C 22 5C 27 5C 60 5C 24 2A 3F 5E 7C 26 3C 3E
5C 5B 5C 5D 5C 7B 5C 7D 5C 28 5C 29 5D 2F 20 3F 20 22 27 24 5F 27 22 20
3A 20 24 5F 7D 20 40 41 52 47 53 3B 0A 20 20 70 72 69 6E 74 20 45 58 20
3C 3C 45 4F 50 3B 0A 52 65 76 69 73 69 6F 6E 20 68 69 73 74 6F 72 79 20
66 6F 72 20 50 65 72 6C 20 65 78 74 65 6E 73 69 6F 6E 20 24 6D 6F 64 75
6C 65 2E 0A 0A 24 54 45 4D 50 4C 41 54 45 5F 56 45 52 53 49 4F 4E 20 20
40 7B 5B 73 63 61 6C 61 72 20 6C 6F 63 61 6C 74 69 6D 65 5D 7D 0A 5C 74
2D 20 6F 72 69 67 69 6E 61 6C 20 76 65 72 73 69 6F 6E 3B 20 63 72 65 61
74 65 64 20 62 79 20 68 32 78 73 20 24 48 32 58 53 5F 56 45 52 53 49 4F
4E 20 77 69 74 68 20 6F 70 74 69 6F 6E 73 0A 5C 74 5C 74 40 41 52 47 53
0A 0A 45 4F 50 0A 20 20 63 6C 6F 73 65 28 45 58 29 20 7C 7C 20 64 69 65
20 22 43 61 6E 27 74 20 63 6C 6F 73 65 20 24 65 78 74 24 6D 6F 64 70 6E
61 6D 65 2F 43 68 61 6E 67 65 73 3A 20 24 21 5C 6E 22 3B 0A 7D 0A 0A 77
61 72 6E 20 22 57 72 69 74 69 6E 67 20 24 65 78 74 24 6D 6F 64 70 6E 61
6D 65 2F 4D 41 4E 49 46 45 53 54 5C 6E 22 3B 0A 6F 70 65 6E 28 4D 41 4E
49 2C 27 3E 4D 41 4E 49 46 45 53 54 27 29 20 6F 72 20 64 69 65 20 22 43
61 6E 27 74 20 63 72 65 61 74 65 20 4D 41 4E 49 46 45 53 54 3A 20 24 21
22 3B 0A 6D 79 20 40 66 69 6C 65 73 20 3D 20 67 72 65 70 20 7B 20 2D 66
20 7D 20 28 3C 2A 3E 2C 20 3C 74 2F 2A 3E 2C 20 3C 24 66 61 6C 6C 62 61
63 6B 64 69 72 6E 61 6D 65 2F 2A 3E 2C 20 3C 24 6D 6F 64 70 6D 64 69 72
2F 2A 3E 29 3B 0A 69 66 20 28 21 40 66 69 6C 65 73 29 20 7B 0A 20 20 65
76 61 6C 20 7B 6F 70 65 6E 64 69 72 28 44 2C 27 2E 27 29 3B 7D 3B 0A 20
20 75 6E 6C 65 73 73 20 28 24 40 29 20 7B 20 40 66 69 6C 65 73 20 3D 20
72 65 61 64 64 69 72 28 44 29 3B 20 63 6C 6F 73 65 64 69 72 28 44 29 3B
20 7D 0A 7D 0A 69 66 20 28 21 40 66 69 6C 65 73 29 20 7B 20 40 66 69 6C
65 73 20 3D 20 6D 61 70 20 7B 63 68 6F 6D 70 20 26 26 20 24 5F 7D 20 60
6C 73 60 3B 20 7D 0A 69 66 20 28 24 5E 4F 20 65 71 20 27 56 4D 53 27 29
20 7B 0A 20 20 66 6F 72 65 61 63 68 20 28 40 66 69 6C 65 73 29 20 7B 0A
20 20 20 20 23 20 43 6C 69 70 20 74 72 61 69 6C 69 6E 67 20 27 2E 27 20
66 6F 72 20 70 6F 72 74 61 62 69 6C 69 74 79 20 2D 2D 20 6E 6F 6E 2D 56
4D 53 20 4F 53 73 20 64 6F 6E 27 74 20 65 78 70 65 63 74 20 69 74 0A 20
20 20 20 73 25 5C 2E 24 25 25 3B 0A 20 20 20 20 23 20 46 69 78 20 75 70
20 66 6F 72 20 63 61 73 65 2D 73 65 6E 73 69 74 69 76 65 20 66 69 6C 65
20 73 79 73 74 65 6D 73 0A 20 20 20 20 73 2F 24 6D 6F 64 66 6E 61 6D 65
2F 24 6D 6F 64 66 6E 61 6D 65 2F 69 20 26 26 20 6E 65 78 74 3B 0A 20 20
20 20 24 5F 20 3D 20 22 5C 55 24 5F 22 20 69 66 20 24 5F 20 65 71 20 27
6D 61 6E 69 66 65 73 74 27 20 6F 72 20 24 5F 20 65 71 20 27 63 68 61 6E
67 65 73 27 3B 0A 20 20 20 20 24 5F 20 3D 20 27 4D 61 6B 65 66 69 6C 65
2E 50 4C 27 20 69 66 20 24 5F 20 65 71 20 27 6D 61 6B 65 66 69 6C 65 2E
70 6C 27 3B 0A 20 20 7D 0A 7D 0A 70 72 69 6E 74 20 4D 41 4E 49 20 6A 6F
69 6E 28 22 5C 6E 22 2C 40 66 69 6C 65 73 29 2C 20 22 5C 6E 22 3B 0A 63
6C 6F 73 65 20 4D 41 4E 49 3B 0A 		#!/usr/bin/perl     eval
 'exec /usr/bin/perl -S 
$0 ${1+"$@"}'  if $runni
ng_under_some_shell;  us
e warnings;  =head1 NAME
  h2xs - convert .h C he
ader files to Perl exten
sions  =head1 SYNOPSIS  
B<h2xs> [B<OPTIONS> ...]
 [headerfile ... [extra_
libraries]]  B<h2xs> B<-
h>|B<-?>|B<--help>  =hea
d1 DESCRIPTION  I<h2xs> 
builds a Perl extension 
from C header files.  Th
e extension will include
 functions which can be 
used to retrieve the val
ue of any #define statem
ent which was in the C h
eader files.  The I<modu
le_name> will be used fo
r the name of the extens
ion.  If module_name is 
not supplied then the na
me of the first header f
ile will be used, with t
he first character capit
alized.  If the extensio
n might need extra libra
ries, they should be inc
luded here.  The extensi
on Makefile.PL will take
 care of checking whethe
r the libraries actually
 exist and how they shou
ld be loaded.  The extra
 libraries should be spe
cified in the form -lm -
lposix, etc, just as on 
the cc command line.  By
 default, the Makefile.P
L will search through th
e library path determine
d by Configure.  That pa
th can be augmented by i
ncluding arguments of th
e form B<-L/another/libr
ary/path> in the extra-l
ibraries argument.  =hea
d1 OPTIONS  =over 5  =it
em B<-A>, B<--omit-autol
oad>  Omit all autoload 
facilities.  This is the
 same as B<-c> but also 
removes the S<C<use Auto
Loader>> statement from 
the .pm file.  =item B<-
B>, B<--beta-version>  U
se an alpha/beta style v
ersion number.  Causes v
ersion number to be "0.0
0_01" unless B<-v> is sp
ecified.  =item B<-C>, B
<--omit-changes>  Omits 
creation of the F<Change
s> file, and adds a HIST
ORY section to the POD t
emplate.  =item B<-F>, B
<--cpp-flags>=I<addflags
>  Additional flags to s
pecify to C preprocessor
 when scanning header fo
r function declarations.
  Writes these options i
n the generated F<Makefi
le.PL> too.  =item B<-M>
, B<--func-mask>=I<regul
ar expression>  selects 
functions/macros to proc
ess.  =item B<-O>, B<--o
verwrite-ok>  Allows a p
re-existing extension di
rectory to be overwritte
n.  =item B<-P>, B<--omi
t-pod>  Omit the autogen
erated stub POD section.
  =item B<-X>, B<--omit-
XS>  Omit the XS portion
.  Used to generate temp
lates for a module which
 is not XS-based.  C<-c>
 and C<-f> are implicitl
y enabled.  =item B<-a>,
 B<--gen-accessors>  Gen
erate an accessor method
 for each element of str
ucts and unions. The gen
erated methods are named
 after the element name;
 will return the current
 value of the element if
 called without addition
al arguments; and will s
et the element to the su
pplied value (and return
 the new value) if calle
d with an additional arg
ument. Embedded structur
es and unions are return
ed as a pointer rather t
han the complete structu
re, to facilitate chaine
d calls.  These methods 
all apply to the Ptr typ
e for the structure; add
itionally two methods ar
e constructed for the st
ructure type itself, C<_
to_ptr> which returns a 
Ptr type pointing to the
 same structure, and a C
<new> method to construc
t and return a new struc
ture, initialised to zer
oes.  =item B<-b>, B<--c
ompat-version>=I<version
>  Generates a .pm file 
which is backwards compa
tible with the specified
 perl version.  For vers
ions < 5.6.0, the change
s are.     - no use of '
our' (uses 'use vars' in
stead)     - no 'use war
nings'  Specifying a com
patibility version highe
r than the version of pe
rl you are using to run 
h2xs will have no effect
.  If unspecified h2xs w
ill default to compatibi
lity with the version of
 perl you are using to r
un h2xs.  =item B<-c>, B
<--omit-constant>  Omit 
C<constant()> from the .
xs file and correspondin
g specialised C<AUTOLOAD
> from the .pm file.  =i
tem B<-d>, B<--debugging
>  Turn on debugging mes
sages.  =item B<-e>, B<-
-omit-enums>=[I<regular 
expression>]  If I<regul
ar expression> is not gi
ven, skip all constants 
that are defined in a C 
enumeration. Otherwise s
kip only those constants
 that are defined in an 
enum whose name matches 
I<regular expression>.  
Since I<regular expressi
on> is optional, make su
re that this switch is f
ollowed by at least one 
other switch if you omit
 I<regular expression> a
nd have some pending arg
uments such as header-fi
le names. This is ok:   
   h2xs -e -n Module::Fo
o foo.h  This is not ok:
      h2xs -n Module::Fo
o -e foo.h  In the latte
r, foo.h is taken as I<r
egular expression>.  =it
em B<-f>, B<--force>  Al
lows an extension to be 
created for a header eve
n if that header is not 
found in standard includ
e directories.  =item B<
-g>, B<--global>  Includ
e code for safely storin
g static data in the .xs
 file. Extensions that d
o no make use of static 
data can ignore this opt
ion.  =item B<-h>, B<-?>
, B<--help>  Print the u
sage, help and version f
or this h2xs and exit.  
=item B<-k>, B<--omit-co
nst-func>  For function 
arguments declared as C<
const>, omit the const a
ttribute in the generate
d XS code.  =item B<-m>,
 B<--gen-tied-var>  B<Ex
perimental>: for each va
riable declared in the h
eader file(s), declare a
 perl variable of the sa
me name magically tied t
o the C variable.  =item
 B<-n>, B<--name>=I<modu
le_name>  Specifies a na
me to be used for the ex
tension, e.g., S<-n RPC:
:DCE>  =item B<-o>, B<--
opaque-re>=I<regular exp
ression>  Use "opaque" d
ata type for the C types
 matched by the regular 
expression, even if thes
e types are C<typedef>-e
quivalent to types from 
typemaps.  Should not be
 used without B<-x>.  Th
is may be useful since, 
say, types which are C<t
ypedef>-equivalent to in
tegers may represent OS-
related handles, and one
 may want to work with t
hese handles in OO-way, 
as in C<$handle-E<gt>do_
something()>. Use C<-o .
> if you want to handle 
all the C<typedef>ed typ
es as opaque types.  The
 type-to-match is whitew
ashed (except for commas
, which have no whitespa
ce before them, and mult
iple C<*> which have no 
whitespace between them)
.  =item B<-p>, B<--remo
ve-prefix>=I<prefix>  Sp
ecify a prefix which sho
uld be removed from the 
Perl function names, e.g
., S<-p sec_rgy_> This s
ets up the XS B<PREFIX> 
keyword and removes the 
prefix from functions th
at are autoloaded via th
e C<constant()> mechanis
m.  =item B<-s>, B<--con
st-subs>=I<sub1,sub2>  C
reate a perl subroutine 
for the specified macros
 rather than autoload wi
th the constant() subrou
tine.  These macros are 
assumed to have a return
 type of B<char *>, e.g.
, S<-s sec_rgy_wildcard_
name,sec_rgy_wildcard_si
d>.  =item B<-t>, B<--de
fault-type>=I<type>  Spe
cify the internal type t
hat the constant() mecha
nism uses for macros. Th
e default is IV (signed 
integer).  Currently all
 macros found during the
 header scanning process
 will be assumed to have
 this type.  Future vers
ions of C<h2xs> may gain
 the ability to make edu
cated guesses.  =item B<
--use-new-tests>  When B
<--compat-version> (B<-b
>) is present the genera
ted tests will use C<Tes
t::More> rather than C<T
est> which is the defaul
t for versions before 5.
7.2 .   C<Test::More> wi
ll be added to PREREQ_PM
 in the generated C<Make
file.PL>.  =item B<--use
-old-tests>  Will force 
the generation of test c
ode that uses the older 
C<Test> module.  =item B
<--skip-exporter>  Do no
t use C<Exporter> and/or
 export any symbol.  =it
em B<--skip-ppport>  Do 
not use C<Devel::PPPort>
: no portability to olde
r version.  =item B<--sk
ip-autoloader>  Do not u
se the module C<AutoLoad
er>; but keep the consta
nt() function and C<sub 
AUTOLOAD> for constants.
  =item B<--skip-strict>
  Do not use the pragma 
C<strict>.  =item B<--sk
ip-warnings>  Do not use
 the pragma C<warnings>.
  =item B<-v>, B<--versi
on>=I<version>  Specify 
a version number for thi
s extension.  This versi
on number is added to th
e templates.  The defaul
t is 0.01, or 0.00_01 if
 C<-B> is specified. The
 version specified shoul
d be numeric.  =item B<-
x>, B<--autogen-xsubs>  
Automatically generate X
SUBs basing on function 
declarations in the head
er file.  The package C<
C::Scan> should be insta
lled. If this option is 
specified, the name of t
he header file may look 
like C<NAME1,NAME2>. In 
this case NAME1 is used 
instead of the specified
 string, but XSUBs are e
mitted only for the decl
arations included from f
ile NAME2.  Note that so
me types of arguments/re
turn-values for function
s may result in XSUB-dec
larations/typemap-entrie
s which need hand-editin
g. Such may be objects w
hich cannot be converted
 from/to a pointer (like
 C<long long>), pointers
 to functions, or arrays
.  See also the section 
on L<LIMITATIONS of B<-x
>>.  =back  =head1 EXAMP
LES       # Default beha
vior, extension is Ruser
s     h2xs rpcsvc/rusers
      # Same, but extens
ion is RUSERS     h2xs -
n RUSERS rpcsvc/rusers  
    # Extension is rpcsv
c::rusers. Still finds <
rpcsvc/rusers.h>     h2x
s rpcsvc::rusers      # 
Extension is ONC::RPC.  
Still finds <rpcsvc/ruse
rs.h>     h2xs -n ONC::R
PC rpcsvc/rusers      # 
Without constant() or AU
TOLOAD     h2xs -c rpcsv
c/rusers      # Creates 
templates for an extensi
on named RPC     h2xs -c
fn RPC      # Extension 
is ONC::RPC.     h2xs -c
fn ONC::RPC      # Exten
sion is Lib::Foo which w
orks at least with Perl5
.005_03.     # Constants
 are created for all #de
fines and enums h2xs can
 find     # in foo.h.   
  h2xs -b 5.5.3 -n Lib::
Foo foo.h      # Extensi
on is Lib::Foo which wor
ks at least with Perl5.0
05_03.     # Constants a
re created for all #defi
nes but only for enums  
   # whose names do not 
start with 'bar_'.     h
2xs -b 5.5.3 -e '^bar_' 
-n Lib::Foo foo.h      #
 Makefile.PL will look f
or library -lrpc in     
# additional directory /
opt/net/lib     h2xs rpc
svc/rusers -L/opt/net/li
b -lrpc      # Extension
 is DCE::rgynbase     # 
prefix "sec_rgy_" is dro
pped from perl function 
names     h2xs -n DCE::r
gynbase -p sec_rgy_ dce/
rgynbase      # Extensio
n is DCE::rgynbase     #
 prefix "sec_rgy_" is dr
opped from perl function
 names     # subroutines
 are created for sec_rgy
_wildcard_name and     #
 sec_rgy_wildcard_sid   
  h2xs -n DCE::rgynbase 
-p sec_rgy_ \     -s sec
_rgy_wildcard_name,sec_r
gy_wildcard_sid dce/rgyn
base      # Make XS with
out defines in perl.h, b
ut with function declara
tions     # visible from
 perl.h. Name of the ext
ension is perl1.     # W
hen scanning perl.h, def
ine -DEXT=extern -DdEXT=
 -DINIT(x)=     # Extra 
backslashes below becaus
e the string is passed t
o shell.     # Note that
 a directory with perl h
eader files would     # 
 be added automatically 
to include path.     h2x
s -xAn perl1 -F "-DEXT=e
xtern -DdEXT= -DINIT\(x\
)=" perl.h      # Same w
ith function declaration
 in proto.h as visible f
rom perl.h.     h2xs -xA
n perl2 perl.h,proto.h  
    # Same but select on
ly functions which match
 /^av_/     h2xs -M '^av
_' -xAn perl2 perl.h,pro
to.h      # Same but tre
at SV* etc as "opaque" t
ypes     h2xs -o '^[S]V 
\*$' -M '^av_' -xAn perl
2 perl.h,proto.h  =head2
 Extension based on F<.h
> and F<.c> files  Suppo
se that you have some C 
files implementing some 
functionality, and the c
orresponding header file
s.  How to create an ext
ension which makes this 
functionality accessible
 in Perl?  The example b
elow assumes that the he
ader files are F<interfa
ce_simple.h> and I<inter
face_hairy.h>, and you w
ant the perl module be n
amed as C<Ext::Ension>. 
 If you need some prepro
cessor directives and/or
 linking with external l
ibraries, see the flags 
C<-F>, C<-L> and C<-l> i
n L<"OPTIONS">.  =over  
=item Find the directory
 name  Start with a dumm
y run of h2xs:    h2xs -
Afn Ext::Ension  The onl
y purpose of this step i
s to create the needed d
irectories, and let you 
know the names of these 
directories.  From the o
utput you can see that t
he directory for the ext
ension is F<Ext/Ension>.
  =item Copy C files  Co
py your header files and
 C files to this directo
ry F<Ext/Ension>.  =item
 Create the extension  R
un h2xs, overwriting old
er autogenerated files: 
   h2xs -Oxan Ext::Ensio
n interface_simple.h int
erface_hairy.h  h2xs loo
ks for header files I<af
ter> changing to the ext
ension directory, so it 
will find your header fi
les OK.  =item Archive a
nd test  As usual, run  
  cd Ext/Ension   perl M
akefile.PL   make dist  
 make   make test  =item
 Hints  It is important 
to do C<make dist> as ea
rly as possible.  This w
ay you can easily merge(
1) your changes to autog
enerated files if you de
cide to edit your C<.h> 
files and rerun h2xs.  D
o not forget to edit the
 documentation in the ge
nerated F<.pm> file.  Co
nsider the autogenerated
 files as skeletons only
, you may invent better 
interfaces than what h2x
s could guess.  Consider
 this section as a guide
line only, some other op
tions of h2xs may better
 suit your needs.  =back
  =head1 ENVIRONMENT  No
 environment variables a
re used.  =head1 AUTHOR 
 Larry Wall and others  
=head1 SEE ALSO  L<perl>
, L<perlxstut>, L<ExtUti
ls::MakeMaker>, and L<Au
toLoader>.  =head1 DIAGN
OSTICS  The usual warnin
gs if it cannot read or 
write the files involved
.  =head1 LIMITATIONS of
 B<-x>  F<h2xs> would no
t distinguish whether an
 argument to a C functio
n which is of the form, 
say, C<int *>, is an inp
ut, output, or input/out
put parameter.  In parti
cular, argument declarat
ions of the form      in
t     foo(n)  int *n  sh
ould be better rewritten
 as      int     foo(n) 
int &n  if C<n> is an i
nput parameter.  Additio
nally, F<h2xs> has no fa
cilities to intuit that 
a function     int    fo
o(addr,l)  char *addr  i
nt   l  takes a pair of 
address and length of da
ta at this address, so i
t is better to rewrite t
his function as      int
     foo(sv)      SV *ad
dr  PREINIT:      STRLEN
 len;      char *s;  COD
E:      s = SvPV(sv,len)
;      RETVAL = foo(s, l
en);  OUTPUT:      RETVA
L  or alternately      s
tatic int     my_foo(SV 
*sv)     {  STRLEN len; 
char *s = SvPV(sv,len);
   return foo(s, len);  
   }      MODULE = foo P
ACKAGE = foo PREFIX = my
_      int     foo(sv) 
SV *sv  See L<perlxs> an
d L<perlxstut> for addit
ional details.  =cut  # 
' # Grr use strict;   my
( $H2XS_VERSION ) = ' $R
evision: 1.23 $ ' =~ /\$
Revision:\s+([^\s]+)/; m
y $TEMPLATE_VERSION = '0
.01'; my @ARGS = @ARGV; 
my $compat_version = $];
  use Getopt::Long; use 
Config; use Text::Wrap; 
$Text::Wrap::huge = 'ove
rflow'; $Text::Wrap::col
umns = 80; use ExtUtils:
:Constant qw (WriteConst
ants WriteMakefileSnippe
t autoload); use File::C
ompare; use File::Path; 
 sub usage {     warn "@
_\n" if @_;     die <<EO
FUSAGE; h2xs [OPTIONS ..
. ] [headerfile [extra_l
ibraries]] version: $H2X
S_VERSION OPTIONS:     -
A, --omit-autoload   Omi
t all autoloading facili
ties (implies -c).     -
B, --beta-version    Use
 beta \$VERSION of 0.00_
01 (ignored if -v).     
-C, --omit-changes    Om
it creating the Changes 
file, add HISTORY headin
g                       
    to stub POD.     -F,
 --cpp-flags       Addit
ional flags for C prepro
cessor/compile.     -M, 
--func-mask       Mask t
o select C functions/mac
ros                     
      (default is select
 all).     -O, --overwri
te-ok    Allow overwriti
ng of a pre-existing ext
ension directory.     -P
, --omit-pod        Omit
 the stub POD section.  
   -X, --omit-XS        
 Omit the XS portion (im
plies both -c and -f).  
   -a, --gen-accessors  
 Generate get/set access
ors for struct and union
 members                
           (used with -x
).     -b, --compat-vers
ion  Specify a perl vers
ion to be backwards comp
atibile with.     -c, --
omit-constant   Omit the
 constant() function and
 specialised AUTOLOAD   
                        
from the XS file.     -d
, --debugging       Turn
 on debugging messages. 
    -e, --omit-enums    
  Omit constants from en
ums in the constant() fu
nction.                 
          If a pattern i
s given, only the matchi
ng enums are            
               ignored. 
    -f, --force         
  Force creation of the 
extension even if the C 
header                  
         does not exist.
     -g, --global       
   Include code for safe
ly storing static data i
n the .xs file.     -h, 
-?, --help        Displa
y this help message.    
 -k, --omit-const-func O
mit 'const' attribute on
 function arguments     
                      (u
sed with -x).     -m, --
gen-tied-var    Generate
 tied variables for acce
ss to declared          
                 variabl
es.     -n, --name      
      Specify a name to 
use for the extension (r
ecommended).     -o, --o
paque-re       Regular e
xpression for \"opaque\"
 types.     -p, --remove
-prefix   Specify a pref
ix which should be remov
ed from the             
              Perl funct
ion names.     -s, --con
st-subs      Create subr
outines for specified ma
cros.     -t, --default-
type    Default type for
 autoloaded constants (d
efault is IV).         -
-use-new-tests   Use Tes
t::More in backward comp
atible modules.         
--use-old-tests   Use th
e module Test rather tha
n Test::More.         --
skip-exporter   Do not e
xport symbols.         -
-skip-ppport     Do not 
use portability layer.  
       --skip-autoloader
 Do not use the module C
<AutoLoader>.         --
skip-strict     Do not u
se the pragma C<strict>.
         --skip-warnings
   Do not use the pragma
 C<warnings>.     -v, --
version         Specify 
a version number for thi
s extension.     -x, --a
utogen-xsubs   Autogener
ate XSUBs using C::Scan.
         --use-xsloader 
   Use XSLoader in backw
ard compatible modules (
ignored                 
          when used with
 -X).  extra_libraries  
        are any librarie
s that might be needed f
or loading the          
extension, e.g. -lm woul
d try to link in the mat
h library. EOFUSAGE }  m
y ($opt_A,     $opt_B,  
   $opt_C,     $opt_F,  
   $opt_M,     $opt_O,  
   $opt_P,     $opt_X,  
   $opt_a,     $opt_c,  
   $opt_d,     $opt_e,  
   $opt_f,     $opt_g,  
   $opt_h,     $opt_k,  
   $opt_m,     $opt_n,  
   $opt_o,     $opt_p,  
   $opt_s,     $opt_v,  
   $opt_x,     $opt_b,  
   $opt_t,     $new_test
,     $old_test,     $sk
ip_exporter,     $skip_p
pport,     $skip_autoloa
der,     $skip_strict,  
   $skip_warnings,     $
use_xsloader    );  Geto
pt::Long::Configure('bun
dling'); Getopt::Long::C
onfigure('pass_through')
;  my %options = (      
           'omit-autoloa
d|A'    => \$opt_A,     
            'beta-versio
n|B'     => \$opt_B,    
             'omit-chang
es|C'     => \$opt_C,   
              'cpp-flags
|F=s'      => \$opt_F,  
               'func-mas
k|M=s'      => \$opt_M, 
                'overwri
te_ok|O'     => \$opt_O,
                 'omit-p
od|P'         => \$opt_P
,                 'omit-
XS|X'          => \$opt_
X,                 'gen-
accessors|a'    => \$opt
_a,                 'com
pat-version|b=s' => \$op
t_b,                 'om
it-constant|c'    => \$o
pt_c,                 'd
ebugging|d'        => \$
opt_d,                 '
omit-enums|e:s'     => \
$opt_e,                 
'force|f'            => 
\$opt_f,                
 'global|g'           =>
 \$opt_g,               
  'help|h|?'           =
> \$opt_h,              
   'omit-const-func|k'  
=> \$opt_k,             
    'gen-tied-var|m'    
 => \$opt_m,            
     'name|n=s'         
  => \$opt_n,           
      'opaque-re|o=s'   
   => \$opt_o,          
       'remove-prefix|p=
s'  => \$opt_p,         
        'const-subs|s=s'
     => \$opt_s,        
         'default-type|t
=s'   => \$opt_t,       
          'version|v=s' 
       => \$opt_v,      
           'autogen-xsub
s|x'    => \$opt_x,     
            'use-new-tes
ts'      => \$new_test, 
                'use-old
-tests'      => \$old_te
st,                 'ski
p-exporter'      => \$sk
ip_exporter,            
     'skip-ppport'      
  => \$skip_ppport,     
            'skip-autolo
ader'    => \$skip_autol
oader,                 '
skip-warnings'      => \
$skip_warnings,         
        'skip-strict'   
     => \$skip_strict,  
               'use-xslo
ader'       => \$use_xsl
oader,               ); 
 GetOptions(%options) ||
 usage;  usage if $opt_h
;  if( $opt_b ){     usa
ge "You cannot use -b an
d -m at the same time.\n
" if ($opt_b && $opt_m);
     $opt_b =~ /^\d+\.\d
+\.\d+/ ||     usage "Yo
u must provide the backw
ards compatibility versi
on in X.Y.Z form. "     
      .  "(i.e. 5.5.0)\n
";     my ($maj,$min,$su
b) = split(/\./,$opt_b,3
);     if ($maj < 5 || (
$maj == 5 && $min < 6)) 
{         $compat_versio
n =      $sub ? sprintf(
"%d.%03d%02d",$maj,$min,
$sub) :             spri
ntf("%d.%03d",    $maj,$
min);     } else {      
   $compat_version =    
  $sub ? sprintf("%d.%03
d%03d",$maj,$min,$sub) :
     sprintf("%d.%03d",
    $maj,$min);     } } 
else {     my ($maj,$min
,$sub) = $compat_version
 =~ /(\d+)\.(\d\d\d)(\d*
)/;     $sub ||= 0;     
warn sprintf <<'EOF', $m
aj,$min,$sub; Defaulting
 to backwards compatibil
ity with perl %d.%d.%d I
f you intend this module
 to be compatible with e
arlier perl versions, pl
ease specify a minimum p
erl version with the -b 
option.  EOF }  if( $opt
_B ){     $TEMPLATE_VERS
ION = '0.00_01'; }  if( 
$opt_v ){  $TEMPLATE_VER
SION = $opt_v;      # ch
eck if it is numeric    
 my $temp_version = $TEM
PLATE_VERSION;     my $b
eta_version = $temp_vers
ion =~ s/(\d)_(\d\d)/$1$
2/;     my $notnum;     
{         local $SIG{__W
ARN__} = sub { $notnum =
 1 };         use warnin
gs 'numeric';         $t
emp_version = 0+$temp_ve
rsion;     }      if ($n
otnum) {         my $mod
ule = $opt_n || 'Your::M
odule';         warn <<"
EOF"; You have specified
 a non-numeric version. 
 Unless you supply an ap
propriate VERSION class 
method, users may not be
 able to specify a minim
um required version with
 C<use $module versionnu
m>.  EOF     }     else 
{         $opt_B = $beta
_version;     } }  # -A 
implies -c. $skip_autolo
ader = $opt_c = 1 if $op
t_A;  # -X implies -c an
d -f $opt_c = $opt_f = 1
 if $opt_X;  $opt_t ||= 
'IV';  my %const_xsub; %
const_xsub = map { $_,1 
} split(/,+/, $opt_s) if
 $opt_s;  my $extralibs 
= '';  my @path_h;  whil
e (my $arg = shift) {   
  if ($arg =~ /^-l/i) { 
        $extralibs .= "$
arg ";         next;    
 }     last if $extralib
s;     push(@path_h, $ar
g); }  usage "Must suppl
y header file or module 
name\n"         unless (
@path_h or $opt_n);  my 
$fmask; my $tmask;  $fma
sk = qr{$opt_M} if defin
ed $opt_M; $tmask = qr{$
opt_o} if defined $opt_o
; my $tmask_all = $tmask
 && $opt_o eq '.';  if (
$opt_x) {   eval {requir
e C::Scan; 1}     or die
 <<EOD; C::Scan required
 if you use -x option. T
o install C::Scan, execu
te    perl -MCPAN -e "in
stall C::Scan" EOD   unl
ess ($tmask_all) {     $
C::Scan::VERSION >= 0.70
       or die <<EOD; C::
Scan v. 0.70 or later re
quired unless you use -o
 . option. You have vers
ion $C::Scan::VERSION in
stalled as $INC{'C/Scan.
pm'}. To install C::Scan
, execute    perl -MCPAN
 -e "install C::Scan" EO
D   }   if (($opt_m || $
opt_a) && $C::Scan::VERS
ION < 0.73) {     die <<
EOD; C::Scan v. 0.73 or 
later required to use -m
 or -a options. You have
 version $C::Scan::VERSI
ON installed as $INC{'C/
Scan.pm'}. To install C:
:Scan, execute    perl -
MCPAN -e "install C::Sca
n" EOD   } } elsif ($opt
_o or $opt_F) {   warn <
<EOD if $opt_o; Option -
o does not make sense wi
thout -x. EOD   warn <<E
OD if $opt_F and $opt_X 
; Option -F does not mak
e sense with -X. EOD }  
my @path_h_ini = @path_h
; my ($name, %fullpath, 
%prefix, %seen_define, %
prefixless, %const_names
);  my $module = $opt_n;
  if( @path_h ){     use
 File::Spec;     my @pat
hs;     my $pre_sub_tri_
graphs = 1;     if ($^O 
eq 'VMS') {  # Consider 
overrides of default loc
ation       # XXXX This 
is not equivalent to wha
t the older version did:
       # it was looking
 at $hadsys header-file 
per header-file...      
 my($hadsys) = grep s!^s
ys/!!i , @path_h;       
@paths = qw( Sys$Library
 VAXC$Include );       p
ush @paths, ($hadsys ? '
GNU_CC_Include[vms]' : '
GNU_CC_Include[000000]')
;       push @paths, qw(
 DECC$Library_Include DE
CC$System_Include );    
 }     else {       @pat
hs = (File::Spec->curdir
(), $Config{usrinc},  (
split ' ', $Config{locin
cpth}), '/usr/include');
     }     foreach my $p
ath_h (@path_h) {       
  $name ||= $path_h;    
 $module ||= do {       
$name =~ s/\.h$//;      
 if ( $name !~ /::/ ) { 
$name =~ s#^.*/##;  $na
me = "\u$name";       } 
      $name;     };     
 if( $path_h =~ s#::#/#g
 && $opt_n ){  warn "Nes
ting of headerfile ignor
ed with -n\n";     }    
 $path_h .= ".h" unless 
$path_h =~ /\.h$/;     m
y $fullpath = $path_h;  
   $path_h =~ s/,.*$// i
f $opt_x;     $fullpath{
$path_h} = $fullpath;   
   # Minor trickery: we 
can't chdir() before we 
processed the headers   
  # (so know the name of
 the extension), but the
 header may be in the   
  # extension directory.
..     my $tmp_path_h = 
$path_h;     my $rel_pat
h_h = $path_h;     my @d
irs = @paths;     if (no
t -f $path_h) {       my
 $found;       for my $d
ir (@paths) {  $found++,
 last    if -f ($path_h 
= File::Spec->catfile($d
ir, $tmp_path_h));      
 }       if ($found) { 
$rel_path_h = $path_h; 
$fullpath{$path_h} = $fu
llpath;       } else { 
(my $epath = $module) =~
 s,::,/,g;  $epath = Fil
e::Spec->catdir('ext', $
epath) if -d 'ext';  $re
l_path_h = File::Spec->c
atfile($epath, $tmp_path
_h);  $path_h = $tmp_pat
h_h; # Used during -x  p
ush @dirs, $epath;      
 }     }      if (!$opt_
c) {       die "Can't fi
nd $tmp_path_h in @dirs\
n"  if ( ! $opt_f && ! -
f "$rel_path_h" );      
 # Scan the header file 
(we should deal with nes
ted header files)       
# Record the names of si
mple #define constants i
nto const_names         
    # Function prototype
s are processed below.  
     open(CH, "<$rel_pat
h_h") || die "Can't open
 $rel_path_h: $!\n";    
 defines:       while (<
CH>) {  if ($pre_sub_tri
_graphs) {      # Prepro
cess all tri-graphs     
 # including things stuc
k in quoted string const
ants.      s/\?\?=/#/g; 
                        
# | ??=|  #|      s/\?\?
\!/|/g;                 
       # | ??!|  ||     
 s/\?\?'/^/g;           
              # | ??'|  
^|      s/\?\?\(/[/g;   
                     # |
 ??(|  [|      s/\?\?\)/
]/g;                    
    # | ??)|  ]|      s/
\?\?\-/~/g;             
           # | ??-|  ~| 
    s/\?\?\//\\/g;     
                  # | ??
/|  \|      s/\?\?</{/g;
                        
 # | ??<|  {|      s/\?\
?>/}/g;                 
        # | ??>|  }|  } 
if (/^[ \t]*#[ \t]*defi
ne\s+([\$\w]+)\b(?!\()\s
*(?=[^"\s])(.*)/) {     
 my $def = $1;      my $
rest = $2;      $rest =~
 s!/\*.*?(\*/|\n)|//.*!!
g; # Remove comments    
  $rest =~ s/^\s+//;    
  $rest =~ s/\s+$//;    
  # Cannot do: (-1) and 
((LHANDLE)3) are OK:    
  #print("Skip non-wordy
 $def => $rest\n"),     
 #  next defines if $res
t =~ /[^\w\$]/;      if 
($rest =~ /"/) {        
print("Skip stringy $def
 => $rest\n") if $opt_d;
        next defines;   
   }      print "Matched
 $_ ($def)\n" if $opt_d;
      $seen_define{$def}
 = $rest;      $_ = $def
;      next if /^_.*_h_*
$/i; # special case, but
 for what?      if (defi
ned $opt_p) {        if 
(!/^$opt_p(\d)/) {  ++$
prefix{$_} if s/^$opt_p/
/;        }        else 
{  warn "can't remove $
opt_p prefix from '$_'!\
n";        }      }     
 $prefixless{$def} = $_;
      if (!$fmask or /$f
mask/) {  print "... Pa
sses mask of -M.\n" if $
opt_d and $fmask;  $con
st_names{$_}++;      } 
  }       }       if (de
fined $opt_e and !$opt_e
) {         close(CH);  
     }       else {  # W
ork from miniperl too - 
on "normal" systems     
    my $SEEK_SET = eval 
'use Fcntl qw/SEEK_SET/;
 SEEK_SET' or 0;        
 seek CH, 0, $SEEK_SET; 
        my $src = do { l
ocal $/; <CH> };        
 close CH;         no wa
rnings 'uninitialized'; 
         # Remove C and 
C++ comments         $sr
c =~ s#/\*[^*]*\*+([^/*]
[^*]*\*+)*/|("(\\.|[^"\\
])*"|'(\\.|[^'\\])*'|.[^
/"'\\]*)#$2#gs;   while 
($src =~ /\benum\s*([\w_
]*)\s*\{\s([^}]+)\}/gsc)
 {      my ($enum_name, 
$enum_body) = ($1, $2); 
            # skip enums
 matching $opt_e        
     next if $opt_e && $
enum_name =~ /$opt_e/;  
           my $val = 0; 
            for my $item
 (split /,/, $enum_body)
 {                 my ($
key, $declared_val) = $i
tem =~ /(\w+)\s*(?:=\s*(
.*))?/;                 
$val = defined($declared
_val) && length($declare
d_val) ? $declared_val :
 1 + $val;              
   $seen_define{$key} = 
$val;                 $c
onst_names{$key}++;     
        }         } # wh
ile (...)       } # if (
!defined $opt_e or $opt_
e)     }     } }  # Save
 current directory so th
at C::Scan can use it my
 $cwd = File::Spec->rel2
abs( File::Spec->curdir 
);  # As Ilya suggested,
 use a name that contain
s - and then it can't cl
ash with # the names of 
any packages. A director
y 'fallback' will clash 
with any # new pragmata 
down the fallback:: tree
, but that seems unlikel
y. my $constscfname = 'c
onst-c.inc'; my $constsx
sfname = 'const-xs.inc';
 my $fallbackdirname = '
fallback';  my $ext = ch
dir 'ext' ? 'ext/' : '';
  my @modparts  = split(
/::/,$module); my $modpn
ame  = join('-', @modpar
ts); my $modfname  = pop
 @modparts; my $modpmdir
  = join '/', 'lib', @mo
dparts; my $modpmname = 
join '/', $modpmdir, $mo
dfname.'.pm';  if ($opt_
O) {  warn "Overwriting 
existing $ext$modpname!!
!\n" if -e $modpname; } 
else {  die "Won't overw
rite existing $ext$modpn
ame\n" if -e $modpname; 
} -d "$modpname"   || mk
path([$modpname], 0, 077
5); chdir($modpname) || 
die "Can't chdir $ext$mo
dpname: $!\n";  my %type
s_seen; my %std_types; m
y $fdecls = []; my $fdec
ls_parsed = []; my $type
def_rex; my %typedefs_pr
e; my %known_fnames; my 
%structs;  my @fnames; m
y @fnames_no_prefix; my 
%vdecl_hash; my @vdecls;
  if( ! $opt_X ){  # use
 XS, unless it was disab
led   unless ($skip_pppo
rt) {     require Devel:
:PPPort;     warn "Writi
ng $ext$modpname/ppport.
h\n";     Devel::PPPort:
:WriteFile('ppport.h')  
       || die "Can't cre
ate $ext$modpname/ppport
.h: $!\n";   }   open(XS
, ">$modfname.xs") || di
e "Can't create $ext$mod
pname/$modfname.xs: $!\n
";   if ($opt_x) {     w
arn "Scanning typemaps..
.\n";     get_typemap();
     my @td;     my @goo
d_td;     my $addflags =
 $opt_F || '';      fore
ach my $filename (@path_
h) {       my $c;       
my $filter;        if ($
fullpath{$filename} =~ /
,/) {  $filename = $`; 
$filter = $';       }   
    warn "Scanning $file
name for functions...\n"
;       my @styles = $Co
nfig{gccversion} ? qw(C+
+ C9X GNU) : qw(C++ C9X)
;       $c = new C::Scan
 'filename' => $filename
, 'filename_filter' => $
filter,  'add_cppflags' 
=> $addflags, 'c_styles'
 => \@styles;       $c->
set('includeDirs' => ["$
Config::Config{archlib}/
CORE", $cwd]);        $c
->get('keywords')->{'__r
estrict'} = 1;        pu
sh @$fdecls_parsed, @{ $
c->get('parsed_fdecls') 
};       push(@$fdecls, 
@{$c->get('fdecls')});  
      push @td, @{$c->ge
t('typedefs_maybe')};   
    if ($opt_a) {  my $s
tructs = $c->get('typede
f_structs');  @structs{k
eys %$structs} = values 
%$structs;       }      
  if ($opt_m) {  %vdecl_
hash = %{ $c->get('vdecl
_hash') };  @vdecls = so
rt keys %vdecl_hash;  fo
r (local $_ = 0; $_ < @v
decls; ++$_) {    my $va
r = $vdecls[$_];    my($
type, $post) = @{ $vdecl
_hash{$var} };    if (de
fined $post) {      warn
 "Can't handle variable 
'$type $var $post', skip
ping.\n";      splice @v
decls, $_, 1;      redo;
    }    $type = normali
ze_type($type);    $vdec
l_hash{$var} = $type;  }
       }        unless (
$tmask_all) {  warn "Sca
nning $filename for type
defs...\n";  my $td = $c
->get('typedef_hash'); 
# eval {require 'dumpvar
.pl'; ::dumpValue($td)} 
or warn $@ if $opt_d;  m
y @f_good_td = grep $td-
>{$_}[1] eq '', keys %$t
d;  push @good_td, @f_go
od_td;  @typedefs_pre{@f
_good_td}  = map $_->[0]
, @$td{@f_good_td};     
  }     }     { local $"
 = '|';       $typedef_r
ex = qr(\b(?<!struct )(?
:@good_td)\b) if @good_t
d;     }     %known_fnam
es = map @$_[1,3], @$fde
cls_parsed; # [1,3] is N
AME, FULLTEXT     if ($f
mask) {       my @good; 
      for my $i (0..$#$f
decls_parsed) {  next un
less $fdecls_parsed->[$i
][1] =~ /$fmask/; # [1] 
is NAME  push @good, $i;
  print "... Function $f
decls_parsed->[$i][1] pa
sses -M mask.\n"    if $
opt_d;       }       $fd
ecls = [@$fdecls[@good]]
;       $fdecls_parsed =
 [@$fdecls_parsed[@good]
];     }     @fnames = s
ort map $_->[1], @$fdecl
s_parsed; # 1 is NAME   
  # Sort declarations:  
   {       my %h = map( 
($_->[1], $_), @$fdecls_
parsed);       $fdecls_p
arsed = [ @h{@fnames} ];
     }     @fnames_no_pr
efix = @fnames;     @fna
mes_no_prefix       = so
rt map { ++$prefix{$_} i
f s/^$opt_p(?!\d)//; $_ 
} @fnames_no_prefix     
     if defined $opt_p; 
    # Remove macros whic
h expand to typedefs    
 print "Typedefs are @td
.\n" if $opt_d;     my %
td = map {($_, $_)} @td;
     # Add some other po
ssible but meaningless v
alues for macros     for
 my $k (qw(char double f
loat int long short unsi
gned signed void)) {    
   $td{"$_$k"} = "$_$k" 
for ('', 'signed ', 'uns
igned ');     }     # ev
al {require 'dumpvar.pl'
; ::dumpValue( [\@td, \%
td] ); 1} or warn $@;   
  my $n = 0;     my %bad
_macs;     while (keys %
td > $n) {       $n = ke
ys %td;       my ($k, $v
);       while (($k, $v)
 = each %seen_define) { 
# print("found '$k'=>'$
v'\n"),  $bad_macs{$k} =
 $td{$k} = $td{$v} if ex
ists $td{$v};       }   
  }     # Now %bad_macs 
contains names of bad ma
cros     for my $k (keys
 %bad_macs) {       dele
te $const_names{$prefixl
ess{$k}};       print "I
gnoring macro $k which e
xpands to a typedef name
 '$bad_macs{$k}'\n" if $
opt_d;     }   } } my @c
onst_names = sort keys %
const_names;  -d $modpmd
ir || mkpath([$modpmdir]
, 0, 0775); open(PM, ">$
modpmname") || die "Can'
t create $ext$modpname/$
modpmname: $!\n";  $" = 
"\n\t"; warn "Writing $e
xt$modpname/$modpmname\n
";  print PM <<"END"; pa
ckage $module;  use $com
pat_version; END  print 
PM <<"END" unless $skip_
strict; use strict; END 
 print PM "use warnings;
\n" unless $skip_warning
s or $compat_version < 5
.006;  unless( $opt_X ||
 $opt_c || $opt_A ){  # 
we'll have an AUTOLOAD()
, and it will have $AUTO
LOAD and  # will want Ca
rp.  print PM <<'END'; u
se Carp; END }  print PM
 <<'END' unless $skip_ex
porter;  require Exporte
r; END  my $use_Dyna = (
not $opt_X and $compat_v
ersion < 5.006 and not $
use_xsloader); print PM 
<<"END" if $use_Dyna;  #
 use DynaLoader, unless 
XS was disabled require 
DynaLoader; END   # Are 
we using AutoLoader or n
ot? unless ($skip_autolo
ader) { # no autoloader 
whatsoever.  unless ($op
t_c) { # we're doing the
 AUTOLOAD  print PM "us
e AutoLoader;\n";  }  el
se {  print PM "use Aut
oLoader qw(AUTOLOAD);\n"
  } }  if ( $compat_vers
ion < 5.006 ) {     my $
vars = '$VERSION @ISA'; 
    $vars .= ' @EXPORT @
EXPORT_OK %EXPORT_TAGS' 
unless $skip_exporter;  
   $vars .= ' $AUTOLOAD'
 unless $opt_X || $opt_c
 || $opt_A;     $vars .=
 ' $XS_VERSION' if $opt_
B && !$opt_X;     print 
PM "use vars qw($vars);"
; }  # Determine @ISA. m
y @modISA; push @modISA,
 'Exporter' unless $skip
_exporter; push @modISA,
 'DynaLoader'  if $use_D
yna;  # no XS my $myISA 
= "our \@ISA = qw(@modIS
A);"; $myISA =~ s/^our /
/ if $compat_version < 5
.006;  print PM "\n$myIS
A\n\n";  my @exported_na
mes = (@const_names, @fn
ames_no_prefix, map '$'.
$_, @vdecls);  my $tmp='
'; $tmp .= <<"END" unles
s $skip_exporter; # Item
s to export into callers
 namespace by default. N
ote: do not export # nam
es by default without a 
very good reason. Use EX
PORT_OK instead. # Do no
t simply export all your
 public functions/method
s/constants.  # This all
ows declaration use $mod
ule ':all'; # If you do 
not need this, moving th
ings directly into \@EXP
ORT or \@EXPORT_OK # wil
l save memory. our %EXPO
RT_TAGS = ( 'all' => [ q
w(  @exported_names ) ] 
);  our \@EXPORT_OK = ( 
\@{ \$EXPORT_TAGS{'all'}
 } );  our \@EXPORT = qw
(  @const_names );  END 
 $tmp .= "our \$VERSION 
= '$TEMPLATE_VERSION';\n
"; if ($opt_B) {     $tm
p .= "our \$XS_VERSION =
 \$VERSION;\n" unless $o
pt_X;     $tmp .= "\$VER
SION = eval \$VERSION;  
# see L<perlmodstyle>\n"
; } $tmp .= "\n";  $tmp 
=~ s/^our //mg if $compa
t_version < 5.006; print
 PM $tmp;  if (@vdecls) 
{     printf PM "our(@{[
 join ', ', map '$'.$_, 
@vdecls ]});\n\n"; }   p
rint PM autoload ($modul
e, $compat_version) unle
ss $opt_c or $opt_X;  if
( ! $opt_X ){ # print bo
otstrap, unless XS is di
sabled   if ($use_Dyna) 
{  $tmp = <<"END"; boots
trap $module \$VERSION; 
END   } else {  $tmp = <
<"END"; require XSLoader
; XSLoader::load('$modul
e', \$VERSION); END   } 
  $tmp =~ s:\$VERSION:\$
XS_VERSION:g if $opt_B; 
  print PM $tmp; }  # ty
ing the variables can ha
ppen only after bootstra
p if (@vdecls) {     pri
ntf PM <<END; { @{[ join
 "\n", map "    _tievar_
$_(\$$_);", @vdecls ]} }
  END }  my $after; if( 
$opt_P ){ # if POD is di
sabled  $after = '__END_
_'; } else {  $after = '
=cut'; }  print PM <<"EN
D";  # Preloaded methods
 go here. END  print PM 
<<"END" unless $opt_A;  
# Autoload methods go af
ter $after, and are proc
essed by the autosplit p
rogram. END  print PM <<
"END";  1; __END__ END  
my ($email,$author,$lice
nce);  eval {        my 
$username;        ($user
name,$author) = (getpwui
d($>))[0,6];        if (
defined $username && def
ined $author) {     $aut
hor =~ s/,.*$//; # in ca
se of sub fields     my 
$domain = $Config{'mydom
ain'};     $domain =~ s/
^\.//;     $email = "$us
ername\@$domain";       
 }      };  $author =~ s
/'/\\'/g if defined $aut
hor; $author ||= "A. U. 
Thor"; $email  ||= 'a.u.
thor@a.galaxy.far.far.aw
ay';  $licence = sprintf
 << "DEFAULT", $^V; Copy
right (C) ${\(1900 + (lo
caltime) [5])} by $autho
r  This library is free 
software; you can redist
ribute it and/or modify 
it under the same terms 
as Perl itself, either P
erl version %vd or, at y
our option, any later ve
rsion of Perl 5 you may 
have available. DEFAULT 
 my $revhist = ''; $revh
ist = <<EOT if $opt_C; #
 #=head1 HISTORY # #=ove
r 8 # #=item $TEMPLATE_V
ERSION # #Original versi
on; created by h2xs $H2X
S_VERSION with options #
 #  @ARGS # #=back # EOT
  my $exp_doc = $skip_ex
porter ? '' : <<EOD; # #
=head2 EXPORT # #None by
 default. # EOD  if (@co
nst_names and not $opt_P
) {   $exp_doc .= <<EOD 
unless $skip_exporter; #
=head2 Exportable consta
nts # #  @{[join "\n  ",
 @const_names]} # EOD } 
 if (defined $fdecls and
 @$fdecls and not $opt_P
) {   $exp_doc .= <<EOD 
unless $skip_exporter; #
=head2 Exportable functi
ons # EOD  #  $exp_doc .
= <<EOD if $opt_p; #When
 accessing these functio
ns from Perl, prefix C<$
opt_p> should be removed
. # #EOD   $exp_doc .= <
<EOD unless $skip_export
er; #  @{[join "\n  ", @
known_fnames{@fnames}]} 
# EOD }  my $meth_doc = 
'';  if ($opt_x && $opt_
a) {   my($name, $struct
);   $meth_doc .= access
or_docs($name, $struct) 
    while ($name, $struc
t) = each %structs; }  #
 Prefix the default lice
nce with hash symbols. #
 Is this just cargo cult
 - it seems that the fir
st thing that happens to
 this # block is that al
l the hashes are then s/
//g out. my $licence_has
h = $licence; $licence_h
ash =~ s/^/#/gm;  my $po
d; $pod = <<"END" unless
 $opt_P; ## Below is stu
b documentation for your
 module. You'd better ed
it it! # #=head1 NAME # 
#$module - Perl extensio
n for blah blah blah # #
=head1 SYNOPSIS # #  use
 $module; #  blah blah b
lah # #=head1 DESCRIPTIO
N # #Stub documentation 
for $module, created by 
h2xs. It looks like the 
#author of the extension
 was negligent enough to
 leave the stub #unedite
d. # #Blah blah blah. $e
xp_doc$meth_doc$revhist 
# #=head1 SEE ALSO # #Me
ntion other useful docum
entation such as the doc
umentation of #related m
odules or operating syst
em documentation (such a
s man pages #in UNIX), o
r any relevant external 
documentation such as RF
Cs or #standards. # #If 
you have a mailing list 
set up for your module, 
mention it here. # #If y
ou have a web site set u
p for your module, menti
on it here. # #=head1 AU
THOR # #$author, E<lt>${
email}E<gt> # #=head1 CO
PYRIGHT AND LICENSE # $l
icence_hash # #=cut END 
 $pod =~ s/^\#//gm unles
s $opt_P; print PM $pod 
unless $opt_P;  close PM
;   if( ! $opt_X ){ # pr
int XS, unless it is dis
abled warn "Writing $ext
$modpname/$modfname.xs\n
";  print XS <<"END"; #i
nclude "EXTERN.h" #inclu
de "perl.h" #include "XS
UB.h"  END  print XS <<"
END" unless $skip_ppport
; #include "ppport.h"  E
ND  if( @path_h ){     f
oreach my $path_h (@path
_h_ini) {  my($h) = $pat
h_h;  $h =~ s#^/usr/incl
ude/##;  if ($^O eq 'VMS
') { $h =~ s#.*vms\]#sys
/# or $h =~ s#.*[:>\]]##
; }         print XS qq{
#include <$h>\n};     } 
    print XS "\n"; }  pr
int XS <<"END" if $opt_g
;  /* Global Data */  #d
efine MY_CXT_KEY "${modu
le}::_guts" XS_VERSION  
typedef struct {     /* 
Put Global Data in here 
*/     int dummy; /* yo
u can access this elsewh
ere as MY_CXT.dummy */ }
 my_cxt_t;  START_MY_CXT
  END  my %pointer_typed
efs; my %struct_typedefs
;  sub td_is_pointer {  
 my $type = shift;   my 
$out = $pointer_typedefs
{$type};   return $out i
f defined $out;   my $ot
ype = $type;   $out = ($
type =~ /\*$/);   # This
 converts only the guys 
which do not have traili
ng part in the typedef  
 if (not $out       and 
$typedef_rex and $type =
~ s/($typedef_rex)/$type
defs_pre{$1}/go) {     $
type = normalize_type($t
ype);     print "Is-Poin
ter: Type mutation via t
ypedefs: $otype ==> $typ
e\n"       if $opt_d;   
  $out = td_is_pointer($
type);   }   return ($po
inter_typedefs{$otype} =
 $out); }  sub td_is_str
uct {   my $type = shift
;   my $out = $struct_ty
pedefs{$type};   return 
$out if defined $out;   
my $otype = $type;   $ou
t = ($type =~ /^(struct|
union)\b/) && !td_is_poi
nter($type);   # This co
nverts only the guys whi
ch do not have trailing 
part in the typedef   if
 (not $out       and $ty
pedef_rex and $type =~ s
/($typedef_rex)/$typedef
s_pre{$1}/go) {     $typ
e = normalize_type($type
);     print "Is-Struct:
 Type mutation via typed
efs: $otype ==> $type\n"
       if $opt_d;     $o
ut = td_is_struct($type)
;   }   return ($struct_
typedefs{$otype} = $out)
; }  print_tievar_subs(\
*XS, $_, $vdecl_hash{$_}
) for @vdecls;  if( ! $o
pt_c ) {   # We write th
e "sample" files used wh
en this module is built 
by perl without   # ExtU
tils::Constant.   # h2xs
 will later check that t
hese are the same as tho
se generated by the   # 
code embedded into Makef
ile.PL   unless (-d $fal
lbackdirname) {     mkdi
r "$fallbackdirname" or 
die "Cannot mkdir $fallb
ackdirname: $!\n";   }  
 warn "Writing $ext$modp
name/$fallbackdirname/$c
onstscfname\n";   warn "
Writing $ext$modpname/$f
allbackdirname/$constsxs
fname\n";   my $cfallbac
k = File::Spec->catfile(
$fallbackdirname, $const
scfname);   my $xsfallba
ck = File::Spec->catfile
($fallbackdirname, $cons
tsxsfname);   WriteConst
ants ( C_FILE =>       $
cfallback,              
      XS_FILE =>      $x
sfallback,              
      DEFAULT_TYPE => $o
pt_t,                   
 NAME =>         $module
,                    NAM
ES =>        \@const_nam
es,                  ); 
  print XS "#include \"$
constscfname\"\n"; }   m
y $prefix = defined $opt
_p ? "PREFIX = $opt_p" :
 '';  # Now switch from 
C to XS by issuing the f
irst MODULE declaration:
 print XS <<"END";  MODU
LE = $module PACKAGE = 
$module $prefix  END  #
 If a constant() functio
n was #included then out
put a corresponding # XS
 declaration: print XS "
INCLUDE: $constsxsfname\
n" unless $opt_c;  print
 XS <<"END" if $opt_g;  
BOOT: {     MY_CXT_INIT;
     /* If any of the fi
elds in the my_cxt_t str
uct need        to be in
itialised, do it here.  
    */ }  END  foreach (
sort keys %const_xsub) {
     print XS <<"END"; c
har * $_()      CODE: #i
fdef $_  RETVAL = $_; #e
lse  croak("Your vendor 
has not defined the $mod
ule macro $_"); #endif  
    OUTPUT:  RETVAL  END
 }  my %seen_decl; my %t
ypemap;  sub print_decl 
{   my $fh = shift;   my
 $decl = shift;   my ($t
ype, $name, $args) = @$d
ecl;   return if $seen_d
ecl{$name}++; # Need to 
do the same for docs as 
well?    my @argnames = 
map {$_->[1]} @$args;   
my @argtypes = map { nor
malize_type( $_->[0], 1 
) } @$args;   if ($opt_k
) {     s/^\s*const\b\s*
// for @argtypes;   }   
my @argarrays = map { $_
->[4] || '' } @$args;   
my $numargs = @$args;   
if ($numargs and $argtyp
es[-1] eq '...') {     $
numargs--;     $argnames
[-1] = '...';   }   loca
l $" = ', ';   $type = n
ormalize_type($type, 1);
    print $fh <<"EOP";  
$type $name(@argnames) E
OP    for my $arg (0 .. 
$numargs - 1) {     prin
t $fh <<"EOP";  $argtype
s[$arg] $argnames[$arg]$
argarrays[$arg] EOP   } 
}  sub print_tievar_subs
 {   my($fh, $name, $typ
e) = @_;   print $fh <<E
ND; I32 _get_$name(IV in
dex, SV *sv) {     dSP; 
    PUSHMARK(SP);     XP
USHs(sv);     PUTBACK;  
   (void)call_pv("$modul
e\::_get_$name", G_DISCA
RD);     return (I32)0; 
}  I32 _set_$name(IV ind
ex, SV *sv) {     dSP;  
   PUSHMARK(SP);     XPU
SHs(sv);     PUTBACK;   
  (void)call_pv("$module
\::_set_$name", G_DISCAR
D);     return (I32)0; }
  END }  sub print_tieva
r_xsubs {   my($fh, $nam
e, $type) = @_;   print 
$fh <<END; void _tievar_
$name(sv)  SV* sv     PR
EINIT:  struct ufuncs uf
;     CODE:  uf.uf_val =
 &_get_$name;  uf.uf_set
 = &_set_$name;  uf.uf_i
ndex = (IV)&_get_$name; 
sv_magic(sv, 0, 'U', (c
har*)&uf, sizeof(uf));  
void _get_$name(THIS)  $
type THIS = NO_INIT     
CODE:  THIS = $name;    
 OUTPUT:  SETMAGIC: DISA
BLE  THIS  void _set_$na
me(THIS)  $type THIS    
 CODE:  $name = THIS;  E
ND }  sub print_accessor
s {   my($fh, $name, $st
ruct) = @_;   return unl
ess defined $struct && $
name !~ /\s|_ANON/;   $n
ame = normalize_type($na
me);   my $ptrname = nor
malize_type("$name *"); 
  print $fh <<"EOF";  MO
DULE = $module PACKAGE 
= ${name} $prefix  $nam
e * _to_ptr(THIS)  $name
 THIS = NO_INIT     PROT
OTYPE: \$     CODE:  if 
(sv_derived_from(ST(0), 
"$name")) {      STRLEN 
len;      char *s = SvPV
((SV*)SvRV(ST(0)), len);
      if (len != sizeof(
THIS))  croak("Size \%d
 of packed data != expec
ted \%d",  len, sizeof
(THIS));      RETVAL = (
$name *)s;  }  else     
 croak("THIS is not of t
ype $name");     OUTPUT:
  RETVAL  $name new(CLAS
S)  char *CLASS = NO_INI
T     PROTOTYPE: \$     
CODE:  Zero((void*)&RETV
AL, sizeof(RETVAL), char
);     OUTPUT:  RETVAL  
MODULE = $module PACKAG
E = ${name}Ptr $prefix 
 EOF   my @items = @$str
uct;   while (@items) { 
    my $item = shift @it
ems;     if ($item->[0] 
=~ /_ANON/) {       if (
defined $item->[2]) {  p
ush @items, map [    @$_
[0, 1], "$item->[2]_$_->
[2]", "$item->[2].$_->[2
]",  ], @{ $structs{$ite
m->[0]} };       } else 
{  push @items, @{ $stru
cts{$item->[0]} };      
 }     } else {       my
 $type = normalize_type(
$item->[0]);       my $t
type = $structs{$type} ?
 normalize_type("$type *
") : $type;       print 
$fh <<"EOF"; $ttype $ite
m->[2](THIS, __value = N
O_INIT)  $ptrname THIS 
$type __value     PROTOT
YPE: \$;\$     CODE:  if
 (items > 1)      THIS->
$item->[-1] = __value; 
RETVAL = @{[      $type 
eq $ttype ? "THIS->$item
->[-1]" : "&(THIS->$item
->[-1])"  ]};     OUTPUT
:  RETVAL  EOF     }   }
 }  sub accessor_docs { 
  my($name, $struct) = @
_;   return unless defin
ed $struct && $name !~ /
\s|_ANON/;   $name = nor
malize_type($name);   my
 $ptrname = $name . 'Ptr
';   my @items = @$struc
t;   my @list;   while (
@items) {     my $item =
 shift @items;     if ($
item->[0] =~ /_ANON/) { 
      if (defined $item-
>[2]) {  push @items, ma
p [    @$_[0, 1], "$item
->[2]_$_->[2]", "$item->
[2].$_->[2]",  ], @{ $st
ructs{$item->[0]} };    
   } else {  push @items
, @{ $structs{$item->[0]
} };       }     } else 
{       push @list, $ite
m->[2];     }   }   my $
methods = (join '(...)>,
 C<', @list) . '(...)'; 
   my $pod = <<"EOF"; # 
#=head2 Object and class
 methods for C<$name>/C<
$ptrname> # #The princip
al Perl representation o
f a C object of type C<$
name> is an #object of c
lass C<$ptrname> which i
s a reference to an inte
ger #representation of a
 C pointer.  To create s
uch an object, one may u
se #a combination # #  m
y \$buffer = $name->new(
); #  my \$obj = \$buffe
r->_to_ptr(); # #This ex
ersizes the following tw
o methods, and an additi
onal class #C<$name>, th
e internal representatio
n of which is a referenc
e to a #packed string wi
th the C structure.  Kee
p in mind that \$buffer 
should #better survive l
onger than \$obj. # #=ov
er # #=item C<\$object_o
f_type_$name-E<gt>_to_pt
r()> # #Converts an obje
ct of type C<$name> to a
n object of type C<$ptrn
ame>. # #=item C<$name-E
<gt>new()> # #Creates an
 empty object of type C<
$name>.  The correspondi
ng packed #string is zer
oed out. # #=item C<$met
hods> # #return the curr
ent value of the corresp
onding element if called
 #without additional arg
uments.  Set the element
 to the supplied value #
(and return the new valu
e) if called with an add
itional argument. # #App
licable to objects of ty
pe C<$ptrname>. # #=back
 # EOF   $pod =~ s/^\#//
gm;   return $pod; }  # 
Should be called before 
any actual call to norma
lize_type(). sub get_typ
emap {   # We do not wan
t to read ./typemap by o
bvios reasons.   my @tm 
=  qw(../../../typemap .
./../typemap ../typemap)
;   my $stdtypemap =  "$
Config::Config{privlib}/
ExtUtils/typemap";   uns
hift @tm, $stdtypemap;  
 my $proto_re = "[" . qu
otemeta('\$%&*@;') . "]"
 ;    # Start with usefu
l default values   $type
map{float} = 'T_NV';    
foreach my $typemap (@tm
) {     next unless -e $
typemap ;     # skip dir
ectories, binary files e
tc.     warn " Scanning 
$typemap\n";     warn("W
arning: ignoring non-tex
t typemap file '$typemap
'\n"), next       unless
 -T $typemap ;     open(
TYPEMAP, $typemap)      
 or warn ("Warning: coul
d not open typemap file 
'$typemap': $!\n"), next
;     my $mode = 'Typema
p';     while (<TYPEMAP>
) {       next if /^\s*\
#/;       if (/^INPUT\s*
$/)   { $mode = 'Input';
 next; }       elsif (/^
OUTPUT\s*$/)  { $mode = 
'Output'; next; }       
elsif (/^TYPEMAP\s*$/) {
 $mode = 'Typemap'; next
; }       elsif ($mode e
q 'Typemap') {  next if 
/^\s*($|\#)/ ;  my ($typ
e, $image);  if ( ($type
, $image) =       /^\s*(
.*?\S)\s+(\S+)\s*($proto
_re*)\s*$/o       # This
 may reference undefined
 functions:       and no
t ($image eq 'T_PACKED' 
and $typemap eq $stdtype
map)) {    $typemap{norm
alize_type($type)} = $im
age;  }       }     }   
  close(TYPEMAP) or die 
"Cannot close $typemap: 
$!";   }   %std_types = 
%types_seen;   %types_se
en = (); }   sub normali
ze_type { # Second arg:
 do not strip const's be
fore \*   my $type = shi
ft;   my $do_keep_deep_c
onst = shift;   # If $do
_keep_deep_const this is
 heuristical only   my $
keep_deep_const = ($do_k
eep_deep_const ? '\b(?![
^(,)]*\*)' : '');   my $
ignore_mods     = "(?:\\
b(?:(?:__const__|const)$
keep_deep_const|static|i
nline|__inline__)\\b\\s*
)*";   if ($do_keep_deep
_const) { # Keep differe
nt compiled /RExen/o sep
arately!     $type =~ s/
$ignore_mods//go;   }   
else {     $type =~ s/$i
gnore_mods//go;   }   $t
ype =~ s/([^\s\w])/ $1 /
g;   $type =~ s/\s+$//; 
  $type =~ s/^\s+//;   $
type =~ s/\s+/ /g;   $ty
pe =~ s/\* (?=\*)/*/g;  
 $type =~ s/\. \. \./...
/g;   $type =~ s/ ,/,/g;
   $types_seen{$type}++ 
    unless $type eq '...
' or $type eq 'void' or 
$std_types{$type};   $ty
pe; }  my $need_opaque; 
 sub assign_typemap_entr
y {   my $type = shift; 
  my $otype = $type;   m
y $entry;   if ($tmask a
nd $type =~ /$tmask/) { 
    print "Type $type ma
tches -o mask\n" if $opt
_d;     $entry = (td_is_
struct($type) ? "T_OPAQU
E_STRUCT" : "T_PTROBJ");
   }   elsif ($typedef_r
ex and $type =~ s/($type
def_rex)/$typedefs_pre{$
1}/go) {     $type = nor
malize_type $type;     p
rint "Type mutation via 
typedefs: $otype ==> $ty
pe\n" if $opt_d;     $en
try = assign_typemap_ent
ry($type);   }   # XXX g
ood do better if our UV 
happens to be long long 
  return "T_NV" if $type
 =~ /^(unsigned\s+)?long
\s+(long|double)\z/;   $
entry ||= $typemap{$otyp
e}     || (td_is_struct(
$type) ? "T_OPAQUE_STRUC
T" : "T_PTROBJ");   $typ
emap{$otype} = $entry;  
 $need_opaque = 1 if $en
try eq "T_OPAQUE_STRUCT"
;   return $entry; }  fo
r (@vdecls) {   print_ti
evar_xsubs(\*XS, $_, $vd
ecl_hash{$_}); }  if ($o
pt_x) {   for my $decl (
@$fdecls_parsed) { print
_decl(\*XS, $decl) }   i
f ($opt_a) {     while (
my($name, $struct) = eac
h %structs) {       prin
t_accessors(\*XS, $name,
 $struct);     }   } }  
close XS;  if (%types_se
en) {   my $type;   warn
 "Writing $ext$modpname/
typemap\n";   open TM, "
>typemap" or die "Cannot
 open typemap file for w
rite: $!";    for $type 
(sort keys %types_seen) 
{     my $entry = assign
_typemap_entry $type;   
  print TM $type, "\t" x
 (5 - int((length $type)
/8)), "\t$entry\n"   }  
  print TM <<'EOP' if $n
eed_opaque; # Older Perl
s do not have correct en
try ####################
########################
########################
######### INPUT T_OPAQUE
_STRUCT  if (sv_derived_
from($arg, \"${ntype}\")
) {      STRLEN len;    
  char  *s = SvPV((SV*)S
vRV($arg), len);       i
f (len != sizeof($var)) 
croak(\"Size %d of pac
ked data != expected %d\
",  len, sizeof($var))
;      $var = *($type *)
s;  }  else      croak(\
"$var is not of type ${n
type}\") ###############
########################
########################
############## OUTPUT T_
OPAQUE_STRUCT  sv_setref
_pvn($arg, \"${ntype}\",
 (char *)&$var, sizeof($
var)); EOP    close TM o
r die "Cannot close type
map file for write: $!";
 }  } # if( ! $opt_X )  
warn "Writing $ext$modpn
ame/Makefile.PL\n"; open
(PL, ">Makefile.PL") || 
die "Can't create $ext$m
odpname/Makefile.PL: $!\
n";  my $prereq_pm = '';
  if ( $compat_version <
 5.00702 and $new_test )
 {   $prereq_pm .= q%'Te
st::More'  =>  0, %; }  
if ( $compat_version < 5
.00600 and !$opt_X and $
use_xsloader) {   $prere
q_pm .= q%'XSLoader'  =>
  0, %; }  print PL <<"E
ND"; use $compat_version
; use ExtUtils::MakeMake
r; # See lib/ExtUtils/Ma
keMaker.pm for details o
f how to influence # the
 contents of the Makefil
e that is written. Write
Makefile(     NAME      
        => '$module',   
  VERSION_FROM      => '
$modpmname', # finds \$V
ERSION     PREREQ_PM    
     => {$prereq_pm}, # 
e.g., Module::Name => 1.
1     (\$] >= 5.005 ?   
  ## Add these new keywo
rds supported since 5.00
5       (ABSTRACT_FROM  
=> '$modpmname', # retri
eve abstract from module
        AUTHOR         =
> '$author <$email>') : 
()), END if (!$opt_X) { 
# print C stuff, unless 
XS is disabled   $opt_F 
= '' unless defined $opt
_F;   my $I = (((glob '*
.h') || (glob '*.hh')) ?
 '-I.' : '');   my $Ihel
p = ($I ? '-I. ' : ''); 
  my $Icomment = ($I ? '
' : <<EOC);  # Insert -I
. if you add *.h files l
ater: EOC    print PL <<
END;     LIBS           
   => ['$extralibs'], # 
e.g., '-lm'     DEFINE  
          => '$opt_F', #
 e.g., '-DHAVE_SOMETHING
' $Icomment    INC      
         => '$I', # e.g.
, '${Ihelp}-I/usr/includ
e/other' END    my $C = 
grep {$_ ne "$modfname.c
"}     (glob '*.c'), (gl
ob '*.cc'), (glob '*.C')
;   my $Cpre = ($C ? '' 
: '# ');   my $Ccomment 
= ($C ? '' : <<EOC);  # 
Un-comment this if you a
dd C files to link with 
later: EOC    print PL <
<END; $Ccomment    ${Cpr
e}OBJECT            => '
\$(O_FILES)', # link all
 the C files too END } #
 ' # Grr print PL ");\n"
; if (!$opt_c) {   my $g
enerate_code =     Write
MakefileSnippet ( C_FILE
 =>       $constscfname,
                        
    XS_FILE =>      $con
stsxsfname,             
               DEFAULT_T
YPE => $opt_t,          
                  NAME =
>         $module,      
                      NA
MES =>        \@const_na
mes,                  );
   print PL <<"END"; if 
 (eval {require ExtUtils
::Constant; 1}) {   # If
 you edit these definiti
ons to change the consta
nts used by this module,
   # you will need to us
e the generated $constsc
fname and $constsxsfname
   # files to replace th
eir "fallback" counterpa
rts before distributing 
your   # changes. $gener
ate_code } else {   use 
File::Copy;   use File::
Spec;   foreach my \$fil
e ('$constscfname', '$co
nstsxsfname') {     my \
$fallback = File::Spec->
catfile('$fallbackdirnam
e', \$file);     copy (\
$fallback, \$file) or di
e "Can't copy \$fallback
 to \$file: \$!";   } } 
END    eval $generate_co
de;   if ($@) {     warn
 <<"EOM"; Attempting to 
test constant code in $e
xt$modpname/Makefile.PL:
 $generate_code __END__ 
gave unexpected error $@
 Please report the circu
mstances of this bug in 
h2xs version $H2XS_VERSI
ON using the perlbug scr
ipt. EOM   } else {     
my $fail;      foreach m
y $file ($constscfname, 
$constsxsfname) {       
my $fallback = File::Spe
c->catfile($fallbackdirn
ame, $file);       if (c
ompare($file, $fallback)
) {         warn << "EOM
"; Files "$ext$modpname/
$fallbackdirname/$file" 
and "$ext$modpname/$file
" differ. EOM         $f
ail++;       }     }    
 if ($fail) {       warn
 fill ('','', <<"EOM") .
 "\n"; It appears that t
he code in $ext$modpname
/Makefile.PL does not au
togenerate the files $ex
t$modpname/$constscfname
 and $ext$modpname/$cons
tsxsfname correctly.  Pl
ease report the circumst
ances of this bug in h2x
s version $H2XS_VERSION 
using the perlbug script
. EOM     } else {      
 unlink $constscfname, $
constsxsfname;     }   }
 } close(PL) || die "Can
't close $ext$modpname/M
akefile.PL: $!\n";  # Cr
eate a simple README sin
ce this is a CPAN requir
ement # and it doesnt hu
rt to have one warn "Wri
ting $ext$modpname/READM
E\n"; open(RM, ">README"
) || die "Can't create $
ext$modpname/README:$!\n
"; my $thisyear = (gmtim
e)[5] + 1900; my $rmhead
 = "$modpname version $T
EMPLATE_VERSION"; my $rm
headeq = "=" x length($r
mhead);  my $rm_prereq; 
 if ( $compat_version < 
5.00702 and $new_test ) 
{    $rm_prereq = 'Test:
:More'; } else {    $rm_
prereq = 'blah blah blah
'; }  print RM <<_RMEND_
; $rmhead $rmheadeq  The
 README is used to intro
duce the module and prov
ide instructions on how 
to install the module, a
ny machine dependencies 
it may have (for example
 C compilers and install
ed libraries) and any ot
her information that sho
uld be provided before t
he module is installed. 
 A README file is requir
ed for CPAN modules sinc
e CPAN extracts the READ
ME file from a module di
stribution so that peopl
e browsing the archive c
an use it get an idea of
 the modules uses. It is
 usually a good idea to 
provide version informat
ion here so that people 
can decide whether fixes
 for the module are wort
h downloading.  INSTALLA
TION  To install this mo
dule type the following:
     perl Makefile.PL   
 make    make test    ma
ke install  DEPENDENCIES
  This module requires t
hese other modules and l
ibraries:    $rm_prereq 
 COPYRIGHT AND LICENCE  
Put the correct copyrigh
t and licence informatio
n here.  $licence  _RMEN
D_ close(RM) || die "Can
't close $ext$modpname/R
EADME: $!\n";  my $testd
ir  = "t"; my $testfile 
= "$testdir/$modpname.t"
; unless (-d "$testdir")
 {   mkdir "$testdir" or
 die "Cannot mkdir $test
dir: $!\n"; } warn "Writ
ing $ext$modpname/$testf
ile\n"; my $tests = @con
st_names ? 2 : 1;  open 
EX, ">$testfile" or die 
"Can't create $ext$modpn
ame/$testfile: $!\n";  p
rint EX <<_END_; # Befor
e `make install' is perf
ormed this script should
 be runnable with # `mak
e test'. After `make ins
tall' it should work as 
`perl $modpname.t'  ####
#####################  #
 change 'tests => $tests
' to 'tests => last_test
_to_print';  _END_  my $
test_mod = 'Test::More';
  if ( $old_test or ($co
mpat_version < 5.007 and
 not $new_test )) {   my
 $test_mod = 'Test';    
print EX <<_END_; use Te
st; BEGIN { plan tests =
> $tests }; use $module;
 ok(1); # If we made it 
this far, we're ok.  _EN
D_     if (@const_names)
 {      my $const_names 
= join " ", @const_names
;      print EX <<'_END_
';  my $fail; foreach my
 $constname (qw( _END_  
     print EX wrap ("\t"
, "\t", $const_names);  
    print EX (")) {\n");
       print EX <<_END_;
   next if (eval "my \\\
$a = \$constname; 1");  
 if (\$\@ =~ /^Your vend
or has not defined $modu
le macro \$constname/) {
     print "# pass: \$\@
";   } else {     print 
"# fail: \$\@";     \$fa
il = 1;   } } if (\$fail
) {   print "not ok 2\\n
"; } else {   print "ok 
2\\n"; }  _END_   } } el
se {   print EX <<_END_;
 use Test::More tests =>
 $tests; BEGIN { use_ok(
'$module') };  _END_    
 if (@const_names) {    
  my $const_names = join
 " ", @const_names;     
 print EX <<'_END_';  my
 $fail = 0; foreach my $
constname (qw( _END_    
   print EX wrap ("\t", 
"\t", $const_names);    
  print EX (")) {\n");  
     print EX <<_END_;  
 next if (eval "my \\\$a
 = \$constname; 1");   i
f (\$\@ =~ /^Your vendor
 has not defined $module
 macro \$constname/) {  
   print "# pass: \$\@";
   } else {     print "#
 fail: \$\@";     \$fail
 = 1;   }  }  ok( \$fail
 == 0 , 'Constants' ); _
END_   } }  print EX <<_
END_; ##################
#######  # Insert your t
est code below, the $tes
t_mod module is use()ed 
here so read # its man p
age ( perldoc $test_mod 
) for help writing this 
test script.  _END_  clo
se(EX) || die "Can't clo
se $ext$modpname/$testfi
le: $!\n";  unless ($opt
_C) {   warn "Writing $e
xt$modpname/Changes\n"; 
  $" = ' ';   open(EX, "
>Changes") || die "Can't
 create $ext$modpname/Ch
anges: $!\n";   @ARGS = 
map {/[\s\"\'\`\$*?^|&<>
\[\]\{\}\(\)]/ ? "'$_'" 
: $_} @ARGS;   print EX 
<<EOP; Revision history 
for Perl extension $modu
le.  $TEMPLATE_VERSION  
@{[scalar localtime]} \t
- original version; crea
ted by h2xs $H2XS_VERSIO
N with options \t\t@ARGS
  EOP   close(EX) || die
 "Can't close $ext$modpn
ame/Changes: $!\n"; }  w
arn "Writing $ext$modpna
me/MANIFEST\n"; open(MAN
I,'>MANIFEST') or die "C
an't create MANIFEST: $!
"; my @files = grep { -f
 } (<*>, <t/*>, <$fallba
ckdirname/*>, <$modpmdir
/*>); if (!@files) {   e
val {opendir(D,'.');};  
 unless ($@) { @files = 
readdir(D); closedir(D);
 } } if (!@files) { @fil
es = map {chomp && $_} `
ls`; } if ($^O eq 'VMS')
 {   foreach (@files) { 
    # Clip trailing '.' 
for portability -- non-V
MS OSs don't expect it  
   s%\.$%%;     # Fix up
 for case-sensitive file
 systems     s/$modfname
/$modfname/i && next;   
  $_ = "\U$_" if $_ eq '
manifest' or $_ eq 'chan
ges';     $_ = 'Makefile
.PL' if $_ eq 'makefile.
pl';   } } print MANI jo
in("\n",@files), "\n"; c
lose MANI; 

HEXDUMP: [Full] [Preview]
Base64: [Encode]  [+chunk]  [+chunk+quotes]  [Decode] 


:: Command execute ::

Enter:
 
Select:
 

:: Shadow's tricks :D ::

Useful Commands
 
Warning. Kernel may be alerted using higher levels
Kernel Info:

:: Preddy's tricks :D ::

Php Safe-Mode Bypass (Read Files)

File:

eg: /etc/passwd
Php Safe-Mode Bypass (List Directories):

Dir:

eg: /etc/

:: Search ::
  - regexp 
:: Upload ::
 
[ Read-Only ]

:: Make Dir ::
 
[ Read-Only ]
:: Make File ::
 
[ Read-Only ]

:: Go Dir ::
 
:: Go File ::
 

--[ c999shell v. 1.0 pre-release build #16 Modded by Shadow & Preddy | RootShell Security Group | r57 c99 shell | Generation time: 0.2474 ]--