Changeset 10534 for trunk/ippScripts/scripts/detrend_norm_apply.pl
- Timestamp:
- Dec 7, 2006, 12:56:06 PM (19 years ago)
- File:
-
- 1 edited
-
trunk/ippScripts/scripts/detrend_norm_apply.pl (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/detrend_norm_apply.pl
r10419 r10534 59 59 60 60 my ($vol, $dir, $file) = File::Spec->splitpath( $input ); 61 $input = $ipprc->convert_filename ( $input );61 $input = $ipprc->convert_filename_absolute( $input ); 62 62 63 63 # Output name 64 64 my $outputRoot = $camera . '.' . $detType . '.norm.' . $detId . '.' . $iter; # Root output name 65 65 $outputRoot = File::Spec->catpath( $vol, $dir, $outputRoot ); 66 $outputRoot = $ipprc->convert_filename ($outputRoot);66 $outputRoot = $ipprc->convert_filename_absolute($outputRoot); 67 67 68 68 my $output = $ipprc->filename("PPIMAGE.OUTPUT", $outputRoot, $classId); … … 100 100 101 101 # Update the database 102 $output = $ipprc->convert_filename ( $output );103 $b1name = $ipprc->convert_filename ( $b1name );104 $b2name = $ipprc->convert_filename ( $b2name );102 $output = $ipprc->convert_filename_relative( $output ); 103 $b1name = $ipprc->convert_filename_relative( $b1name ); 104 $b2name = $ipprc->convert_filename_relative( $b2name ); 105 105 unless ($no_update) { 106 106 my $command = "$dettool -addnormalizedimfile -det_id $detId -iteration $iter -class_id $classId ".
Note:
See TracChangeset
for help on using the changeset viewer.
