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";