Toby Stuart wrote:
see corrections below
-Original Message-
From: Toby Stuart [mailto:toby.stuart;figtreesys.com.au]
Sent: Wednesday, October 23, 2002 3:35 PM
To: '[EMAIL PROTECTED]'
Subject: Crypt::CBC w/Crypt-DES
Hi All,
I'm trying to encrypt/decrypt a text file using Crypt::CBC
thanks $Bill, i had to add binmode on $ifh and $ofh (see below) to make it
work
-Original Message-
From: $Bill Luebkert [mailto:dbe;wgn.net]
Sent: Wednesday, October 23, 2002 4:56 PM
To: Toby Stuart
Cc: '[EMAIL PROTECTED]'
Subject: Re: FW: Crypt::CBC w/Crypt-DES (small correction
Toby Stuart wrote:
thanks $Bill, i had to add binmode on $ifh and $ofh (see below) to make it
work
Try this one:
use strict;
use Crypt::CBC;
use IO::File;
my $key = pack H16, 1122334455667788;
my $cipher = new Crypt::CBC ($key, 'DES');
die Usage: perl $0 file-to-encrypt
