in reply to Crypt::Simple Passphrase Issue
That's not to say the passphrase doesn't matter, though. You can verify that using a different passphrase produces different results:
which produces ...#!/usr/bin/perl -w + use strict; use warnings; + use Crypt::Simple qw(encrypt decrypt); + my $data1 = encrypt("Here we go", passphrase => 'myTestPhrase'); my $data2 = encrypt("Here we go", passphrase => 'AnotherTestPhrase'); print "Encrypted(1): $data1\n"; print "Encrypted(2): $data2\n"; + my $result1 = decrypt($data1); my $result2 = decrypt($data2); print "Decrypted(1): $result1\n"; print "Decrypted(2): $result2\n";
Encrypted(1): Qf9g4cqQ/6xXgqvcPLJA6u9PZ4jPgegPrsBCsFaPch3LDsaN6TjN6xjL +jebw4yPFNO2rEBTUgISSkiX1v2Aelt4qmHFcd6nF Encrypted(2): qymmKtF/LXb+HIZe6ZCFS8xtLadYkS+09dZ8zxAvL+r9Rw+GjkeBMc8y +e++Yl/s/DxJppvKQm2ToJ78mENTuxcc8fUMrKdZbHuWGiMBxgK0= Decrypted(1): Here we go Decrypted(2): Here we go
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Crypt::Simple Passphrase Issue
by Anonymous Monk on May 17, 2006 at 13:05 UTC | |
by Corion (Patriarch) on May 17, 2006 at 13:06 UTC | |
by Anonymous Monk on May 17, 2006 at 13:16 UTC |