perl - Perl，Image::Magick，写入时丢失字节

Question

晚上好。

这儿存在一个问题。

my $image = Image::Magick->new;
$image->Read($upload->tempname . '[0]');
$image->Write(filename => $upload_file_name, compression => 'None');

执行后文件大小（$upload->tempname 和 $upload_file_name）不匹配。图像格式为 jpg（$upload->tempname 为 JPEG，$upload_file_name 为 JPEG）。可能有什么问题？

Answer 1

Image::Magick 可能会重新编码图像，而不是使用与最初编码时完全相同的算法和参数。

如果您只是重命名文件，为什么还要使用 Image::Magick 呢？