Beefy Boxes and Bandwidth Generously Provided by pair Networks
Come for the quick hacks, stay for the epiphanies.
 
PerlMonks  

Re: File Encryption

by duckyd (Hermit)
on Dec 15, 2008 at 17:37 UTC ( [id://730463] : note . print w/replies, xml ) Need Help??


in reply to File Encryption

By "replace the enciphered file with the original" I assume you mean decrypt? There are many modules in the Crypt:: namespace on CPAN, one of which should be suitable for your needs. The perldoc for Crypt::Blowfish provides a very straightforward example of encrypting and decrypting:
use Crypt::Blowfish; my $cipher = new Crypt::Blowfish $key; my $ciphertext = $cipher->encrypt($plaintext); my $plaintext = $cipher->decrypt($ciphertext);

Replies are listed 'Best First'.
Re^2: File Encryption
by Anonymous Monk on Dec 15, 2008 at 19:09 UTC
    Many thanks...