Perl base64返回不同的内容

Question

当我运行Perl base64时，它返回的字符串与返回的字符串（online encoding system）不同。可能是什么原因造成的？

这就是我获取图像的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);