Perl base64返回不同的内容

Question

当我运行Perl base64时,它返回的字符串与返回的字符串(在线编码系统)不同.可能是什么原因造成的？

这就是我获取图像的base64的方法.

use MIME::Base64;

open (IMAGE, "C:\\wamp\\www\\image.png") or die "$!";
$raw_string = do{ local $/ = undef; <IMAGE>; };
$encoded = encode_base64( $raw_string );

Answer 1

你错过了

binmode(IMAGE);