Changeset 13118

Timestamp:

May 1, 2007, 3:19:59 PM (19 years ago)

Author:

Paul Price

Message:

Adding global options for pois.

File:

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

trunk/ippScripts/scripts/diff_skycell.pl

@@ -31 +31 @@
 use File::Spec;
 
+use constant POIS_OPTIONS => '-v -B 1000';
+
 use Getopt::Long qw( GetOptions :config auto_help auto_version gnu_getopt );
 use Pod::Usage qw( pod2usage );
@@ -139 +141 @@
 my $stats = PS::IPP::Metadata::Stats->new(); # Stats parser
 unless ($no_op) {
-    my $command = "$pois -v $template $input $outputName"; # Command to run pois
+    my $command = "$pois " . POIS_OPTIONS() . " $template $input $outputName"; # Command to run pois
 
     my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =