On Tue, Aug 28, 2001 at 10:20:50AM +0200, Uwe Gansert wrote:
> a patch to avoid another warning in OpenSSL.pm
+ another one
--- /usr/lib/perl5/site_perl/5.6.0/OpenCA/OpenSSL.pm Tue Aug 28 10:18:23 2001
+++ OpenSSL.pm Tue Aug 28 10:28:43 2001
@@ -184,7 +184,7 @@
$ENV{'pwd'} = $passwd if( defined($passwd) );
- if ( $rand ne "" ) {
+ if ( defined($rand) && $rand ne "" ) {
$command .= "-rand \"$rand\" ";
} else {
$ENV{'RANDFILE'} = "/tmp/.rand_${$}";
--
tschau , Uwe Gansert
-------------------------------------------------------------------------------
echo '$e=5;$p=3;$q=13;$h=$p*$q;while(($e*++$d)%($h-$p-$q+1)-1){};while($t=subst
r("82758c1b8939c7ef5c5d0����������������������������������1eaa4aa38516aed5559fe
27fd0f5b0b464474b2316eac~~~~ [EMAIL PROTECTED] ~~~~390a03",$i,3)){$_.=pa
ck"I",(hex($t)%$h)**$d%$����������������������������������h+95;s/_/ /g;$_=($i+=
3)%2?uc:lc;print"$_\n";}'|perl -ne"chomp;s/�|~|\s*ug@[^~]*//g;print"|perl
PGP signature
