perl-embperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Aaron Johnson <solut...@gina.net>
Subject Re: Apache::SessionX Installation
Date Sat, 07 Sep 2002 01:49:10 GMT
On Thu, 2002-09-05 at 20:01, Dean Powers wrote:
> I'm trying to install SessionX from CPAN. It fails, of course, and now I'm trying to
modify the
> MD5.pm file in per the following patch from May 26th.
> Question. Exactly what part of this patch do I put in the MD5.pm file?
> What is @@ -26,7 +26,7 @@? Why is there a minus sign in front of "use MD5".
> 
> Why can't this get added to the CPAN so us Newbies don't have to do go in and patch files?
> 
> I've added the part from "use strict;  to the last "}" bracket but it doesn't work.
> 
> Thanks for anyone's help. I really need to install SessionX.

Rather then explain the patch process, it would be better/simpler to
just install MD5 if you can.  I just did a fresh install under Perl 5.8
and have 5.6.1 on my other servers and I have not had to batch any files
in order to get it to work.  The error that I got most recently that
indicated I needed MD5 was misleading.  The error that was reported via
the server was that the error was in an Apache::Session handler, when in
theory we expect it to die with a "Can't locate Snorkal.pm in @INC...."
error message.  This is due, I believe, to the nature in which the
inheritance between the session modules work.

Aaron Johnson

> 
> 
> --- /tmp/MD5.pm Sun May 12 22:13:34 2002
> > +++ /usr/lib/perl5/site_perl/5.6.0/Apache/SessionX/Generate/MD5.pm
> > Sun May 12 22:12:57 2002
> > @@ -12,7 +12,7 @@
> >
> >  use strict;
> >  use vars qw($VERSION);
> > -use MD5;
> > +use Digest::MD5;
> >
> >  $VERSION = '2.1';
> >
> > @@ -26,7 +26,7 @@
> >      }
> >
> >      $session->{data}->{_session_id} =
> > -        substr(MD5->hexhash(MD5->hexhash($arg || (time(). {}. rand().
> $$))), 0, $length);
> > +        substr(Digest::MD5::md5_hex(Digest::MD5::md5_hex($arg || (time().
> {}. rand(). $$))), 0, $length);
> >
> >
> >  }
> >
> >
> 
> 
> 
> Dean Powers,
> PriceObjects
> 
> 
> 
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
> For additional commands, e-mail: embperl-help@perl.apache.org
> 
> 



---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org


Mime
View raw message