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 ƒ / Perl / t / mac / FAccess.t < prev next >

MacBinary | 1993-12-14 | 1.6 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: FAccess.t

Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	E-Tracker Chiptune `(music/eTracker)`	ext	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Simis `(archive/simis)`	ext	Unsupported
`1%`	dexvert	TADS `(other/tads)`	ext	Unsupported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, Tue Dec 14 22:50:59 1993, modified Tue Dec 14 22:50:59 1993, creator 'MPS ', type ASCII, 987 bytes "FAccess.t"	default (weak)
`99%`	file	a perl script executable (binary data), at 0x45b 428 bytes resource	default (weak)
`98%`	file	a perl script executable (binary data)	default (weak)
`97%`	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 09 46 41 63 63 65 73 | 73 2e 74 00 00 00 00 00 |..FAcces|s.t.....|
|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 00 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 03 db 00 | 00 01 ac a9 34 3a 23 a9 |........|....4:#.|
|00000060| 34 3a 23 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |4:#.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 6f 0d 00 00 |........|....o...|
|00000080| 23 21 70 65 72 6c 0d 0d | 72 65 71 75 69 72 65 20 |#!perl..|require |
|00000090| 22 46 41 63 63 65 73 73 | 2e 70 68 22 3b 0d 0d 70 |"FAccess|.ph";..p|
|000000a0| 72 69 6e 74 20 26 4d 61 | 63 50 65 72 6c 27 46 41 |rint &Ma|cPerl'FA|
|000000b0| 63 63 65 73 73 28 22 24 | 45 4e 56 7b 4d 50 57 7d |ccess("$|ENV{MPW}|
|000000c0| 57 6f 72 6b 73 68 65 65 | 74 22 2c 20 26 46 5f 47 |Workshee|t", &F_G|
|000000d0| 54 41 42 49 4e 46 4f 29 | 2c 20 22 5c 6e 22 3b 0d |TABINFO)|, "\n";.|
|000000e0| 26 4d 61 63 50 65 72 6c | 27 46 41 63 63 65 73 73 |&MacPerl|'FAccess|
|000000f0| 28 22 24 45 4e 56 7b 4d | 50 57 7d 57 6f 72 6b 73 |("$ENV{M|PW}Works|
|00000100| 68 65 65 74 22 2c 20 26 | 46 5f 53 54 41 42 49 4e |heet", &|F_STABIN|
|00000110| 46 4f 2c 20 37 29 3b 0d | 24 72 65 73 20 3d 20 26 |FO, 7);.|$res = &|
|00000120| 4d 61 63 50 65 72 6c 27 | 46 41 63 63 65 73 73 28 |MacPerl'|FAccess(|
|00000130| 22 24 45 4e 56 7b 4d 50 | 57 7d 57 6f 72 6b 73 68 |"$ENV{MP|W}Worksh|
|00000140| 65 65 74 22 2c 20 26 46 | 5f 47 46 4f 4e 54 49 4e |eet", &F|_GFONTIN|
|00000150| 46 4f 29 3b 0d 70 72 69 | 6e 74 20 22 24 72 65 73 |FO);.pri|nt "$res|
|00000160| 5c 6e 22 3b 0d 70 72 69 | 6e 74 20 6a 6f 69 6e 28 |\n";.pri|nt join(|
|00000170| 22 2c 20 22 2c 20 26 4d | 61 63 50 65 72 6c 27 46 |", ", &M|acPerl'F|
|00000180| 41 63 63 65 73 73 28 22 | 24 45 4e 56 7b 4d 50 57 |Access("|$ENV{MPW|
|00000190| 7d 57 6f 72 6b 73 68 65 | 65 74 22 2c 20 26 46 5f |}Workshe|et", &F_|
|000001a0| 47 46 4f 4e 54 49 4e 46 | 4f 29 29 2c 20 22 5c 6e |GFONTINF|O)), "\n|
|000001b0| 22 3b 0d 23 20 26 4d 61 | 63 50 65 72 6c 27 46 41 |";.# &Ma|cPerl'FA|
|000001c0| 63 63 65 73 73 28 22 24 | 45 4e 56 7b 4d 50 57 7d |ccess("$|ENV{MPW}|
|000001d0| 57 6f 72 6b 73 68 65 65 | 74 22 2c 20 26 46 5f 53 |Workshee|t", &F_S|
|000001e0| 46 4f 4e 54 49 4e 46 4f | 2c 20 22 43 68 69 63 61 |FONTINFO|, "Chica|
|000001f0| 67 6f 22 2c 20 31 32 29 | 3b 0d 26 4d 61 63 50 65 |go", 12)|;.&MacPe|
|00000200| 72 6c 27 46 41 63 63 65 | 73 73 28 22 24 45 4e 56 |rl'FAcce|ss("$ENV|
|00000210| 7b 4d 50 57 7d 57 6f 72 | 6b 73 68 65 65 74 22 2c |{MPW}Wor|ksheet",|
|00000220| 20 26 46 5f 53 46 4f 4e | 54 49 4e 46 4f 2c 20 22 | &F_SFON|TINFO, "|
|00000230| 47 65 6e 65 76 61 22 29 | 3b 0d 23 20 26 4d 61 63 |Geneva")|;.# &Mac|
|00000240| 50 65 72 6c 27 46 41 63 | 63 65 73 73 28 22 24 45 |Perl'FAc|cess("$E|
|00000250| 4e 56 7b 4d 50 57 7d 57 | 6f 72 6b 73 68 65 65 74 |NV{MPW}W|orksheet|
|00000260| 22 2c 20 26 46 5f 53 46 | 4f 4e 54 49 4e 46 4f 2c |", &F_SF|ONTINFO,|
|00000270| 20 34 2c 20 39 29 3b 0d | 24 72 65 73 20 3d 20 26 | 4, 9);.|$res = &|
|00000280| 4d 61 63 50 65 72 6c 27 | 46 41 63 63 65 73 73 28 |MacPerl'|FAccess(|
|00000290| 22 24 45 4e 56 7b 4d 50 | 57 7d 57 6f 72 6b 73 68 |"$ENV{MP|W}Worksh|
|000002a0| 65 65 74 22 2c 20 26 46 | 5f 47 57 49 4e 49 4e 46 |eet", &F|_GWININF|
|000002b0| 4f 29 3b 0d 70 72 69 6e | 74 20 22 24 72 65 73 5c |O);.prin|t "$res\|
|000002c0| 6e 22 3b 0d 70 72 69 6e | 74 20 6a 6f 69 6e 28 22 |n";.prin|t join("|
|000002d0| 2c 20 22 2c 20 26 4d 61 | 63 50 65 72 6c 27 46 41 |, ", &Ma|cPerl'FA|
|000002e0| 63 63 65 73 73 28 22 24 | 45 4e 56 7b 4d 50 57 7d |ccess("$|ENV{MPW}|
|000002f0| 57 6f 72 6b 73 68 65 65 | 74 22 2c 20 26 46 5f 47 |Workshee|t", &F_G|
|00000300| 57 49 4e 49 4e 46 4f 29 | 29 2c 20 22 5c 6e 22 3b |WININFO)|), "\n";|
|00000310| 0d 26 4d 61 63 50 65 72 | 6c 27 46 41 63 63 65 73 |.&MacPer|l'FAcces|
|00000320| 73 28 22 24 45 4e 56 7b | 4d 50 57 7d 57 6f 72 6b |s("$ENV{|MPW}Work|
|00000330| 73 68 65 65 74 22 2c 20 | 26 46 5f 53 57 49 4e 49 |sheet", |&F_SWINI|
|00000340| 4e 46 4f 2c 20 32 30 30 | 2c 20 32 30 30 2c 20 34 |NFO, 200|, 200, 4|
|00000350| 30 30 2c 20 34 30 30 29 | 3b 0d 24 72 65 73 20 3d |00, 400)|;.$res =|
|00000360| 20 26 4d 61 63 50 65 72 | 6c 27 46 41 63 63 65 73 | &MacPer|l'FAcces|
|00000370| 73 28 22 6b 6e 75 74 68 | 3a 44 65 76 65 6c 6f 70 |s("knuth|:Develop|
|00000380| 6d 65 6e 74 3a 50 65 72 | 6c 3a 63 6f 6e 66 69 67 |ment:Per|l:config|
|00000390| 2e 68 22 2c 20 26 46 5f | 47 53 45 4c 49 4e 46 4f |.h", &F_|GSELINFO|
|000003a0| 29 3b 0d 70 72 69 6e 74 | 20 22 24 72 65 73 5c 6e |);.print| "$res\n|
|000003b0| 22 3b 0d 70 72 69 6e 74 | 20 6a 6f 69 6e 28 22 2c |";.print| join(",|
|000003c0| 20 22 2c 20 26 4d 61 63 | 50 65 72 6c 27 46 41 63 | ", &Mac|Perl'FAc|
|000003d0| 63 65 73 73 28 22 6b 6e | 75 74 68 3a 44 65 76 65 |cess("kn|uth:Deve|
|000003e0| 6c 6f 70 6d 65 6e 74 3a | 50 65 72 6c 3a 63 6f 6e |lopment:|Perl:con|
|000003f0| 66 69 67 2e 68 22 2c 20 | 26 46 5f 47 53 45 4c 49 |fig.h", |&F_GSELI|
|00000400| 4e 46 4f 29 29 2c 20 22 | 5c 6e 22 3b 0d 26 4d 61 |NFO)), "|\n";.&Ma|
|00000410| 63 50 65 72 6c 27 46 41 | 63 63 65 73 73 28 22 6b |cPerl'FA|ccess("k|
|00000420| 6e 75 74 68 3a 44 65 76 | 65 6c 6f 70 6d 65 6e 74 |nuth:Dev|elopment|
|00000430| 3a 50 65 72 6c 3a 63 6f | 6e 66 69 67 2e 68 22 2c |:Perl:co|nfig.h",|
|00000440| 20 26 46 5f 53 53 45 4c | 49 4e 46 4f 2c 20 31 30 | &F_SSEL|INFO, 10|
|00000450| 30 30 2c 20 31 32 30 30 | 29 3b 0d 00 00 00 00 00 |00, 1200|);......|
|00000460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000480| 00 00 01 00 00 00 01 6e | 00 00 00 6e 00 00 00 3e |.......n|...n...>|
|00000490| 65 72 66 61 63 65 20 44 | 69 72 65 63 74 69 6f 6e |erface D|irection|
|000004a0| 3a 20 20 43 72 61 69 67 | 20 42 61 72 6e 65 73 16 |:  Craig| Barnes.|
|000004b0| 09 46 41 63 63 65 73 73 | 2e 74 02 00 00 00 54 45 |.FAccess|.t....TE|
|000004c0| 58 54 4d 50 53 20 00 00 | 00 00 00 00 00 00 00 00 |XTMPS ..|........|
|000004d0| 00 00 54 45 58 54 4d 50 | 53 20 00 00 00 00 00 00 |..TEXTMP|S ......|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 a9 32 c2 70 00 00 | 03 db 00 00 01 ac 6b 73 |...2.p..|......ks|
|00000500| 20 54 6f 3a 20 4d 61 6e | 61 2c 20 4a 9a 72 67 2c | To: Man|a, J.rg,|
|00000510| 20 4c 6f 66 74 79 25 61 | 6e 64 20 61 6c 6c 20 67 | Lofty%a|nd all g|
|00000520| 6f 6f 64 20 6f 6c 64 20 | 42 6f 6f 6d 65 72 61 6e |ood old |Boomeran|
|00000530| 67 20 75 73 65 72 73 2c | 20 77 68 6f 24 68 65 6c |g users,| who$hel|
|00000540| 70 65 64 20 42 6f 6f 6d | 65 72 61 6e 67 20 74 6f |ped Boom|erang to|
|00000550| 20 67 72 6f 77 20 75 70 | 20 74 6f 20 53 75 70 65 | grow up| to Supe|
|00000560| 72 0a 42 6f 6f 6d 65 72 | 61 6e 67 2e 00 00 01 00 |r.Boomer|ang.....|
|00000570| 00 03 72 ec 00 03 71 ec | 00 00 0d e0 00 73 31 c4 |..r...q.|.....s1.|
|00000580| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 0e 00 00 |...H..Mo|naco....|
|00000590| 00 00 00 14 00 02 4a a4 | 00 0a 80 01 80 01 7f ff |......J.|........|
|000005a0| 7f ff 00 00 00 00 00 06 | 00 03 00 47 00 48 01 d4 |........|...G.H..|
|000005b0| 02 65 00 47 00 48 01 d4 | 02 65 a9 33 f3 d3 00 00 |.e.G.H..|.e.3....|
|000005c0| 01 7a 00 00 01 7a 00 00 | 00 00 01 00 00 00 00 1e |.z...z..|........|
|000005d0| 00 47 00 48 01 d4 02 65 | 00 47 00 48 01 d4 02 65 |.G.H...e|.G.H...e|
|000005e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005f0| 01 00 00 00 01 6e 00 00 | 00 6e 00 00 00 3e 00 3a |.....n..|.n...>.:|
|00000600| 02 6c 15 ac 00 00 00 1c | 00 3e 00 00 4d 50 53 52 |.l......|.>..MPSR|
|00000610| 00 01 00 0a 03 ed ff ff | 00 00 00 00 00 00 00 00 |........|........|
|00000620| 03 f0 ff ff 00 00 00 4c | 00 3c 5a c8 00 00 00 00 |.......L|.<Z.....|
|00000630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000640| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+