BBS in a Box 15

home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 15 / BBS in a box XV-2.iso / Files II / Prog / M / MacPerl 4.13 source.sit / Perl Source ƒ / MacPerl / lib / timelocal.pl < prev next >
MacBinary | 1994-04-07 | 3.8 KB | [TEXT/MPS ]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: timelocal.pl
Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Claris Works palette files `(other/clarisWorksPaletteFiles)`	ext	Unsupported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Thu Apr 7 00:00:50 1994, modified Thu Apr 7 00:00:50 1994, creator 'MPS ', type ASCII, 2641 bytes "timelocal.pl" , at 0xad1 941 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[MPS ]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0c 74 69 6d 65 6c 6f | 63 61 6c 2e 70 6c 00 00 |..timelo|cal.pl..|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 01 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 0a 51 00 | 00 03 ad a9 c9 35 f2 a9 |......Q.|.....5..|
|00000060| c9 35 f2 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.5......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 ad 87 00 00 |........|........|
|00000080| 3b 23 20 74 69 6d 65 6c | 6f 63 61 6c 2e 70 6c 0d |;# timel|ocal.pl.|
|00000090| 3b 23 0d 3b 23 20 55 73 | 61 67 65 3a 0d 3b 23 09 |;#.;# Us|age:.;#.|
|000000a0| 24 74 69 6d 65 20 3d 20 | 74 69 6d 65 6c 6f 63 61 |$time = |timeloca|
|000000b0| 6c 28 24 73 65 63 2c 24 | 6d 69 6e 2c 24 68 6f 75 |l($sec,$|min,$hou|
|000000c0| 72 73 2c 24 6d 64 61 79 | 2c 24 6d 6f 6e 2c 24 79 |rs,$mday|,$mon,$y|
|000000d0| 65 61 72 29 3b 0d 3b 23 | 09 24 74 69 6d 65 20 3d |ear);.;#|.$time =|
|000000e0| 20 74 69 6d 65 67 6d 28 | 24 73 65 63 2c 24 6d 69 | timegm(|$sec,$mi|
|000000f0| 6e 2c 24 68 6f 75 72 73 | 2c 24 6d 64 61 79 2c 24 |n,$hours|,$mday,$|
|00000100| 6d 6f 6e 2c 24 79 65 61 | 72 29 3b 0d 0d 3b 23 20 |mon,$yea|r);..;# |
|00000110| 54 68 65 73 65 20 72 6f | 75 74 69 6e 65 73 20 61 |These ro|utines a|
|00000120| 72 65 20 71 75 69 74 65 | 20 65 66 66 69 63 69 65 |re quite| efficie|
|00000130| 6e 74 20 61 6e 64 20 79 | 65 74 20 61 72 65 20 61 |nt and y|et are a|
|00000140| 6c 77 61 79 73 20 67 75 | 61 72 61 6e 74 65 65 64 |lways gu|aranteed|
|00000150| 20 74 6f 20 61 67 72 65 | 65 0d 3b 23 20 77 69 74 | to agre|e.;# wit|
|00000160| 68 20 6c 6f 63 61 6c 74 | 69 6d 65 28 29 20 61 6e |h localt|ime() an|
|00000170| 64 20 67 6d 74 69 6d 65 | 28 29 2e 20 20 57 65 20 |d gmtime|().  We |
|00000180| 6d 61 6e 61 67 65 20 74 | 68 69 73 20 62 79 20 63 |manage t|his by c|
|00000190| 61 63 68 69 6e 67 20 74 | 68 65 20 73 74 61 72 74 |aching t|he start|
|000001a0| 20 74 69 6d 65 73 0d 3b | 23 20 6f 66 20 61 6e 79 | times.;|# of any|
|000001b0| 20 6d 6f 6e 74 68 73 20 | 77 65 27 76 65 20 73 65 | months |we've se|
|000001c0| 65 6e 20 62 65 66 6f 72 | 65 2e 20 20 49 66 20 77 |en befor|e.  If w|
|000001d0| 65 20 6b 6e 6f 77 20 74 | 68 65 20 73 74 61 72 74 |e know t|he start|
|000001e0| 20 74 69 6d 65 20 6f 66 | 20 74 68 65 20 6d 6f 6e | time of| the mon|
|000001f0| 74 68 2c 0d 3b 23 20 77 | 65 20 63 61 6e 20 61 6c |th,.;# w|e can al|
|00000200| 77 61 79 73 20 63 61 6c | 63 75 6c 61 74 65 20 61 |ways cal|culate a|
|00000210| 6e 79 20 74 69 6d 65 20 | 77 69 74 68 69 6e 20 74 |ny time |within t|
|00000220| 68 65 20 6d 6f 6e 74 68 | 2e 20 20 54 68 65 20 73 |he month|.  The s|
|00000230| 74 61 72 74 20 74 69 6d | 65 73 0d 3b 23 20 74 68 |tart tim|es.;# th|
|00000240| 65 6d 73 65 6c 76 65 73 | 20 61 72 65 20 67 75 65 |emselves| are gue|
|00000250| 73 73 65 64 20 62 79 20 | 73 75 63 63 65 73 73 69 |ssed by |successi|
|00000260| 76 65 20 61 70 70 72 6f | 78 69 6d 61 74 69 6f 6e |ve appro|ximation|
|00000270| 20 73 74 61 72 74 69 6e | 67 20 61 74 20 74 68 65 | startin|g at the|
|00000280| 0d 3b 23 20 63 75 72 72 | 65 6e 74 20 74 69 6d 65 |.;# curr|ent time|
|00000290| 2c 20 73 69 6e 63 65 20 | 6d 6f 73 74 20 64 61 74 |, since |most dat|
|000002a0| 65 73 20 73 65 65 6e 20 | 69 6e 20 70 72 61 63 74 |es seen |in pract|
|000002b0| 69 63 65 20 61 72 65 20 | 63 6c 6f 73 65 20 74 6f |ice are |close to|
|000002c0| 20 74 68 65 0d 3b 23 20 | 63 75 72 72 65 6e 74 20 | the.;# |current |
|000002d0| 64 61 74 65 2e 20 20 55 | 6e 6c 69 6b 65 20 61 6c |date.  U|nlike al|
|000002e0| 67 6f 72 69 74 68 6d 73 | 20 74 68 61 74 20 64 6f |gorithms| that do|
|000002f0| 20 61 20 62 69 6e 61 72 | 79 20 73 65 61 72 63 68 | a binar|y search|
|00000300| 20 28 63 61 6c 6c 69 6e | 67 20 67 6d 74 69 6d 65 | (callin|g gmtime|
|00000310| 0d 3b 23 20 6f 6e 63 65 | 20 66 6f 72 20 65 61 63 |.;# once| for eac|
|00000320| 68 20 62 69 74 20 6f 66 | 20 74 68 65 20 74 69 6d |h bit of| the tim|
|00000330| 65 20 76 61 6c 75 65 2c | 20 72 65 73 75 6c 74 69 |e value,| resulti|
|00000340| 6e 67 20 69 6e 20 33 32 | 20 63 61 6c 6c 73 29 2c |ng in 32| calls),|
|00000350| 20 74 68 69 73 20 61 6c | 67 6f 72 69 74 68 6d 0d | this al|gorithm.|
|00000360| 3b 23 20 63 61 6c 6c 73 | 20 69 74 20 61 74 20 6d |;# calls| it at m|
|00000370| 6f 73 74 20 36 20 74 69 | 6d 65 73 2c 20 61 6e 64 |ost 6 ti|mes, and|
|00000380| 20 75 73 75 61 6c 6c 79 | 20 6f 6e 6c 79 20 6f 6e | usually| only on|
|00000390| 63 65 20 6f 72 20 74 77 | 69 63 65 2e 20 20 49 66 |ce or tw|ice.  If|
|000003a0| 20 79 6f 75 20 68 69 74 | 0d 3b 23 20 74 68 65 20 | you hit|.;# the |
|000003b0| 6d 6f 6e 74 68 20 63 61 | 63 68 65 2c 20 6f 66 20 |month ca|che, of |
|000003c0| 63 6f 75 72 73 65 2c 20 | 69 74 20 64 6f 65 73 6e |course, |it doesn|
|000003d0| 27 74 20 63 61 6c 6c 20 | 69 74 20 61 74 20 61 6c |'t call |it at al|
|000003e0| 6c 2e 0d 0d 3b 23 20 74 | 69 6d 65 6c 6f 63 61 6c |l...;# t|imelocal|
|000003f0| 20 69 73 20 69 6d 70 6c | 65 6d 65 6e 74 65 64 20 | is impl|emented |
|00000400| 75 73 69 6e 67 20 74 68 | 65 20 73 61 6d 65 20 63 |using th|e same c|
|00000410| 61 63 68 65 2e 20 20 57 | 65 20 6a 75 73 74 20 61 |ache.  W|e just a|
|00000420| 73 73 75 6d 65 20 74 68 | 61 74 20 77 65 27 72 65 |ssume th|at we're|
|00000430| 0d 3b 23 20 74 72 61 6e | 73 6c 61 74 69 6e 67 20 |.;# tran|slating |
|00000440| 61 20 47 4d 54 20 74 69 | 6d 65 2c 20 61 6e 64 20 |a GMT ti|me, and |
|00000450| 74 68 65 6e 20 66 75 64 | 67 65 20 69 74 20 77 68 |then fud|ge it wh|
|00000460| 65 6e 20 77 65 27 72 65 | 20 64 6f 6e 65 20 66 6f |en we're| done fo|
|00000470| 72 20 74 68 65 20 74 69 | 6d 65 7a 6f 6e 65 0d 3b |r the ti|mezone.;|
|00000480| 23 20 61 6e 64 20 64 61 | 79 6c 69 67 68 74 20 73 |# and da|ylight s|
|00000490| 61 76 69 6e 67 73 20 61 | 72 67 75 6d 65 6e 74 73 |avings a|rguments|
|000004a0| 2e 20 20 54 68 65 20 74 | 69 6d 65 7a 6f 6e 65 20 |.  The t|imezone |
|000004b0| 69 73 20 64 65 74 65 72 | 6d 69 6e 65 64 20 62 79 |is deter|mined by|
|000004c0| 20 65 78 61 6d 69 6e 69 | 6e 67 0d 3b 23 20 74 68 | examini|ng.;# th|
|000004d0| 65 20 72 65 73 75 6c 74 | 20 6f 66 20 6c 6f 63 61 |e result| of loca|
|000004e0| 6c 74 69 6d 65 28 30 29 | 20 77 68 65 6e 20 74 68 |ltime(0)| when th|
|000004f0| 65 20 70 61 63 6b 61 67 | 65 20 69 73 20 69 6e 69 |e packag|e is ini|
|00000500| 74 69 61 6c 69 7a 65 64 | 2e 20 20 54 68 65 20 64 |tialized|.  The d|
|00000510| 61 79 6c 69 67 68 74 0d | 3b 23 20 73 61 76 69 6e |aylight.|;# savin|
|00000520| 67 73 20 6f 66 66 73 65 | 74 20 69 73 20 63 75 72 |gs offse|t is cur|
|00000530| 72 65 6e 74 6c 79 20 61 | 73 73 75 6d 65 64 20 74 |rently a|ssumed t|
|00000540| 6f 20 62 65 20 6f 6e 65 | 20 68 6f 75 72 2e 0d 0d |o be one| hour...|
|00000550| 43 4f 4e 46 49 47 3a 20 | 7b 0d 20 20 20 20 70 61 |CONFIG: |{.    pa|
|00000560| 63 6b 61 67 65 20 74 69 | 6d 65 6c 6f 63 61 6c 3b |ckage ti|melocal;|
|00000570| 0d 20 20 20 20 0d 20 20 | 20 20 6c 6f 63 61 6c 28 |.    .  |  local(|
|00000580| 24 5b 29 20 3d 20 30 3b | 0d 20 20 20 20 40 65 70 |$[) = 0;|.    @ep|
|00000590| 6f 63 68 20 3d 20 6c 6f | 63 61 6c 74 69 6d 65 28 |och = lo|caltime(|
|000005a0| 30 29 3b 0d 20 20 20 20 | 24 74 7a 6d 69 6e 20 3d |0);.    |$tzmin =|
|000005b0| 20 24 65 70 6f 63 68 5b | 32 5d 20 2a 20 36 30 20 | $epoch[|2] * 60 |
|000005c0| 2b 20 24 65 70 6f 63 68 | 5b 31 5d 3b 09 23 20 6d |+ $epoch|[1];.# m|
|000005d0| 69 6e 75 74 65 73 20 65 | 61 73 74 20 6f 66 20 47 |inutes e|ast of G|
|000005e0| 4d 54 0d 20 20 20 20 69 | 66 20 28 24 74 7a 6d 69 |MT.    i|f ($tzmi|
|000005f0| 6e 20 3e 20 30 29 20 7b | 0d 09 24 74 7a 6d 69 6e |n > 0) {|..$tzmin|
|00000600| 20 3d 20 32 34 20 2a 20 | 36 30 20 2d 20 24 74 7a | = 24 * |60 - $tz|
|00000610| 6d 69 6e 3b 09 09 23 20 | 6d 69 6e 75 74 65 73 20 |min;..# |minutes |
|00000620| 77 65 73 74 20 6f 66 20 | 47 4d 54 0d 09 24 74 7a |west of |GMT..$tz|
|00000630| 6d 69 6e 20 2d 3d 20 32 | 34 20 2a 20 36 30 20 69 |min -= 2|4 * 60 i|
|00000640| 66 20 24 65 70 6f 63 68 | 5b 35 5d 20 3d 3d 20 37 |f $epoch|[5] == 7|
|00000650| 30 3b 09 23 20 61 63 63 | 6f 75 6e 74 20 66 6f 72 |0;.# acc|ount for|
|00000660| 20 74 68 65 20 64 61 74 | 65 20 6c 69 6e 65 0d 20 | the dat|e line. |
|00000670| 20 20 20 7d 0d 0d 20 20 | 20 20 24 53 45 43 20 3d |   }..  |  $SEC =|
|00000680| 20 31 3b 0d 20 20 20 20 | 24 4d 49 4e 20 3d 20 36 | 1;.    |$MIN = 6|
|00000690| 30 20 2a 20 24 53 45 43 | 3b 0d 20 20 20 20 24 48 |0 * $SEC|;.    $H|
|000006a0| 52 20 3d 20 36 30 20 2a | 20 24 4d 49 4e 3b 0d 20 |R = 60 *| $MIN;. |
|000006b0| 20 20 20 24 44 41 59 53 | 20 3d 20 32 34 20 2a 20 |   $DAYS| = 24 * |
|000006c0| 24 48 52 3b 0d 20 20 20 | 20 24 59 65 61 72 46 69 |$HR;.   | $YearFi|
|000006d0| 78 20 3d 20 28 28 67 6d | 74 69 6d 65 28 33 30 32 |x = ((gm|time(302|
|000006e0| 39 35 33 33 32 30 30 29 | 29 5b 35 5d 20 3d 3d 20 |9533200)|)[5] == |
|000006f0| 31 30 30 29 20 3f 20 31 | 30 30 20 3a 20 30 3b 0d |100) ? 1|00 : 0;.|
|00000700| 23 20 20 20 20 24 59 65 | 61 72 46 69 78 20 3d 20 |#    $Ye|arFix = |
|00000710| 28 28 67 6d 74 69 6d 65 | 28 39 34 36 36 38 34 38 |((gmtime|(9466848|
|00000720| 30 30 29 29 5b 35 5d 20 | 3d 3d 20 31 30 30 29 20 |00))[5] |== 100) |
|00000730| 3f 20 31 30 30 20 3a 20 | 30 3b 0d 7d 0d 0d 73 75 |? 100 : |0;.}..su|
|00000740| 62 20 74 69 6d 65 67 6d | 20 7b 0d 20 20 20 20 70 |b timegm| {.    p|
|00000750| 61 63 6b 61 67 65 20 74 | 69 6d 65 6c 6f 63 61 6c |ackage t|imelocal|
|00000760| 3b 0d 0d 20 20 20 20 6c | 6f 63 61 6c 28 24 5b 29 |;..    l|ocal($[)|
|00000770| 20 3d 20 30 3b 0d 20 20 | 20 20 24 79 6d 20 3d 20 | = 0;.  |  $ym = |
|00000780| 70 61 63 6b 28 43 32 2c | 20 40 5f 5b 35 2c 34 5d |pack(C2,| @_[5,4]|
|00000790| 29 3b 0d 20 20 20 20 24 | 63 68 65 61 74 20 3d 20 |);.    $|cheat = |
|000007a0| 24 63 68 65 61 74 7b 24 | 79 6d 7d 20 7c 7c 20 26 |$cheat{$|ym} || &|
|000007b0| 63 68 65 61 74 3b 0d 20 | 20 20 20 24 63 68 65 61 |cheat;. |   $chea|
|000007c0| 74 20 2b 20 24 5f 5b 30 | 5d 20 2a 20 24 53 45 43 |t + $_[0|] * $SEC|
|000007d0| 20 2b 20 24 5f 5b 31 5d | 20 2a 20 24 4d 49 4e 20 | + $_[1]| * $MIN |
|000007e0| 2b 20 24 5f 5b 32 5d 20 | 2a 20 24 48 52 20 2b 20 |+ $_[2] |* $HR + |
|000007f0| 28 24 5f 5b 33 5d 2d 31 | 29 20 2a 20 24 44 41 59 |($_[3]-1|) * $DAY|
|00000800| 53 3b 0d 7d 0d 0d 73 75 | 62 20 74 69 6d 65 6c 6f |S;.}..su|b timelo|
|00000810| 63 61 6c 20 7b 0d 20 20 | 20 20 70 61 63 6b 61 67 |cal {.  |  packag|
|00000820| 65 20 74 69 6d 65 6c 6f | 63 61 6c 3b 0d 0d 20 20 |e timelo|cal;..  |
|00000830| 20 20 6c 6f 63 61 6c 28 | 24 5b 29 20 3d 20 30 3b |  local(|$[) = 0;|
|00000840| 0d 20 20 20 20 24 74 69 | 6d 65 20 3d 20 26 6d 61 |.    $ti|me = &ma|
|00000850| 69 6e 27 74 69 6d 65 67 | 6d 20 2b 20 24 74 7a 6d |in'timeg|m + $tzm|
|00000860| 69 6e 2a 24 4d 49 4e 3b | 0d 20 20 20 20 40 74 65 |in*$MIN;|.    @te|
|00000870| 73 74 20 3d 20 6c 6f 63 | 61 6c 74 69 6d 65 28 24 |st = loc|altime($|
|00000880| 74 69 6d 65 29 3b 0d 20 | 20 20 20 24 74 69 6d 65 |time);. |   $time|
|00000890| 20 2d 3d 20 24 48 52 20 | 69 66 20 24 74 65 73 74 | -= $HR |if $test|
|000008a0| 5b 32 5d 20 21 3d 20 24 | 5f 5b 32 5d 3b 0d 20 20 |[2] != $|_[2];.  |
|000008b0| 20 20 24 74 69 6d 65 3b | 0d 7d 0d 0d 70 61 63 6b |  $time;|.}..pack|
|000008c0| 61 67 65 20 74 69 6d 65 | 6c 6f 63 61 6c 3b 0d 0d |age time|local;..|
|000008d0| 73 75 62 20 63 68 65 61 | 74 20 7b 0d 20 20 20 20 |sub chea|t {.    |
|000008e0| 24 79 65 61 72 20 3d 20 | 24 5f 5b 35 5d 3b 0d 20 |$year = |$_[5];. |
|000008f0| 20 20 20 24 6d 6f 6e 74 | 68 20 3d 20 24 5f 5b 34 |   $mont|h = $_[4|
|00000900| 5d 3b 0d 20 20 20 20 64 | 69 65 20 22 4d 6f 6e 74 |];.    d|ie "Mont|
|00000910| 68 20 6f 75 74 20 6f 66 | 20 72 61 6e 67 65 20 30 |h out of| range 0|
|00000920| 2e 2e 31 31 20 69 6e 20 | 63 74 69 6d 65 2e 70 6c |..11 in |ctime.pl|
|00000930| 5c 6e 22 20 69 66 20 24 | 6d 6f 6e 74 68 20 3e 20 |\n" if $|month > |
|00000940| 31 31 3b 0d 20 20 20 20 | 24 67 75 65 73 73 20 3d |11;.    |$guess =|
|00000950| 20 24 5e 54 3b 0d 20 20 | 20 20 40 67 20 3d 20 67 | $^T;.  |  @g = g|
|00000960| 6d 74 69 6d 65 28 24 67 | 75 65 73 73 29 3b 0d 20 |mtime($g|uess);. |
|00000970| 20 20 20 24 79 65 61 72 | 20 2b 3d 20 24 59 65 61 |   $year| += $Yea|
|00000980| 72 46 69 78 20 69 66 20 | 24 79 65 61 72 20 3c 20 |rFix if |$year < |
|00000990| 24 65 70 6f 63 68 5b 35 | 5d 3b 0d 20 20 20 20 77 |$epoch[5|];.    w|
|000009a0| 68 69 6c 65 20 28 24 64 | 69 66 66 20 3d 20 24 79 |hile ($d|iff = $y|
|000009b0| 65 61 72 20 2d 20 24 67 | 5b 35 5d 29 20 7b 0d 09 |ear - $g|[5]) {..|
|000009c0| 24 67 75 65 73 73 20 2b | 3d 20 24 64 69 66 66 20 |$guess +|= $diff |
|000009d0| 2a 20 28 33 36 33 20 2a | 20 24 44 41 59 53 29 3b |* (363 *| $DAYS);|
|000009e0| 0d 09 40 67 20 3d 20 67 | 6d 74 69 6d 65 28 24 67 |..@g = g|mtime($g|
|000009f0| 75 65 73 73 29 3b 0d 20 | 20 20 20 7d 0d 20 20 20 |uess);. |   }.   |
|00000a00| 20 77 68 69 6c 65 20 28 | 24 64 69 66 66 20 3d 20 | while (|$diff = |
|00000a10| 24 6d 6f 6e 74 68 20 2d | 20 24 67 5b 34 5d 29 20 |$month -| $g[4]) |
|00000a20| 7b 0d 09 24 67 75 65 73 | 73 20 2b 3d 20 24 64 69 |{..$gues|s += $di|
|00000a30| 66 66 20 2a 20 28 32 37 | 20 2a 20 24 44 41 59 53 |ff * (27| * $DAYS|
|00000a40| 29 3b 0d 09 40 67 20 3d | 20 67 6d 74 69 6d 65 28 |);..@g =| gmtime(|
|00000a50| 24 67 75 65 73 73 29 3b | 0d 20 20 20 20 7d 0d 20 |$guess);|.    }. |
|00000a60| 20 20 20 24 67 5b 33 5d | 2d 2d 3b 0d 20 20 20 20 |   $g[3]|--;.    |
|00000a70| 24 67 75 65 73 73 20 2d | 3d 20 24 67 5b 30 5d 20 |$guess -|= $g[0] |
|00000a80| 2a 20 24 53 45 43 20 2b | 20 24 67 5b 31 5d 20 2a |* $SEC +| $g[1] *|
|00000a90| 20 24 4d 49 4e 20 2b 20 | 24 67 5b 32 5d 20 2a 20 | $MIN + |$g[2] * |
|00000aa0| 24 48 52 20 2b 20 24 67 | 5b 33 5d 20 2a 20 24 44 |$HR + $g|[3] * $D|
|00000ab0| 41 59 53 3b 0d 20 20 20 | 20 24 63 68 65 61 74 7b |AYS;.   | $cheat{|
|00000ac0| 24 79 6d 7d 20 3d 20 24 | 67 75 65 73 73 3b 0d 7d |$ym} = $|guess;.}|
|00000ad0| 0d 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000af0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b00| 00 00 01 00 00 00 03 0a | 00 00 02 0a 00 00 00 a3 |........|........|
|00000b10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b30| 0c 74 69 6d 65 6c 6f 63 | 61 6c 2e 70 6c 2d 02 00 |.timeloc|al.pl-..|
|00000b40| 00 00 54 45 58 54 4d 50 | 53 20 01 00 01 a0 00 50 |..TEXTMP|S .....P|
|00000b50| 00 00 54 45 58 54 4d 50 | 53 20 01 00 01 a0 00 50 |..TEXTMP|S .....P|
|00000b60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b70| 00 00 a8 ee 29 0c 00 00 | 0a 51 00 00 03 ad 43 6c |....)...|.Q....Cl|
|00000b80| 61 73 73 69 63 20 54 65 | 78 74 75 72 65 73 aa 20 |assic Te|xtures. |
|00000b90| 23 31 00 00 a8 29 0d ef | 42 44 00 04 00 00 00 01 |#1...)..|BD......|
|00000ba0| 19 41 31 32 34 20 43 6c | 61 73 73 69 63 20 54 65 |.A124 Cl|assic Te|
|00000bb0| 78 74 75 72 65 73 aa 20 | 23 31 00 00 00 00 00 00 |xtures. |#1......|
|00000bc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000be0| 00 00 00 02 a8 29 0d f1 | 00 2f 00 09 01 1f 01 19 |.....)..|./......|
|00000bf0| ff ff ff ff 00 00 00 02 | 00 00 00 00 00 00 00 00 |........|........|
|00000c00| 00 00 00 78 00 03 00 00 | 00 48 00 48 00 00 00 00 |...x....|.H.H....|
|00000c10| 02 d8 02 28 ff e1 ff e2 | 02 f9 02 46 03 47 05 28 |...(....|...F.G.(|
|00000c20| 03 fc 00 02 00 00 00 48 | 00 48 00 00 00 00 02 d8 |.......H|.H......|
|00000c30| 02 28 00 01 00 00 00 64 | 00 00 00 01 00 03 03 03 |.(.....d|........|
|00000c40| 00 00 00 01 27 0f 00 01 | 00 01 00 00 00 00 00 00 |....'...|........|
|00000c50| 00 00 00 00 00 00 68 08 | 00 19 01 90 00 00 00 00 |......h.|........|
|00000c60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 01 10 |........|........|
|00000c80| 00 72 01 8a 01 98 03 42 | 06 47 65 6e 65 76 61 54 |.r.....B|.GenevaT|
|00000c90| 02 16 3a 20 00 00 00 00 | 6e 75 6c 6c 00 00 00 00 |..: ....|null....|
|00000ca0| 00 01 6f 62 6a 20 02 16 | 3a a4 6e 61 6d 65 00 02 |..obj ..|:.name..|
|00000cb0| 00 00 00 00 00 00 00 00 | 00 00 00 60 00 01 d0 e4 |........|...`....|
|00000cc0| 00 00 00 04 00 00 00 00 | 77 61 6e 74 74 79 70 65 |........|wanttype|
|00000cd0| 00 00 00 04 63 77 69 6e | 66 72 6f 6d 6e 75 6c 6c |....cwin|fromnull|
|00000ce0| 00 00 00 00 66 6f 72 6d | 65 6e 75 6d 00 00 00 04 |....form|enum....|
|00000cf0| 6e 61 6d 65 73 65 6c 64 | 54 45 58 54 00 00 00 0c |nameseld|TEXT....|
|00000d00| 74 69 6d 65 6c 6f 63 61 | 6c 2e 70 6c 65 6e 75 6d |timeloca|l.plenum|
|00000d10| 00 00 00 04 00 00 00 00 | 00 00 00 f0 00 00 b5 1c |........|........|
|00000d20| 02 16 3a c0 00 00 00 00 | 00 00 00 60 6f 62 6a 20 |..:.....|...`obj |
|00000d30| 00 00 00 04 00 00 00 00 | 00 00 00 50 74 79 70 65 |........|...Ptype|
|00000d40| 00 00 00 04 63 77 69 6e | 66 72 6f 6d 6e 75 6c 6c |....cwin|fromnull|
|00000d50| 00 00 00 00 66 6f 72 6d | 65 6e 75 6d 00 00 00 04 |....form|enum....|
|00000d60| 6e 61 6d 65 73 65 6c 64 | 54 45 58 54 00 00 00 0c |nameseld|TEXT....|
|00000d70| 74 69 6d 65 6c 6f 63 61 | 6c 2e 70 6c 00 00 00 4c |timeloca|l.pl...L|
|00000d80| 00 00 00 04 00 00 00 00 | 00 0c 00 80 00 00 00 00 |........|........|
|00000d90| 00 00 00 08 07 4d 61 63 | 50 65 72 6c 00 00 00 48 |.....Mac|Perl...H|
|00000da0| 00 09 4d 6f 6e 61 63 6f | 00 0a fc 18 00 00 00 14 |..Monaco|........|
|00000db0| 00 02 59 60 00 0a 00 c6 | 00 09 00 d1 02 0a 00 0a |..Y`....|........|
|00000dc0| 00 00 00 06 00 08 00 3c | 00 24 01 dd 02 3d 00 3c |.......<|.$...=.<|
|00000dd0| 00 24 01 dd 02 3d a9 c8 | ef a2 00 00 0a 51 00 00 |.$...=..|.....Q..|
|00000de0| 0a 51 00 00 00 00 01 00 | 00 00 00 1e 00 3c 00 24 |.Q......|.....<.$|
|00000df0| 01 dd 02 3d 00 3c 00 24 | 01 dd 02 3d 00 00 00 00 |...=.<.$|...=....|
|00000e00| 00 00 00 00 00 00 00 00 | 00 00 00 00 01 00 00 00 |........|........|
|00000e10| 03 0a 00 00 02 0a 00 00 | 00 a3 00 37 94 18 13 1a |........|...7....|
|00000e20| 00 00 00 1c 00 7a 00 03 | 54 46 53 50 00 00 00 22 |.....z..|TFSP..."|
|00000e30| 54 46 53 53 00 00 00 2e | 53 54 52 20 00 00 00 3a |TFSS....|STR ...:|
|00000e40| 4d 50 53 52 00 01 00 46 | 00 ff 00 00 00 00 00 00 |MPSR...F|........|
|00000e50| 00 00 00 00 00 ff 00 0d | 00 00 00 7c 00 00 00 00 |........|...|....|
|00000e60| bf f4 00 19 00 00 01 90 | 00 00 00 00 03 ed ff ff |........|........|
|00000e70| 00 00 01 9c 00 00 00 00 | 03 f0 ff ff 00 00 01 e8 |........|........|
|00000e80| 00 39 eb 2c 0c 50 72 69 | 6e 74 65 72 20 49 6e 66 |.9.,.Pri|nter Inf|
|00000e90| 6f 0b 48 65 61 64 65 72 | 20 49 6e 66 6f 0f 46 69 |o.Header| Info.Fi|
|00000ea0| 6e 64 65 72 20 41 70 70 | 20 49 6e 66 6f 00 00 00 |nder App| Info...|
|00000eb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ec0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ed0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ee0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+