>

내 펄 스크립트는 PHP에서 AES 암호화 문자열을 해독하지 않습니다

여기에 뭔가 빠진 것 같습니다. IV로 펄에서 해독 할 수있는 샘플 스크립트가 있습니까?

이것은 PHP의 암호화 스크립트입니다

<?php
  $encryption_key = base64_decode('OhjsqEflVL1GNteBIgpD1ngMvS3vVicAkfTyerJjr/c=');
  $iv = "1234567812345678";
  $data = "PLAIN TEXT";
  $encrypted = openssl_encrypt($data, 'aes-256-cbc', $encryption_key, OPENSSL_RAW_DATA, $iv);
  print "Encrypted string = <".base64_encode($encrypted).">\n";
  $decrypted = openssl_decrypt($encrypted,'aes-256-cbc', $encryption_key, OPENSSL_RAW_DATA , $iv);
  print "DECRYPTED DATA=<$decrypted>\n";
?>

이것은 perl의 암호 해독 스크립트입니다

use Crypt::CBC;
use Crypt::Cipher::AES;
use MIME::Base64 qw(decode_base64);
use strict;
my $key=decode_base64('OhjsqEflVL1GNteBIgpD1ngMvS3vVicAkfTyerJjr/c=')
my $iv = "1234567812345678";
$iv=undef;
my $cbc = Crypt::CBC->new( -cipher=>'Cipher::AES', -key=>$key, -iv=>$iv );
my $plaintext = $cbc->decrypt(decode_base64('sR9aVLpjHgpbM7Kw8hb7Ig=='));
print "$plaintext\n";

  • 이전 python - 버튼이 작동하지 않는 Tkinter 명령
  • 다음 android - fileprovider illegalargumentexception/data/data /를 포함하는 구성된 루트를 찾지 못했습니다