Changeset 42712 for trunk/ippScripts/scripts/minidvodb_premerge.pl

Timestamp:

Jul 18, 2024, 2:55:58 PM (2 years ago)

Author:

cclin33

Message:

fix mis-match mosaic issue when running addstar, optimize addstar program

File:

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

trunk/ippScripts/scripts/minidvodb_premerge.pl

@@ -47 +47 @@
 }
 
-my ( $minidvodb, $minidvodb_id, $minidvodb_group, $camera, $dbname,$verbose, $logfile, $no_op, $redirect, $save_temps);
+my ( $minidvodb, $minidvodb_id, $minidvodb_group, $minidvodb_host, $camera, $dbname,$verbose, $logfile, $no_op, $redirect, $save_temps);
 GetOptions(
-    'minidvodb|w=s'     => \$minidvodb, #minidvodb database
-    'minidvodb_id|w=s'  => \$minidvodb_id, #minidvodb_id
-    'minidvodb_group|w=s'  => \$minidvodb_group, #minidvodb_id
-    'camera|c=s'        => \$camera, # Camera
-    'dbname|d=s'        => \$dbname, # Database name
-    'verbose'           => \$verbose,   # Print to stdout
-    'no-op'             => \$no_op, # Don't do any operations?
-    'logfile=s'         => \$logfile,
-    'save-temps'        => \$save_temps, # Save temporary files?
+    'minidvodb|w=s'        => \$minidvodb, #minidvodb database
+    'minidvodb_id|w=s'     => \$minidvodb_id, #minidvodb_id
+    'minidvodb_group|w=s'  => \$minidvodb_group, #minidvodb_group
+    'minidvodb_host|w=s'   => \$minidvodb_host, #minidvodb_host
+    'camera|c=s'           => \$camera, # Camera
+    'dbname|d=s'           => \$dbname, # Database name
+    'verbose'              => \$verbose,   # Print to stdout
+    'no-op'                => \$no_op, # Don't do any operations?
+    'logfile=s'            => \$logfile,
+    'save-temps'           => \$save_temps, # Save temporary files?
     ) or pod2usage( 2 );
 
 pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2 ) if @ARGV;
 pod2usage(
-          -msg => "Required options: --minidvodb --minidvodb_id -- minidvodb_group --camera",
+          -msg => "Required options: --minidvodb --minidvodb_id --minidvodb_group --minidvodb_host --camera ",
           -exitval => 3,
           ) unless
@@ -68 +69 @@
     defined $minidvodb_id and
     defined $minidvodb_group and
+    defined $minidvodb_host and
     defined $camera;