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？