Changeset 36048 for trunk/pstamp/scripts/pstamp_get_image_job.pl
- Timestamp:
- Aug 27, 2013, 2:42:06 PM (13 years ago)
- File:
-
- 1 edited
-
trunk/pstamp/scripts/pstamp_get_image_job.pl (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/pstamp/scripts/pstamp_get_image_job.pl
r33015 r36048 65 65 my $mdcParser = PS::IPP::Metadata::Config->new; # Parser for metadata config files 66 66 67 my $data = $mdcParser->parse(join "", (<INPUT>)) or my_die("failed to parse metadata config doc", $PS_EXIT_UNKNOWN_ERROR); 67 my $data = $mdcParser->parse(join "", (<INPUT>)) 68 or my_die("failed to parse metadata config doc", $PS_EXIT_UNKNOWN_ERROR); 69 68 70 my $components = parse_md_list($data); 69 71 my $n = scalar @$components; … … 83 85 print STDERR "stage_id is $stage_id\n"; 84 86 print STDERR "path_base is $path_base\n"; 85 print STDERR "path_base is $path_base\n";86 87 print STDERR "CAMERA is $camera\n"; 87 88 print STDERR "magicked is " . (defined $magicked ? $magicked : "undefined") . "\n"; … … 89 90 90 91 if (!$camera or !$path_base or !$component or !$stage_id or !$stage) { 91 my_die(" failed to parse params from: $params_file", $PS_EXIT_UNKNOWN_ERROR);92 my_die("One or more parameters are missing in: $params_file", $PS_EXIT_UNKNOWN_ERROR); 92 93 } 93 94
Note:
See TracChangeset
for help on using the changeset viewer.
