Changeset 24352
- Timestamp:
- Jun 5, 2009, 6:42:25 PM (17 years ago)
- File:
-
- 1 edited
-
trunk/ippScripts/scripts/chip_imfile.pl (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/chip_imfile.pl
r24323 r24352 201 201 } 202 202 chomp $cmdflags; 203 ($quality) = $cmdflags =~ /-quality (\d+)/; # Quality flag 203 if (($camera ne "GPC1") or ($class_id ne "XY27") or ($exp_id < 53171)) { 204 ($quality) = $cmdflags =~ /-quality (\d+)/; # Quality flag 205 } else { 206 # hack to kick ota 27 out of subsequent analysis by setting quality flag to a non-zero value 207 my ($before, $after) = split " -quality ", $cmdflags; 208 209 # get the current value 210 ($quality) = $after =~ /^(\d+)/; 211 $after = substr($after, length($quality)); 212 213 # replace it if it is zero 214 $quality = 42 if !$quality; 215 216 # rebuild the cmdflags 217 $cmdflags = $before . " -quality $quality"; 218 $cmdflags .= " $after" if $after; 219 } 204 220 } 205 221
Note:
See TracChangeset
for help on using the changeset viewer.
