Changeset 42721 for trunk/ippScripts/scripts/dist_bundle.pl

Timestamp:

Sep 14, 2024, 1:54:01 PM (22 months ago)

Author:

eugene

Message:

add comments to show how file magic could be specified

File:

• trunk/ippScripts/scripts/dist_bundle.pl (modified) (2 diffs)

trunk/ippScripts/scripts/dist_bundle.pl

@@ -25 +25 @@
 
 my $ipprc = PS::IPP::Config->new(); # IPP configuration
+
+# we can record the location an appropriate magic.mdc file for the file command 
+# my $file_magic = metadataLookupStr($ipprc->{_siteConfig}, "FILE.MAGIC");
+### TEST print "magic: $file_magic\n";
+### TEST system ("file -m $file_magic o60523g0045o.2132764.wrp.2688740.skycell.1566.004.pswarp.mdc");
 
 use Getopt::Long qw( GetOptions :config auto_help auto_version gnu_getopt );
@@ -679 +684 @@
     my $mdc_compressed;
     {
+#        my $command = "$file_cmd -m $file_magic $resolved";
         my $command = "$file_cmd $resolved";
         my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =