|
This config file defines a "MyKeywords" tag which
does what I described:
%Image::ExifTool::UserDefined = (
'Image::ExifTool::Composite' => {
MyKeywords => {
Require => 'Keywords',
ValueConv => q{
my @v = ref $val ? @$val : $val;
my $n = int(@v / 2);
$v[$n] = "| $v[$n]";
return \@v;
},
},
},
);
1; # end
- Phil
|