Perl，Image :: Magick，写字时丢失了字节

Question

晚上好。

有一个问题。

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

执行文件大小（$ upload-＆gt; tempname和$ upload_file_name）后不匹配。 图像格式为jpg（$ upload-＆gt; tempname为JPEG，$ upload_file_name为JPEG）。 什么可能是错的？

Answer 1

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

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