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 appl.sit / MacPerl ƒ / macscripts / AppleScriptFromPerl < prev next >

MacBinary | 1993-08-18 | 1.3 KB | [TEXT/McPL]

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: AppleScriptFromPerl

Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Wed Aug 18 01:52:28 1993, modified Wed Aug 18 01:52:28 1993, creator 'McPL', type ASCII, 195 bytes "AppleScriptFromPerl" Perl script text executable	default (weak)
`99%`	file	a /usr/local/bin/perl script executable (binary data), at 0x143 799 bytes resource Perl script text executable	default (weak)
`98%`	file	a /usr/local/bin/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	`[McPL]`

hex view

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 13 41 70 70 6c 65 53 | 63 72 69 70 74 46 72 6f |..AppleS|criptFro|
|00000010| 6d 50 65 72 6c 00 00 00 | 00 00 00 00 00 00 00 00 |mPerl...|........|
|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 63 50 | 4c 01 00 00 00 00 00 00 |.TEXTMcP|L.......|
|00000050| 00 00 00 00 00 00 c3 00 | 00 03 1f a8 97 74 1c a8 |........|.....t..|
|00000060| 97 74 1c 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.t......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 53 ef 00 00 |........|....S...|
|00000080| 23 21 2f 75 73 72 2f 6c | 6f 63 61 6c 2f 62 69 6e |#!/usr/l|ocal/bin|
|00000090| 2f 70 65 72 6c 0d 0d 26 | 4d 61 63 50 65 72 6c 27 |/perl..&|MacPerl'|
|000000a0| 44 6f 41 70 70 6c 65 53 | 63 72 69 70 74 28 3c 3c |DoAppleS|cript(<<|
|000000b0| 27 45 4e 44 5f 53 43 52 | 49 50 54 27 29 3b 0d 74 |'END_SCR|IPT');.t|
|000000c0| 65 6c 6c 20 61 70 70 6c | 69 63 61 74 69 6f 6e 20 |ell appl|ication |
|000000d0| 22 4d 61 63 50 65 72 6c | 22 0d 09 6d 61 6b 65 20 |"MacPerl|"..make |
|000000e0| 6e 65 77 20 57 69 6e 64 | 6f 77 0d 09 63 6f 70 79 |new Wind|ow..copy|
|000000f0| 20 22 49 6e 73 65 72 74 | 69 6e 67 20 74 65 78 74 | "Insert|ing text|
|00000100| 20 74 68 65 20 68 61 72 | 64 20 77 61 79 2e 22 20 | the har|d way." |
|00000110| 74 6f 20 63 68 61 72 61 | 63 74 65 72 20 31 20 6f |to chara|cter 1 o|
|00000120| 66 20 66 72 6f 6e 74 20 | 57 69 6e 64 6f 77 0d 65 |f front |Window.e|
|00000130| 6e 64 20 74 65 6c 6c 0d | 45 4e 44 5f 53 43 52 49 |nd tell.|END_SCRI|
|00000140| 50 54 0d 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |PT......|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 01 00 00 00 02 9c | 00 00 01 9c 00 00 00 83 |........|........|
|00000190| 6f 28 48 50 61 72 6d 42 | 6c 6b 50 74 72 20 70 61 |o(HParmB|lkPtr pa|
|000001a0| 72 61 6d 42 6c 6f 63 6b | 2c 42 6f 6f 6c 65 61 6e |ramBlock|,Boolean|
|000001b0| 13 41 70 70 6c 65 53 63 | 72 69 70 74 46 72 6f 6d |.AppleSc|riptFrom|
|000001c0| 50 65 72 6c 02 00 00 00 | 54 45 58 54 4d 63 50 4c |Perl....|TEXTMcPL|
|000001d0| 00 00 54 45 58 54 4d 63 | 50 4c 01 00 00 00 00 80 |..TEXTMc|PL......|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 a8 83 59 28 00 00 | 00 c3 00 00 03 1f 79 6e |....Y(..|......yn|
|00000200| 63 28 48 50 61 72 6d 42 | 6c 6b 50 74 72 20 70 61 |c(HParmB|lkPtr pa|
|00000210| 72 61 6d 42 6c 6f 63 6b | 29 0d 20 3d 20 7b 30 78 |ramBlock|). = {0x|
|00000220| 37 30 30 42 2c 30 78 41 | 32 36 30 7d 3b 20 0d 23 |700B,0xA|260}; .#|
|00000230| 70 72 61 67 6d 61 20 70 | 61 72 61 6d 65 74 65 72 |pragma p|arameter|
|00000240| 20 5f 5f 44 30 20 50 42 | 53 65 74 56 49 6e 66 6f | __D0 PB|SetVInfo|
|00000250| 41 73 79 6e 63 28 5f 5f | 41 30 29 0d 70 61 73 63 |Async(__|A0).pasc|
|00000260| 61 6c 20 4f 53 45 72 72 | 20 50 42 53 65 74 56 49 |al OSErr| PBSetVI|
|00000270| 6e 66 6f 41 73 79 6e 63 | 28 48 50 61 72 6d 42 6c |nfoAsync|(HParmBl|
|00000280| 00 00 00 78 00 03 00 00 | 00 48 00 48 00 00 00 00 |...x....|.H.H....|
|00000290| 03 0d 02 1a ff e2 ff e4 | 03 2b 02 36 03 47 05 7b |........|.+.6.G.{|
|000002a0| 03 de 00 02 00 00 00 48 | 00 48 00 00 00 00 03 0d |.......H|.H......|
|000002b0| 02 1a 00 01 00 00 00 64 | 00 00 00 01 00 01 01 01 |.......d|........|
|000002c0| 00 02 00 01 27 0f 00 01 | 00 01 00 00 00 00 00 00 |....'...|........|
|000002d0| 00 00 00 00 00 00 00 02 | 00 19 01 90 00 00 00 00 |........|........|
|000002e0| 00 40 00 00 00 00 00 00 | 00 00 00 01 00 00 00 00 |.@......|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 01 10 |........|........|
|00000300| 00 3a 00 1e 01 40 01 e5 | 06 4d 6f 6e 61 63 6f 04 |.:...@..|.Monaco.|
|00000310| 00 00 00 94 73 74 6f 70 | 6f 62 6a 20 00 00 00 8a |....stop|obj ....|
|00000320| 00 00 00 04 00 00 00 00 | 77 61 6e 74 74 79 70 65 |........|wanttype|
|00000330| 00 00 00 04 00 00 00 00 | 00 00 01 30 6f 62 6a 20 |........|...0obj |
|00000340| 00 00 00 46 00 00 00 04 | 00 00 00 00 77 61 6e 74 |...F....|....want|
|00000350| 74 79 70 65 00 00 00 04 | 63 77 69 6e 66 72 6f 6d |type....|cwinfrom|
|00000360| 6e 75 6c 6c 00 00 00 00 | 66 6f 72 6d 65 6e 75 6d |null....|formenum|
|00000370| 00 00 00 04 6e 61 6d 65 | 73 65 6c 64 54 45 58 54 |....name|seldTEXT|
|00000380| 00 00 00 05 59 65 61 68 | 3f 00 66 6f 72 6d 65 6e |....Yeah|?.formen|
|00000390| 75 6d 00 00 00 04 69 6e | 64 78 73 65 6c 64 6c 6f |um....in|dxseldlo|
|000003a0| 6e 67 00 00 00 04 00 00 | 00 9a 33 4a 00 65 01 a4 |ng......|..3J.e..|
|000003b0| 01 5d 00 3c 00 00 00 00 | 00 00 00 b0 00 00 8d dc |.].<....|........|
|000003c0| 55 6e 74 69 74 6c 65 64 | 20 23 33 00 3b 7c 00 00 |Untitled| #3.;|..|
|000003d0| 00 00 00 21 80 00 00 08 | 00 00 00 20 00 00 8d 6c |...!....|... ...l|
|000003e0| 0b 55 6e 74 69 74 6c 65 | 64 20 23 33 00 08 00 00 |.Untitle|d #3....|
|000003f0| 01 01 00 d5 00 00 00 00 | 00 00 00 70 00 00 8d b4 |........|...p....|
|00000400| 00 0a ff 9c 00 00 00 00 | 00 09 00 40 00 00 00 00 |........|...@....|
|00000410| 00 00 00 08 07 4d 61 63 | 50 65 72 6c 00 00 01 00 |.....Mac|Perl....|
|00000420| 00 00 02 9c 00 00 01 9c | 00 00 00 83 00 d3 84 1c |........|........|
|00000430| 1b 8c 00 00 00 1c 00 5a | 00 02 54 46 53 50 00 00 |.......Z|..TFSP..|
|00000440| 00 1a 54 46 53 53 00 00 | 00 26 53 54 52 20 00 00 |..TFSS..|.&STR ..|
|00000450| 00 32 00 ff 00 00 00 00 | 00 00 00 d4 11 ec 00 ff |.2......|........|
|00000460| 00 0d 00 00 00 7c 00 d4 | 11 44 bf f4 00 19 00 00 |.....|..|.D......|
|00000470| 01 90 00 d4 11 34 0c 50 | 72 69 6e 74 65 72 20 49 |.....4.P|rinter I|
|00000480| 6e 66 6f 0b 48 65 61 64 | 65 72 20 49 6e 66 6f 0f |nfo.Head|er Info.|
|00000490| 46 69 6e 64 65 72 20 41 | 70 70 20 49 6e 66 6f 00 |Finder A|pp Info.|
|000004a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+