openssl decryption passphrase issue in perl -

openssl decryption passphrase issue in perl -

i having difficulty analyzing how parameters beingness treated when passed in scheme phone call in perl.

when next code runs . . . .

$password = ‘t5!redrkbyg@bjd!’; system("pv myfile.aes | openssl enc -d -pass pass:$password -rc4 | md5sum > decrypted.md5");

the code results in different hash values on different systems.

on original system, crashed, similar code ran , file encrypted , decrypted successfully.

when executing code on machine, code runs clear text invalid. think problem special characters in password. can prepare problem going forwards but, need know got passed in pass parameter decrypt info old system.

thinking has how shell interpreting password. help appreciated.

thanks.

mark, response.

the code running in ubuntu 11.10 , bash shell.

i have tried decrypt interactively , typed in password when prompted exclamation marks should passed in seek escaping exclamation marks in case.

it seems more double parsing issue.

i echoed password , got following.

echo t5!redrkbyg@bjd!

bash: !redrkbyg@bjd!: event not found

(i’m trying above error text password in case.)

in perl print “t5!redrkbyg@bjd!”; gives t5!redrkbyg!. bash must parsing passphrase 1 time again in phone call openssl. if echo t5!redrkbyg! . . .

echo t5!redrkbyg!

i "bash: !redrkbyg!: event not found"

i’m running password tests in meantime, have ideas on how see result of parsing?

mark, again!

openssl