I had a Web portal for various applications set up on an OpenSUSE Linux 11.2 server so that jobs could be submitted by non Linux users. I upgraded recently to OpenSUSE 11.3 then 11.4, and when I attempt to browse to the portal from any computer in our network, I get the following server error:
Ciphertext does not begin with a valid header for 'salt' header mode at /usr/lib/perl5/site_perl/5.12.3/Tie/EncryptedHash.pm line 132. INIT failed--call queue aborted.
Here is the section of EncryptedHash.pm that is referenced; line 132 is the one with Crypt::CBC in it.
sub decrypt { # ($cipher $md5sum $ciphertext, $password) return undef unless $_[1]; my ($m, $d, $c) = split /\s/,$_[0]; my $ptext = Crypt::CBC->new($_[1],$m)->decrypt_hex($c); my $check = md5_base64($ptext); if ( $d eq $check ) { if ($ptext =~ /^REF (.*)/is) { my ($VAR1,$VAR2,$VAR3,$VAR4,$VAR5,$VAR6,$VAR7,$VAR8); return eval qq{$1}; } return $ptext; }
I am at a loss on how to correct this - I am, at best, a Perl novice. Any suggestions? Thank you for whatever aid you can provide.
In reply to Salt issue by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |