| 41 |
|
my ($dest) = ("$ARGV[0]" =~ /^([^.]+)/); |
| 42 |
|
$dest .= ".bmp"; |
| 43 |
|
my $cmd=""; |
| 44 |
< |
if ("$format" =~ /^32-bit_rle_(rgb|xyz)e *$/) { |
| 44 |
> |
if ("$format" =~ /^32-bit_rle_(rgb|xyz)e *$/ || "$format" =~ /^Radiance_spectra *$/) { |
| 45 |
|
if ($pfilt) { |
| 46 |
|
$cmd = $pfilt . " '$ARGV[0]' | ra_bmp -e auto - '$dest'"; |
| 47 |
|
} else { |
| 48 |
|
$cmd = "ra_bmp -e auto '$ARGV[0]' '$dest'"; |
| 49 |
|
} |
| 50 |
– |
} elsif ("$format" =~ /^Radiance_spectra *$/) { |
| 51 |
– |
$cmd = "rcomb -fc -c RGB '$ARGV[0]' "; |
| 52 |
– |
$cmd .= "| $pfilt " if ($pfilt); |
| 53 |
– |
$cmd .= "| ra_bmp -e auto - '$dest'"; |
| 50 |
|
} elsif ("$format" =~ /^16-bit_encoded_depth *$/) { |
| 51 |
|
$cmd = "rcode_depth -r -ff -ho -Ho '$ARGV[0]' "; |
| 52 |
|
$cmd .= q{| rcalc -if -of -e 'cond=9e9-$1;$1=$1' | total -if -u}; |
