1



Java コードを perl コードに変換しようとしています。

BigInteger(byte[] val)

BigInteger
これは Java BigInteger コンストラクターです。

Perl Math::BigInt には同じコンストラクタがありません。
しかし、私はそれと同じ Java BigInteger コンストラクターを作成する必要があります。

次の 2 つのコードの同じ出力を行うにはどうすればよいですか。
シンプルですか?または非常に難しいですか?
何も思いつきません..

ジャワ

import java.security.MessageDigest; 
import java.math.BigInteger; 

public class Hash 
{ 
    public static void main( String[] args ) throws Exception 
    { 
        MessageDigest md5 = MessageDigest.getInstance("MD5"); 
        String plain = "abcd1234"; 
        BigInteger digest = new BigInteger(md5.digest(plain.getBytes("UTF-8"))); 

        System.out.println( digest.abs() ); 
    } 
} 

パール

use Digest::MD5 'md5_hex'; 
use Math::BigInt; 

my $plain = "abcd1234"; 
my $digest = Math::BigInt::->from_hex(md5_hex $plain); 
print $digest, "\n"; 
4

0 に答える 0