/ Language/OS - Multiplatform Resource Library
/ LANGUAGE OS.iso / a_utils / perl / mac-perl / gs_102st.bin / GUSI / Distribution ![]() | < prev | next > |
MacBinary | 1993-01-18 | 1.3 KB | [TEXT/MPS ] |
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, Sun Jan 17 21:16:09 1993, modified Sun Jan 17 21:16:09 1993, creator 'MPS ', type ASCII, 470 bytes "Distribution" , at 0x256 538 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 ] |
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0c 44 69 73 74 72 69 | 62 75 74 69 6f 6e 00 00 |..Distri|bution..|
|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 01 d6 00 | 00 02 1a a7 7f c3 69 a7 |........|......i.|
|00000060| 7f c3 69 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |..i.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 cb b1 00 00 |........|........|
|00000080| 53 65 74 20 45 78 69 74 | 20 30 0d 50 65 72 6c 20 |Set Exit| 0.Perl |
|00000090| 2d 53 78 20 22 7b 30 7d | 22 20 7b 22 50 61 72 61 |-Sx "{0}|" {"Para|
|000000a0| 6d 65 74 65 72 73 22 7d | 3e 54 6f 44 69 73 74 72 |meters"}|>ToDistr|
|000000b0| 0d 54 6f 44 69 73 74 72 | 0d 44 65 6c 65 74 65 20 |.ToDistr|.Delete |
|000000c0| 2d 79 20 54 6f 44 69 73 | 74 72 0d 45 78 69 74 0d |-y ToDis|tr.Exit.|
|000000d0| 0d 23 21 2f 75 73 72 2f | 62 69 6e 2f 70 65 72 6c |.#!/usr/|bin/perl|
|000000e0| 0d 0d 24 64 65 66 66 6c | 64 72 20 3d 20 70 6f 70 |..$deffl|dr = pop|
|000000f0| 20 40 41 52 47 56 3b 0d | 63 68 6f 70 20 24 64 65 | @ARGV;.|chop $de|
|00000100| 66 66 6c 64 72 20 69 66 | 20 28 24 64 65 66 66 6c |ffldr if| ($deffl|
|00000110| 64 72 20 3d 7e 20 2f 3a | 24 2f 29 3b 0d 0d 66 6f |dr =~ /:|$/);..fo|
|00000120| 72 65 61 63 68 20 24 69 | 20 28 40 41 52 47 56 29 |reach $i| (@ARGV)|
|00000130| 20 7b 0d 09 69 66 20 28 | 24 69 20 3d 7e 20 2f 5e | {..if (|$i =~ /^|
|00000140| 28 2e 2b 3a 29 2f 29 20 | 7b 0d 09 09 24 66 6f 6c |(.+:)/) |{...$fol|
|00000150| 64 65 72 7b 22 24 64 65 | 66 66 6c 64 72 24 31 22 |der{"$de|ffldr$1"|
|00000160| 7d 20 2e 3d 20 22 20 5c | 27 24 69 5c 27 22 3b 0d |} .= " \|'$i\'";.|
|00000170| 09 7d 20 65 6c 73 65 20 | 7b 0d 09 09 24 66 6f 6c |.} else |{...$fol|
|00000180| 64 65 72 7b 22 24 64 65 | 66 66 6c 64 72 3a 22 7d |der{"$de|ffldr:"}|
|00000190| 20 2e 3d 20 22 20 5c 27 | 24 69 5c 27 22 3b 0d 09 | .= " \'|$i\'";..|
|000001a0| 7d 0d 7d 0d 0d 66 6f 72 | 65 61 63 68 20 24 69 20 |}.}..for|each $i |
|000001b0| 28 73 6f 72 74 20 7b 20 | 28 24 61 20 3d 7e 20 79 |(sort { |($a =~ y|
|000001c0| 2f 3a 2f 3a 2f 29 20 3c | 3d 3e 20 28 24 62 20 3d |/:/:/) <|=> ($b =|
|000001d0| 7e 20 79 2f 3a 2f 3a 2f | 29 20 7d 20 6b 65 79 73 |~ y/:/:/|) } keys|
|000001e0| 20 25 66 6f 6c 64 65 72 | 29 20 7b 0d 09 70 72 69 | %folder|) {..pri|
|000001f0| 6e 74 20 22 42 61 63 6b | 75 70 20 2d 61 20 2d 63 |nt "Back|up -a -c|
|00000200| 20 2d 64 24 66 6f 6c 64 | 65 72 7b 24 69 7d 20 2d | -d$fold|er{$i} -|
|00000210| 74 6f 20 5c 27 24 69 5c | 27 3e 44 6f 44 69 73 74 |to \'$i\|'>DoDist|
|00000220| 72 5c 6e 22 3b 0d 09 70 | 72 69 6e 74 20 22 44 6f |r\n";..p|rint "Do|
|00000230| 44 69 73 74 72 5c 6e 22 | 0d 7d 0d 0d 70 72 69 6e |Distr\n"|.}..prin|
|00000240| 74 20 22 44 65 6c 65 74 | 65 20 44 6f 44 69 73 74 |t "Delet|e DoDist|
|00000250| 72 5c 6e 22 3b 0d 00 00 | 00 00 00 00 00 00 00 00 |r\n";...|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 01 00 00 00 01 be | 00 00 00 be 00 00 00 5c |........|.......\|
|00000290| 46 6c 6f 61 74 73 00 1d | de e2 00 00 01 97 00 28 |Floats..|.......(|
|000002a0| 20 54 56 69 65 77 3a 3a | 49 6e 76 61 6c 69 64 61 | TView::|Invalida|
|000002b0| 0c 44 69 73 74 72 69 62 | 75 74 69 6f 6e e3 02 00 |.Distrib|ution...|
|000002c0| 00 00 54 45 58 54 4d 50 | 53 20 00 00 ff ff ff ff |..TEXTMP|S ......|
|000002d0| 00 00 54 45 58 54 4d 50 | 53 20 00 00 ff ff ff ff |..TEXTMP|S ......|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 a7 47 20 3a 00 00 | 01 d6 00 00 02 1a 67 65 |...G :..|......ge|
|00000300| 49 6e 74 65 72 69 6f 72 | 43 68 61 6e 67 65 64 1d |Interior|Changed.|
|00000310| 00 1d 10 e8 00 00 01 9d | 00 24 1c 54 56 69 65 77 |........|.$.TView|
|00000320| 3a 3a 53 65 74 44 72 61 | 77 69 6e 67 45 6e 76 69 |::SetDra|wingEnvi|
|00000330| 72 6f 6e 6d 65 6e 74 1d | 00 1d 2e a0 00 00 01 9f |ronment.|........|
|00000340| 00 14 0c 54 56 69 65 77 | 3a 3a 54 56 69 65 77 6d |...TView|::TViewm|
|00000350| 00 00 6e fe 00 00 01 89 | 00 1c 14 54 56 69 65 77 |..n.....|...TView|
|00000360| 3a 3a 57 72 69 74 65 53 | 75 62 56 69 65 77 73 1d |::WriteS|ubViews.|
|00000370| 00 1d 84 c4 00 00 01 a2 | 00 20 18 54 56 69 65 77 |........|. .TView|
|00000380| 00 00 00 4c c1 ba 0e d9 | 3f e5 32 30 00 04 00 02 |...L....|?.20....|
|00000390| 00 00 00 00 00 00 a7 7f | 86 16 a7 7f 86 16 a6 71 |........|.......q|
|000003a0| 49 ef 00 00 bf be 00 01 | 00 2b 00 01 05 47 55 53 |I.......|.+...GUS|
|000003b0| 49 ba 00 05 6e 65 65 72 | 69 00 01 31 00 0c 44 69 |I...neer|i..1..Di|
|000003c0| 73 74 72 69 62 75 74 69 | 6f 6e 00 00 00 00 00 00 |stributi|on......|
|000003d0| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 65 72 0d |...H..Mo|naco.er.|
|000003e0| 0d 69 66 20 28 2d 64 20 | 22 3a 47 55 53 49 22 29 |.if (-d |":GUSI")|
|000003f0| 20 7b 0d 09 66 6f 00 06 | 00 03 00 54 01 7c 01 e1 | {..fo..|...T.|..|
|00000400| 03 99 00 56 00 5d 01 e3 | 02 7a a7 7f 8b 29 00 00 |...V.]..|.z...)..|
|00000410| 00 00 00 00 01 d6 00 00 | 00 00 01 00 00 00 00 1e |........|........|
|00000420| 00 54 01 7c 01 e1 03 99 | 00 56 00 5d 01 e3 02 7a |.T.|....|.V.]...z|
|00000430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000440| 01 00 00 00 01 be 00 00 | 00 be 00 00 00 5c 00 49 |........|.....\.I|
|00000450| aa b4 10 2a 00 00 00 1c | 00 52 00 01 4d 50 53 52 |...*....|.R..MPSR|
|00000460| 00 01 00 12 63 6b 69 64 | 00 00 00 2a 03 ed ff ff |....ckid|...*....|
|00000470| 00 00 00 50 00 00 00 00 | 03 f0 ff ff 00 00 00 9c |...P....|........|
|00000480| 00 4f dc 9c 00 80 00 00 | 00 00 00 00 00 00 00 00 |.O......|........|
|00000490| 09 50 72 6f 6a 65 63 74 | 6f 72 00 00 00 00 00 00 |.Project|or......|
|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 |........|........|
+--------+-------------------------+-------------------------+--------+--------+