2

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 );
4

1 に答える 1

7

あなたは間違っている

binmode(IMAGE);
于 2012-07-03T06:50:35.397 に答える