[12832] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 242 Volume: 9

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Jul 24 10:07:30 1999

Date: Sat, 24 Jul 1999 07:05:08 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)

Perl-Users Digest           Sat, 24 Jul 1999     Volume: 9 Number: 242

Today's topics:
    Re: Can anyone explain concepts of Perl Objects? (Abigail)
    Re: Can anyone explain concepts of Perl Objects? (Anno Siegel)
    Re: Compiling Perl/Dynaloader on AIX prob. (NICHOLAS DRONEN)
        floating point number format... (GEMINI)
    Re: Fun with Net:NNTP <nobody@replay.com>
    Re: Geekspeak Programming Contest (Bart Lateur)
    Re: Has anyone seen this error before (Eric Bohlman)
        Module for e-mail <NOSPAMebin111@yahoo.com>
        Module for e-mail (Anno Siegel)
    Re: Module for e-mail <NOSPAMebin111@yahoo.com>
    Re: Module for e-mail <dan@tuatha.sidhe.org>
    Re: My newbie solution - is this the best? (Larry Rosler)
    Re: output of print map ( { unless (/^#/) {} } ("#") ); (Abigail)
    Re: Possible to pass Hash's? Please Help. <rpsavage@ozemail.com.au>
    Re: regex mathcing (Larry Rosler)
    Re: regex mathcing (Anno Siegel)
        the number of fields in a form <kaimar@ut.ee>
        Vs: MySQL or Access? <jth@sci.fi>
        WinNT MD5|SHA Perl <irishcream@iname.com>
    Re: XML::Parser::SAX handler classes daniel_chalef@my-deja.com
    Re: XML::Parser::SAX handler classes daniel_chalef@my-deja.com
        Digest Administrivia (Last modified: 1 Jul 99) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: 24 Jul 1999 02:09:01 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Can anyone explain concepts of Perl Objects?
Message-Id: <slrn7pipj6.2v7.abigail@alexandra.delanet.com>

Anno Siegel (anno4000@lublin.zrz.tu-berlin.de) wrote on MMCLIII September
MCMXCIII in <URL:news:7nbkkc$34i$1@lublin.zrz.tu-berlin.de>:
;; Abigail <abigail@delanet.com> wrote in comp.lang.perl.misc:
;; >Ramanika (ramanika@flashmail.com) wrote on MMCLIII September MCMXCIII in
;; ><URL:news:37990522.2EE12D5A@flashmail.com>:
;; >
;; >Why are you xposting this to a defunct group, and an off-topic group?
;; >Newsgroups header fixed.
;; >
;; >## What does bless do? (yes I have read all about it and still do not
;; >## understand)
;; >
;; >It makes the reference to the datastructure aware to which class
;; >it belongs. 
;; 
;; Oh dear.  Did I see the godess stumble?


For all practical purposes, it's the reference that's aware.

You are doing 'ref $obj', and not 'ref %$obj', aren't you?
And, $obj -> method(), and not %$obj -> method(), aren't you?

I don't really care where in the perlguts the information is stored.
If it's just stuck on the fridge-door, that would be fine with me.
But when using Perl object, one almost always uses the reference, not
the datastructure directly. Except for perverts that start off their
methods with: %self = %{+shift};


Abigail
-- 
perl5.004 -wMMath::BigInt -e'$^V=Math::BigInt->new(qq]$^F$^W783$[$%9889$^F47]
 .qq]$|88768$^W596577669$%$^W5$^F3364$[$^W$^F$|838747$[8889739$%$|$^F673$%$^W]
 .qq]98$^F76777$=56]);$^U=substr($]=>$|=>5)*(q.25..($^W=@^V))=>do{print+chr$^V
%$^U;$^V/=$^U}while$^V!=$^W'


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
   http://www.newsfeeds.com       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----


------------------------------

Date: 24 Jul 1999 07:58:57 -0000
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: Can anyone explain concepts of Perl Objects?
Message-Id: <7nbro1$3dp$1@lublin.zrz.tu-berlin.de>

Abigail <abigail@delanet.com> wrote in comp.lang.perl.misc:
>Anno Siegel (anno4000@lublin.zrz.tu-berlin.de) wrote on MMCLIII September
>MCMXCIII in <URL:news:7nbkkc$34i$1@lublin.zrz.tu-berlin.de>:
>;; Abigail <abigail@delanet.com> wrote in comp.lang.perl.misc:
>;; >Ramanika (ramanika@flashmail.com) wrote on MMCLIII September MCMXCIII in
>;; ><URL:news:37990522.2EE12D5A@flashmail.com>:
>;; >
>;; >Why are you xposting this to a defunct group, and an off-topic group?
>;; >Newsgroups header fixed.
>;; >
>;; >## What does bless do? (yes I have read all about it and still do not
>;; >## understand)
>;; >
>;; >It makes the reference to the datastructure aware to which class
>;; >it belongs. 
>;; 
>;; Oh dear.  Did I see the godess stumble?
>
>
>For all practical purposes, it's the reference that's aware.
>
>You are doing 'ref $obj', and not 'ref %$obj', aren't you?
>And, $obj -> method(), and not %$obj -> method(), aren't you?
>
>I don't really care where in the perlguts the information is stored.
>If it's just stuck on the fridge-door, that would be fine with me.
>But when using Perl object, one almost always uses the reference, not
>the datastructure directly. Except for perverts that start off their
>methods with: %self = %{+shift};

All true, but if the blessing was stuck onto the reference,

$obj = bless \$a;
$whatsit = \$a;

would leave me with an unblessed $whatsit.  So the difference is
of some semantic consequence.

Anno


------------------------------

Date: Sat, 24 Jul 1999 06:21:07 GMT
From: mirabai@io.frii.com (NICHOLAS DRONEN)
Subject: Re: Compiling Perl/Dynaloader on AIX prob.
Message-Id: <nXcm3.54$H3.173652992@news.frii.net>

amackay11@my-deja.com wrote:
: When I install Perl on AIX 4.3, I get

: make
: ....
: AutoSplitting perl library
: Making DynaLoader (static)
: The Unsupported function umask function is unimplemented at
: ../../lib/ExtUtils/Install.pm line 247.
:  make: The error code from the last command is 2.

: Help Please!!

Sure.

What level of bos.rte.libc is installed on this system?


------------------------------

Date: 24 Jul 1999 08:45:55 GMT
From: dennis@info4.csie.nctu.edu.tw (GEMINI)
Subject: floating point number format...
Message-Id: <7nbug3$gu4$1@netnews.csie.NCTU.edu.tw>

hi all,

I wish to ouput floating point numbers in compact format,
but at most 4 digits decimal, and no exponential (e+04).
I found that by using sprintf('%g'....
will get only 1 decimal digit (e.g. 10204.34 will become 10204.3).
If I use sprintf('%.4g'..., I will get exponential number 
(e.g. 10203.12 will become 1.02e+04).

I wouldn't like to use %f instead because there will be too many 
redundant 0s (i.e., 10.0000).

So how should I specify the format string for sprintf to
obtain the needed effect?

Thanks.




------------------------------

Date: Sat, 24 Jul 1999 13:12:19 +0200 (CEST)
From: Anonymous <nobody@replay.com>
Subject: Re: Fun with Net:NNTP
Message-Id: <199907241112.NAA15106@mail.replay.com>

Hello James!

The original poster might not be stuck but I am, being
dummy in this department. :-(

But I'd love to have a working script like that on one of my
webpages. Is it appropriate to ask for your revised code here? 

If not, please accept my apologies.

Thanks.

Diane

On 21 Jul 1999 fl_aggie@thepentagon.com (I R A Darth Aggie) wrote:

>Here is a tip: comment out this line, and replace it:
>
>#my $newsptr = Net::NNTP->new('news.mixcom.com');
>my $newsptr = Net::NNTP->new('news.mixcom.com','Debug',10);
>
>The server quite cheerfully tells you what's wrong. That's left as an
>exercise for the student. If you're really stuck, I'll post my revision
>to your code. I have a feeling that you're going to say "D0H!" when you
>realize what it is... ;)
>
>Interestingly enough, I was able to post using a $scalar
>variable, not a @list. I don't know if that's a feature or a bug, tho.






------------------------------

Date: Sat, 24 Jul 1999 09:48:20 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: Geekspeak Programming Contest
Message-Id: <37998b8e.667064@news.skynet.be>

Ronald J Kimball wrote:

>Tom Christiansen <tchrist@mox.perl.com> wrote:
>
>>  * Microsoft's mistakes = virii
>
>Tsk tsk...  I know you know better than that, Tom.  ;)

Yeah, right. MS' people aren't clever enough to program a virus. <duck
and run>

	Bart.


------------------------------

Date: 24 Jul 1999 07:15:18 GMT
From: ebohlman@netcom.com (Eric Bohlman)
Subject: Re: Has anyone seen this error before
Message-Id: <7nbp66$pmh@dfw-ixnews8.ix.netcom.com>

Larry Rosler (lr@hpl.hp.com) wrote:
: In article <7nb5ra$g747@news.cyber.net.pk> on Fri, 23 Jul 1999 20:42:15 
: +0500, Faisal Nasim <swiftkid@bigfoot.com> says...
: > Are you using 'strict'? One of the variable is not initialed either $count
: > or any $..... in the value. (Case does matter!)
: 
: Totally irrelevant.  "use strict 'vars'" is a compile-time check on 
: whether variables are declared.  'perl -w' is a run-time check on 
: whether variables are initialized.  The latter is what is wrong here.

Ah, but the latter often happens because someone forgot to do the former 
and then either mistyped a variable name or got confused about what name 
he gave a variable (e.g. started off using $counter and than accidentally 
switched to $count).  "use strict 'vars'" will catch cases like that.



------------------------------

Date: Fri, 23 Jul 1999 22:34:13 -0700
From: "e-bin" <NOSPAMebin111@yahoo.com>
Subject: Module for e-mail
Message-Id: <Xjcm3.934$Fl.39254@typhoon-sf.snfc21.pbi.net>

I'm obviously fairly new to learning Perl, and was wondering where I might
find a module to send e-mail to users without the use of an e-mail program
such as "sendmail".  Any help would be greatly appreciated.  I've read
various documentation on how to do this, but all of them refer to your
"e-mail" program to actually complete the task of sending the e-mail/file.


Reason for question: My employer wants me to set-up a page that can send
e-mail, as well as attachments, much like hotmail, and yahoo's messaging
service.






------------------------------

Date: 24 Jul 1999 06:58:44 -0000
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Module for e-mail
Message-Id: <7nbo74$37i$1@lublin.zrz.tu-berlin.de>

e-bin <NOSPAMebin111@yahoo.com> wrote in comp.lang.perl.misc:
>I'm obviously fairly new to learning Perl, and was wondering where I might
>find a module to send e-mail to users without the use of an e-mail program
>such as "sendmail".  Any help would be greatly appreciated.  I've read
>various documentation on how to do this, but all of them refer to your
>"e-mail" program to actually complete the task of sending the e-mail/file.
>
>
>Reason for question: My employer wants me to set-up a page that can send
>e-mail, as well as attachments, much like hotmail, and yahoo's messaging
>service.

But why would you want to forgo a mail agent, which surely exists
on the web server in question?  The smtp protocol is perhaps one
of the simpler ones, but it's not child's play to implement, and
there's really no good reason to do that.

Anno



------------------------------

Date: Sat, 24 Jul 1999 00:26:30 -0700
From: "e-bin" <NOSPAMebin111@yahoo.com>
Subject: Re: Module for e-mail
Message-Id: <WYdm3.955$Fl.42962@typhoon-sf.snfc21.pbi.net>

Thank you for the reply.  I didn't know that mail agents were commonplace on
most servers.  Most of my development work has been done off of a windows
98(blehh, haven't installed Linux yet, but planning to) operating system,
using Apache web-server. Any suggestions for tracking down one of these mail
agents that I can test on this type of platform?

George

Anno Siegel <anno4000@lublin.zrz.tu-berlin.de> wrote in message
news:7nbo19$36q$1@lublin.zrz.tu-berlin.de...
> e-bin <NOSPAMebin111@yahoo.com> wrote in comp.lang.perl.misc:
> >I'm obviously fairly new to learning Perl, and was wondering where I
might
> >find a module to send e-mail to users without the use of an e-mail
program
> >such as "sendmail".  Any help would be greatly appreciated.  I've read
> >various documentation on how to do this, but all of them refer to your
> >"e-mail" program to actually complete the task of sending the
e-mail/file.
> >
> >
> >Reason for question: My employer wants me to set-up a page that can send
> >e-mail, as well as attachments, much like hotmail, and yahoo's messaging
> >service.
>
> But why would you want to forgo a mail agent, which surely exists
> on the web server in question.  The smtp protocol is perhaps one
> of the simpler ones, but it's not child's play to implement, and
> there's really no good reason to do that.
>
> Anno




------------------------------

Date: Sat, 24 Jul 1999 12:03:28 GMT
From: <dan@tuatha.sidhe.org>
Subject: Re: Module for e-mail
Message-Id: <kYhm3.18561$y92.10496@news.rdc1.ct.home.com>

e-bin <NOSPAMebin111@yahoo.com> wrote:
> I'm obviously fairly new to learning Perl, and was wondering where I might
> find a module to send e-mail to users without the use of an e-mail program
> such as "sendmail".  Any help would be greatly appreciated.  I've read
> various documentation on how to do this, but all of them refer to your
> "e-mail" program to actually complete the task of sending the e-mail/file.

You'll still need a mailserver of your own somewhere to talk to, but you
can use either Mail::Mailer (in the mailtools module on CPAN) or
Net::SMTP (in the libnet module on CPAN) to send mail. For attachments,
take a look at MIME::Lite, which lets you build up MIME-encoded messages
and will send 'em for you if you've got the mailtools and libnet modules
installed.

There are a variety of examples scattered around the net, and the latest
perl journal (www.tpj.com--go subscribe, it's a good magazine) has some
articles on this topic. (Everything's available via the web as well as in
print, so subscribing gets you access to the latest issue's articles)

					Dan


------------------------------

Date: Fri, 23 Jul 1999 23:15:42 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: My newbie solution - is this the best?
Message-Id: <MPG.1202f9e1f2c304bf989d30@nntp.hpl.hp.com>

In article <slrn7pik9e.2rn.abigail@alexandra.delanet.com> on 24 Jul 1999 
00:38:30 -0500, Abigail <abigail@delanet.com> says...
> Larry Rosler (lr@hpl.hp.com) wrote on MMCLII September MCMXCIII in
> <URL:news:MPG.120292daaccbc659989d2d@nntp.hpl.hp.com>:
> "" In article <7nanm6$vr7$1@nnrp1.deja.com> on Fri, 23 Jul 1999 21:43:36 
> "" GMT, breslow_marty@tandem.com <breslow_marty@tandem.com> says...
> "" > I found that after the strip of STDIN the field had a beginning and
> "" > trailing quote so I used substr to remove them...

> "" s/"(.+)"/"${\do{(my$x=$1)=~s|"|""|g;$x}}",/;
> "" 
> "" Golf, anyone?
> 
> Yours doesn't work for strings containing newlines, (or the string '""'
> for that matter); fixing that, and beating your score:

See the part of the quote that I left behind?  s/strip/chomp/.  No 
newlines in there (unless he played with $/, which I doubt strongly)!  
And the fix for the empty guts is obvious -- '+' -> '*'.
 
>    s;(?<=.)"(?=.);"";gs;s;$;,;;
> 
> Just in case you complain it's actually 2 statements, and not a oneliner:
> 
>    s+(?<=.)"(?=.)+""+gs+s+$+,+;

Very impressive.  I dare say you can even drop the /s on the first 
substitution.
 
> Or, for pre-perl5.005, still beating your score:
> 
>    substr($_,1,-1)=~s;";"";g;s;$;,;;

Also impressive.  Both are very instructive.  Thanks!

-- 
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com


------------------------------

Date: 24 Jul 1999 02:13:57 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: output of print map ( { unless (/^#/) {} } ("#") );
Message-Id: <slrn7pipsf.2v7.abigail@alexandra.delanet.com>

Anno Siegel (anno4000@lublin.zrz.tu-berlin.de) wrote on MMCLIII September
MCMXCIII in <URL:news:7nbitk$32a$1@lublin.zrz.tu-berlin.de>:
,, 
,, 
,, is a syntax error.  Even if you put the if inside a block, like
,, 
,, $x = { if ( ... ) { ... } }

That's not a block. That would be an anon hash.



Abigail
-- 
perl -we '$@="\145\143\150\157\040\042\112\165\163\164\040\141\156\157\164".
             "\150\145\162\040\120\145\162\154\040\110\141\143\153\145\162".
             "\042\040\076\040\057\144\145\166\057\164\164\171";`$@`'


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
   http://www.newsfeeds.com       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----


------------------------------

Date: Sat, 24 Jul 1999 17:29:27 +1000
From: "Pen and Ron Savage" <rpsavage@ozemail.com.au>
Subject: Re: Possible to pass Hash's? Please Help.
Message-Id: <M_dm3.1021$gT.8418@ozemail.com.au>

Don't post to comp.lang.perl - it was discontinued a long time ago.

Returning a hash from a sub - tested code.

#!perl -w

use integer;
use strict;

# ---------

sub marine
{
 my($hashRef) = @_;

 $$hashRef{'Key'} = 'New data';
}

# ---------

my($hash) = {'Key' => 'Old data' };

&marine($hash);

for (keys(%$hash) )
{
 print "$_ => $$hash{$_} \n";
}

--
Cheers
Bus: rons@hpaco.aus.hp.com
Home: ron@savage.net.au
http://savage.net.au/
Ramanika wrote in message <379903EE.CDFA05BC@flashmail.com>...
>Does anyone have an example of passing a hash to an object, having the
>object modify the values and then returning the hash to the calling
>procedure?  I am new to perl and have been playing around with this have
>
>read everything I can be my hands on but still no luck.
>
>Please CC: me on email if you reply back to the group.
>
>Thanks
>
>Ramanika
>




------------------------------

Date: Fri, 23 Jul 1999 23:31:30 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: regex mathcing
Message-Id: <MPG.1202fd9cdca34501989d31@nntp.hpl.hp.com>

In article <x3yvhba3hsm.fsf@tigre.matrox.com> on Fri, 23 Jul 1999 
22:25:45 -0400, Ala Qumsieh <aqumsieh@matrox.com> says...
> pozman@my-deja.com writes:
> > If I have a string and want to know how many occurance there are of
> > another particular string within the first one, is there a regular
> > expression to  do that.
> 
> 	$string = 'this is his cat';
> 	$search = 'is';
> 
> 	$count = () = $string =~ /$search/g;
> 
> If this looks cryptic, then you should have a good look at perlre for
> more information of Perl's regexps.

We discussed this at length a couple of weeks ago.  
<URL:http://x30.deja.com/[ST_rn=ps]/getdoc.xp?AN=498727524&search=thread
>

In addition to being cryptic (which doesn't bother me a bit :-), this 
approach is slow, because it constructs a list to find out how many 
elements are in it, then throws the list away (this bothers me a lot).

It isn't mentioned in the FAQ I referred to, for good reason.  Greg 
Bacon will disagree.

-- 
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com


------------------------------

Date: 24 Jul 1999 07:40:31 -0000
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: regex mathcing
Message-Id: <7nbqlf$3ba$1@lublin.zrz.tu-berlin.de>

Larry Rosler <lr@hpl.hp.com> wrote in comp.lang.perl.misc:
>In article <x3yvhba3hsm.fsf@tigre.matrox.com> on Fri, 23 Jul 1999 
>22:25:45 -0400, Ala Qumsieh <aqumsieh@matrox.com> says...
>> pozman@my-deja.com writes:
>> > If I have a string and want to know how many occurance there are of
>> > another particular string within the first one, is there a regular
>> > expression to  do that.
>> 
>> 	$string = 'this is his cat';
>> 	$search = 'is';
>> 
>> 	$count = () = $string =~ /$search/g;
>> 
>> If this looks cryptic, then you should have a good look at perlre for
>> more information of Perl's regexps.
>
>We discussed this at length a couple of weeks ago.  
><URL:http://x30.deja.com/[ST_rn=ps]/getdoc.xp?AN=498727524&search=thread
>>
>
>In addition to being cryptic (which doesn't bother me a bit :-), this 

It bothers me, because I don't understand how it works.  () provides
a list context for the pattern match, so it delivers a list of matches,
that much is clear.  But the result is assigned to the empty list,
which means nothing is assigned and the result is thrown away.
So how come the scalar to the left gets to see how many elements
there used to be?

I mean, when we replace $count with @list, things work as I would expect.
Doing away with the pattern match:

@list = () = ( 1, 2, 3 );

sets @list to the empty list. Like some politicians, it is blind to
what happens on the far right.  But $count is more perspicuous:

$count = () = ( 1, 2, 3 );

sets $count to 3.  What's going on?

Anno



------------------------------

Date: Sat, 24 Jul 1999 12:02:00 +0300
From: Kaimar <kaimar@ut.ee>
Subject: the number of fields in a form
Message-Id: <37998108.4D2B2613@ut.ee>

hey,

is the number of fields in the form limited?
i encountered a situation, where the first 16 values are passed to the
script, but all the others are ignored. what might be the reason for
that?

hope you can help,

--
Regards,

Kaimar




------------------------------

Date: Sat, 24 Jul 1999 11:32:36 +0300
From: "Jouni Honkala" <jth@sci.fi>
Subject: Vs: MySQL or Access?
Message-Id: <7nbtnv$sgf$1@tron.sci.fi>

You need Access itself or the MS Jet engine to use an Access DB file.
Someone correct me if I'm wrong, but I don't think it could work on
Unix.

Personally I'm using a few Perl scripts to use an Access DB file on my
Win95 machine, and after learning a few tricks about Perl and ODBC or
OLE, Access and Perl is a pretty good combination.

-jth

Dan <pleasenomail@privacy.org> kirjoitti
viestissä:9zbm3.53796$AU3.1278529@news2.giganews.com...
> I have got a question..... I would like to choose a db and I have a
dilemma
> between MySQL and Microsnot Access. They have both very nice
features and
> the decision is not obvious. What do you all think about that?
>
> Also, if I put an Access db file on a unix box can I use ODBC (or
something
> else)
> transparently to work with the DB?
>
> Thanks for your suggestions.
> Daniel
> http://thewebcowboy.com
>
>




------------------------------

Date: Sat, 24 Jul 1999 15:57:19 +0200
From: "John" <irishcream@iname.com>
Subject: WinNT MD5|SHA Perl
Message-Id: <7ncgak$9q6$1@wanadoo.fr>

Hello All,
I've been trying since the 5 hours to compile the CPAN MD5 Perl
under WinNT, without success. After preparing the adequate
environment (vcvars32.bat), perl Makefile.PL, nmake, I get
the following errors
----------
MD5.c
MD5.xs(54) : error C2065: 'MD5Init_perl' : undeclared identifier
MD5.xs(88) : error C2065: 'MD5Update_perl' : undeclared identifier
MD5.xs(99) : error C2065: 'MD5Final_perl' : undeclared identifier
NMAKE : fatal error U1077: 'cl.exe' : return code '0x2'
Stop.
--------
The problem is that in the MD5.xs, the following symbols are
used wihout being defined anywhere !
------------
/*
** The following macro re-definitions added to work around a problem on
** Solaris where the original MD5 routines are already in /lib/libnsl.a.
**/
#define MD5Init  MD5Init_perl
#define MD5Update MD5Update_perl
#define MD5Final MD5Final_perl
-----------
If I remove them, I got other unrecoverable errors ....

Did any body go through this before anf fix it? Or does anyone know
a MD5 or SHA Perl implementation for WinNT ?

Thanks

John




------------------------------

Date: Sat, 24 Jul 1999 13:23:18 GMT
From: daniel_chalef@my-deja.com
Subject: Re: XML::Parser::SAX handler classes
Message-Id: <7nceo6$72f$1@nnrp1.deja.com>

In article <3797AE82.F496CA9A@dwc.ch>,
  Christoph Wernli <cw@dwc.ch> wrote:
> Just in case there is no answer, the list is at
> perl-xml@lyris.activestate.com

Much thanks - will ask on the list...

regards
Daniel


Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.


------------------------------

Date: Sat, 24 Jul 1999 13:23:48 GMT
From: daniel_chalef@my-deja.com
Subject: Re: XML::Parser::SAX handler classes
Message-Id: <7ncep4$72h$1@nnrp1.deja.com>

In article <3797AE82.F496CA9A@dwc.ch>,
  Christoph Wernli <cw@dwc.ch> wrote:
> Just in case there is no answer, the list is at
> perl-xml@lyris.activestate.com

Much thanks - will ask on the list...

regards
Daniel


Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.


------------------------------

Date: 1 Jul 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin) 
Subject: Digest Administrivia (Last modified: 1 Jul 99)
Message-Id: <null>


Administrivia:

The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc.  For subscription or unsubscription requests, send
the single line:

	subscribe perl-users
or:
	unsubscribe perl-users

to almanac@ruby.oce.orst.edu.  

To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.

To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.

To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.

The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.

The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.

For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.


------------------------------
End of Perl-Users Digest V9 Issue 242
*************************************


home help back first fref pref prev next nref lref last post