Syntactic Confectionery Delight | |
PerlMonks |
DES ECB mode encryptionby v4169sgr (Sexton) |
on Aug 28, 2014 at 07:46 UTC ( [id://1098840]=perlquestion: print w/replies, xml ) | Need Help?? |
v4169sgr has asked for the wisdom of the Perl Monks concerning the following question: I use Perl 5.10 ActivePerl 5.14 on win7. I am a humble user, and don't really understand what I am doing. I have a requirement to connect to a remote host and send locally encrypted messages, using DES ECB mode encryption. This is not my choice, but a part of the requirement. I am trying to find out how to implement DES ECB mode encryption simply in Perl I do not have access to a C compiler, and cannot be the local administrator on my machine. I don't have download rights either, but can copy / paste source from CPAN into .pm files in my C:. I have copied the source for DES.pm and ECB.pm to C:\Perl 5.10\lib\Crypt\ from CPAN. In my script I use use Crypt::ECB qw(encrypt decrypt encrypt_hex decrypt_hex);and try using it as a proof of concept - the text is from FIPS PUB 81: print encrypt_hex("0123456789abcdef", "DES", "Now is the time for all ", "1") . "\n";However, when trying to run this, I see the following error:
I think this is because I don't have a binary for DES (not sure what this means). I did notice that there is a DES module written in Perl called Crypt::DES_PP. Would using this solve the problem and help me satisfy the requirement? If so, how can I use this module? (Basic, please, I don't understand much!) Thanks in advance for any assistance!!!
Back to
Seekers of Perl Wisdom
|
|