Ключевые слова
сначала посмотрим какие Ключевые слова (Keywords) у нас есть
#!/usr/bin/perl
use Image::IPTCInfo;
$info = create Image::IPTCInfo("php/6463.jpg");
print ($info->Keywords());
теперь уберем их
$info->ClearKeywords();
и внесем новые
$info->AddKeyword(['one', 'two', 'tree']);
и сохраним
$info->Save();