別名に保存した画像をPerlモジュールのImage::ExifToolで生成
PerlモジュールのImage::ExifToolを使用して、読み込んだ画像を別名で保存しました。。)
#!/opt/local/bin/perl
use strict;
use warnings;
use Image::ExifTool;
my $image_exif_tool = new Image::ExifTool;
$image_exif_tool->WriteInfo("sample.jpg", "rename.jpg");
exit;サンプルコードです。読み込んだ画像を別名で出力しました。
