Changeset 16742 for trunk/ippScripts/scripts/warp_overlap.pl
- Timestamp:
- Feb 28, 2008, 4:03:50 PM (18 years ago)
- File:
-
- 1 edited
-
trunk/ippScripts/scripts/warp_overlap.pl (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/warp_overlap.pl
r16729 r16742 38 38 my $ipprc = PS::IPP::Config->new(); # IPP configuration 39 39 40 my ($warp_id, $camera, $tess_id, $dbname, $ workdir, $verbose, $no_update, $no_op);40 my ($warp_id, $camera, $tess_id, $dbname, $verbose, $no_update, $no_op); 41 41 GetOptions( 42 42 'warp_id|i=s' => \$warp_id, # Warp identifier … … 44 44 'tess_id=s' => \$tess_id, # Tessellation identifier 45 45 'dbname|d=s' => \$dbname, # Database name 46 'workdir|w=s' => \$workdir, # Working directory, for output files47 46 'verbose' => \$verbose, # Print to stdout 48 47 'no-update' => \$no_update, # Don't update the database? … … 52 51 pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2 ) if @ARGV; 53 52 pod2usage( 54 -msg => "Required options: --warp_id --camera --tess_id --workdir",53 -msg => "Required options: --warp_id --camera --tess_id", 55 54 -exitval => 3, 56 55 ) unless defined $warp_id 57 56 and defined $camera 58 and defined $tess_id 59 and defined $workdir; 57 and defined $tess_id; 60 58 61 59 $ipprc->define_camera($camera);
Note:
See TracChangeset
for help on using the changeset viewer.
