Lines Matching refs:RESOURCE
59 [B<--resource> I<file>]
152 or to use formatted text, prepare a resource and use L<--resource>.
154 =item B<--resource> I<file>
156 A resource file to merge into I<target-image>. If I<format> is UDZO, UDBZ,
158 the resource but may be freely transferred without any special encodings.
161 disk images. B<--resource> may appear multiple times.
214 Resource forks aren't copied.
453 'resource=s' => \@resourceFiles,
659 # Flatten. This merges the resource fork into the data fork, so no
1325 # licenseMaker($text, $resource)
1328 # resource containing the text at path $license. English-only, and
1330 # intricate license agreements, create your own resource.
1334 my($resource, $text);
1335 ($text, $resource) = @_;
1340 if(!sysopen(*RESOURCE, $resource, O_WRONLY|O_CREAT|O_EXCL)) {
1341 print STDERR ($0.': licenseMaker: sysopen resource: '.$!."\n");
1344 print RESOURCE << '__EOT__';
1355 // Resource ID, 0 = STR#/TEXT/styl 5000
1361 resource 'STR#' (5000, "English") {
1371 print RESOURCE (" // Print, ellipsis is 0xC9\n");
1372 print RESOURCE (" \"Print\xc9\",\n");
1373 print RESOURCE (" // Save As, ellipsis is 0xC9\n");
1374 print RESOURCE (" \"Save As\xc9\",\n");
1375 print RESOURCE (' // Descriptive text, curly quotes are 0xD2 and 0xD3'.
1377 print RESOURCE (' "If you agree to the terms of this license '.
1380 print RESOURCE << '__EOT__';
1417 print RESOURCE ' "'.$chunk.'"'."\n";
1420 print RESOURCE ' "\n"'."\n";
1424 print RESOURCE << '__EOT__';
1451 close(*RESOURCE);
1515 " [--resource <file>] (flat .r files to merge)\n".
