Encrypt and Decryption of a file in perl.

jags1984 · 12-26-2014, 04:02 AM

Hi,

How to encrpt and decrpt a file in perl.

Currently I am using Unix method of encryption and decryption in Perl program. I want to do it in Perl way.

Code:

Encryption
my $ret= `openssl enc -aes-256-cbc -salt -in $In_File -out $Out_File -k "Jack and Jill" `;

Code:

Decryption
my $ret= `openssl enc -aes-256-cbc -d -in $In_File -out $Out_File -k "Jack and Jill" `;

unSpawn · 12-26-2014, 04:46 AM

Use Crypt::OpenSSL::AES? Or else pick one from http://search.cpan.org/search?query=crypt&mode=module ?