Changeset 24944 for trunk/pstamp/scripts/pstamp_job_run.pl
- Timestamp:
- Jul 30, 2009, 10:19:40 AM (17 years ago)
- File:
-
- 1 edited
-
trunk/pstamp/scripts/pstamp_job_run.pl (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/pstamp/scripts/pstamp_job_run.pl
r24831 r24944 118 118 my $uri = $psjob->{uri}; 119 119 my $outputBase = $psjob->{outputBase}; 120 my $argString = $psjob->{args};121 120 my $jobType = $psjob->{jobType}; 121 #my $argString = $psjob->{args}; 122 122 123 123 my $jobStatus; 124 124 if ($jobType eq "stamp") { 125 my $command = "$ppstamp -file $uri $outputBase $argString"; 125 open ARGSLIST, "<$uri" or die "failed to open argslist file $uri"; 126 my $argString = <ARGSLIST>; 127 close ARGSLIST; 128 chomp $argString; 129 130 # XXX: should we do any other sanity checking? 131 die "arglist file $uri is empty" if !$argString; 132 133 my $command = "$ppstamp $outputBase $argString"; 126 134 $command .= " -dbname $dbname" if $dbname; 127 135 $command .= " -dbserver $dbserver" if $dbserver;
Note:
See TracChangeset
for help on using the changeset viewer.
