http://www.perlmonks.org?node_id=1027605


in reply to Cypto CBC and Blowfish

... crypt ...

I can't offer anything more specific than

I would use Crypt::CBCeasy

I would also use binmode

Where did you learn about $#ARGV == -1?? The perl way to write that is

if( @ARGV ){ print "have args\n" } else { print "got none\n"; }

Replies are listed 'Best First'.
Re^2: Cypto CBC and Blowfish
by Will C (Initiate) on Apr 11, 2013 at 18:49 UTC

    Another poster also suggested using BINMODE, however I have tried it a few different ways (see my second post) and am not getting the results I need. As to $#ARV== -1, I do not recall specifically. I have been writing Perl for about 4 years now and relied heavily on the Perl Black Book and the Perl CookBook back then so my guess is either from one of those or perhaps one of the online tutorials I took. I appreciate your advice though.