in reply to Re^3: same encrypt word ?
in thread same encrypt word ?
i have an error like 'datasize not multiple of blocksize (16 bytes)' i'll find a way to use your code and adapt your codeprint "\n---- Test6 -------- \n"; my $key_6 = 'test-math'; $key_6 .= "\0" x (16 - length($key_6)); my $plaintext_6 = 'test-math'; my $cipher_6 = Crypt::Rijndael->new( $key_6, Crypt::Rijndael:: +MODE_ECB ); my $encrypted_6 = $cipher_6->encrypt($plaintext_6); printf "%02x", ord $_ for split //, $encrypted_6; print "---- Fin test 6 ---\n";
|
|---|