[13469] in Perl-Users-Digest
Perl-Users Digest, Issue: 879 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Sep 22 18:07:23 1999
Date: Wed, 22 Sep 1999 15:05:19 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <938037918-v9-i879@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Wed, 22 Sep 1999 Volume: 9 Number: 879
Today's topics:
Re: An experienced opinion please <jeff@vpservices.com>
Re: automatic news poster script <info@job-base.com>
Re: automatic news poster script (Abigail)
Re: automatic news poster script <info@job-base.com>
Re: automatic news poster script <elaine@chaos.wustl.edu>
Re: automatic news poster script <gellyfish@gellyfish.com>
Re: automatic news poster script <info@job-base.com>
Re: automatic news poster script <info@job-base.com>
Re: batch (Abigail)
Re: Be careful about using constants (Ilya Zakharevich)
Re: Case insensitive SQL query (Michael Stevens)
Re: Case insensitive SQL query mrbog@my-deja.com
Re: Checking for space <gellyfish@gellyfish.com>
Compile problem <MORRY.DAVIS@Sun.COM>
Compile problem <MORRY.DAVIS@Sun.COM>
Compile problem <MORRY.DAVIS@Sun.COM>
Re: CONTEST: Range Searching (Kevin Reid)
Re: Copying directories and subdirectories <gellyfish@gellyfish.com>
executing sql statement using pool connections ming@tickets.com
Re: help! trouble with a perl mail script <gellyfish@gellyfish.com>
LWP and secure connections <smiles@wfubmc.edu>
Re: LWP and secure connections <elaine@chaos.wustl.edu>
MailHandler and CGI <clancy@vr1.com>
Re: memory use of children <gellyfish@gellyfish.com>
month/day algorithm <tom.kralidis@ccrs.nrcanDOTgc.ca>
Re: Need a simple script <gellyfish@gellyfish.com>
Re: Newbie question (Michael Stevens)
Re: perl Ad <gellyfish@gellyfish.com>
Re: printf mask? (Joe Petolino)
Re: Problem doing authentication with Apache::DBI <gellyfish@gellyfish.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 22 Sep 1999 19:19:43 GMT
From: Jeff Zucker <jeff@vpservices.com>
Subject: Re: An experienced opinion please
Message-Id: <37E92A15.4AA44523@vpservices.com>
Dave Wallace wrote:
>
> I am setting up another computer: OS is NT running IIS and ActivePerl
> 509. The web site has been copied under the same root. Perl installed to
> same location. Virtual directories all identical and with same rights.
> Identical scripts. Registry keys identical.
>
> Problem: When I access a building on the new system, everything displays
> as it should: header graphic, photograph, data table header, footer
> graphic....but not the data portion of the table. No error messages,
> nothing! It's as if the data file is empty and there is nothing to
> display
Maybe check to see if the line endings in the data file got changed in
the process of transferring files. Depending on how you transferred it,
the process could have inserted or deleted ^M or some such.
Also, does your script use any modules? Could there be different
versions of the modules on the two machines?
Also, AP build 509 is quite out of date, you might want to upgrade tho I
doubt that is what is causing your current woes.
--
Jeff
------------------------------
Date: Wed, 22 Sep 1999 22:51:58 +0200
From: Job-Base <info@job-base.com>
Subject: Re: automatic news poster script
Message-Id: <37E9416E.C9F2C89E@job-base.com>
Okay ... is there a spam panick settling in ... weel that's not what we
are going to do ... Yes we want to post automatically to usenet but with
relevant jobs in their relevant categories. Please see the
alt.jobs/uk.jobs.contract, .... these groups accept this kind of
submission.
So now that this is cleared ... anyone still left with ideas.
Michael
Kragen Sitaker wrote:
>
> In article <37E90A80.F546F696@job-base.com>,
> Job-Base <info@job-base.com> wrote:
> >Could someone tell me if it is possible to include some part of perl
> >code with which it would be able to directly send a message to a usenet
> >server. I would like to have the perl script send the data
> >automatically without user intervention. But how to do that
>
> Please explain in more detail why you want to do this. I have an
> extremely unpleasant suspicion about what you intend to do.
>
> --
> <kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
> Wed Sep 22 1999
> 47 days until the Internet stock bubble bursts on Monday, 1999-11-08.
> <URL:http://www.pobox.com/~kragen/bubble.html>
--
Michael R.C. De Coninck
michaeldc@job-base.com
T: +32 2 270.45.74
F: +32 2 270.45.75
C: +32 75 47.62.10
http://www.job-base.com
http://www.c-ware.net
------------------------------
Date: 22 Sep 1999 16:04:42 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: automatic news poster script
Message-Id: <slrn7uih82.e5i.abigail@alexandra.delanet.com>
Job-Base (info@job-base.com) wrote on MMCCXIII September MCMXCIII in
<URL:news:37E90A80.F546F696@job-base.com>:
() Could someone tell me if it is possible to include some part of perl
() code with which it would be able to directly send a message to a usenet
() server. I would like to have the perl script send the data
() automatically without user intervention. But how to do that
I suggest asking this news.admin.net-abuse.usenet.
Abigail
--
srand 123456;$-=rand$_--=>@[[$-,$_]=@[[$_,$-]for(reverse+1..(@[=split
//=>"IGrACVGQ\x02GJCWVhP\x02PL\x02jNMP"));print+(map{$_^q^"^}@[),"\n"
-----------== 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: Wed, 22 Sep 1999 23:04:34 +0200
From: Job-Base <info@job-base.com>
Subject: Re: automatic news poster script
Message-Id: <37E94462.2F0E7E01@job-base.com>
> Why would anyone want to automatically post to a news server?
It's about sharing information ... right ? Useful information. Or did
I get it completely wrong in the first place. The point is we want to
distribute job offers (legitimate IT jobs) which will offer real careers
to real people. Or is that offensive to the job seeker. I understand
it would be carried on someone else's server (who has to pay for the
connection time and hard disk space) but why are they then doing it in
the first place (except to carry a.b.p.e.f. or worse)
No offense ... If one wants to do it they'll do it anyway. Just give
the well intentioned people a break.
> I'm sure you wouldn't do something so egregiously offensive
> as spamming Usenet. But then, what purpose would you have in
> mind? The people I know of who submit automatic posts all
> have the programming skills to write such beasts themselves.
>
> wondering,
> David
------------------------------
Date: Wed, 22 Sep 1999 17:11:52 -0400
From: Elaine -HFB- Ashton <elaine@chaos.wustl.edu>
Subject: Re: automatic news poster script
Message-Id: <37E94577.3A2119A@chaos.wustl.edu>
Job-Base wrote:
> Okay ... is there a spam panick settling in ... weel that's not what we
> are going to do ... Yes we want to post automatically to usenet but with
I'm certain you could understand the reluctance with the way the post
was worded.
> So now that this is cleared ... anyone still left with ideas.
See http://search.cpan.org/search?dist=NNTPClient where the wheel has
already been invented for you.
e.
------------------------------
Date: 22 Sep 1999 19:59:15 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: automatic news poster script
Message-Id: <7sbcej$58r$1@gellyfish.btinternet.com>
On Wed, 22 Sep 1999 18:57:36 +0200 Job-Base wrote:
> Could someone tell me if it is possible to include some part of perl
> code with which it would be able to directly send a message to a usenet
> server. I would like to have the perl script send the data
> automatically without user intervention. But how to do that
>
I came here on a train not a banana boat. I know you will found out
somehow whether it is here or elsewhere - your domain has been duly noted.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Wed, 22 Sep 1999 23:31:07 +0200
From: Job-Base <info@job-base.com>
Subject: Re: automatic news poster script
Message-Id: <37E94A9B.71DF1AC1@job-base.com>
Jonathan Stowe wrote:
> I came here on a train not a banana boat. I know you will found out
> somehow whether it is here or elsewhere - your domain has been duly noted.
... and ??? can I expect a postcard for Christmas ?
>
> /J\
> --
> Jonathan Stowe <jns@gellyfish.com>
> <http://www.gellyfish.com>
> Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
--
Michael R.C. De Coninck
michaeldc@job-base.com
T: +32 2 270.45.74
F: +32 2 270.45.75
C: +32 75 47.62.10
http://www.job-base.com
http://www.c-ware.net
------------------------------
Date: Wed, 22 Sep 1999 23:33:19 +0200
From: Job-Base <info@job-base.com>
Subject: Re: automatic news poster script
Message-Id: <37E94B1F.4B527C96@job-base.com>
Thank you very much Elaine. At the risk of being flamed again I would
even invite you to visit my site and will appreciate the comments you
would have.
Anyway, I got the URL which I apparently overlooked this afternoon.
Cheers & Regards
Michael
Elaine -HFB- Ashton wrote:
>
> Job-Base wrote:
> > Okay ... is there a spam panick settling in ... weel that's not what we
> > are going to do ... Yes we want to post automatically to usenet but with
>
> I'm certain you could understand the reluctance with the way the post
> was worded.
>
> > So now that this is cleared ... anyone still left with ideas.
>
> See http://search.cpan.org/search?dist=NNTPClient where the wheel has
> already been invented for you.
>
> e.
--
Michael R.C. De Coninck
michaeldc@job-base.com
T: +32 2 270.45.74
F: +32 2 270.45.75
C: +32 75 47.62.10
http://www.job-base.com
http://www.c-ware.net
------------------------------
Date: 22 Sep 1999 16:05:34 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: batch
Message-Id: <slrn7uih9n.e5i.abigail@alexandra.delanet.com>
Rasmus Rimestad (rasmusr@online.no) wrote on MMCCXIII September MCMXCIII
in <URL:news:EO3G3.42$OH6.607@news1.online.no>:
** Hi. I've written a perl-script that needs to be executed the first day of
** each month. I've made a function that loops and finds out which date it is,
** but I can't figure out how to start the script.
perl -w scriptname
Abigail
--
sub _'_{$_'_=~s/$a/$_/}map{$$_=$Z++}Y,a..z,A..X;*{($_::_=sprintf+q=%X==>"$A$Y".
"$b$r$T$u")=~s~0~O~g;map+_::_,U=>T=>L=>$Z;$_::_}=*_;sub _{print+/.*::(.*)/s}
*_'_=*{chr($b*$e)};*__=*{chr(1<<$e)};
_::_(r(e(k(c(a(H(__(l(r(e(P(__(r(e(h(t(o(n(a(__(t(us(J())))))))))))))))))))))))
-----------== 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: 22 Sep 1999 21:59:46 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Be careful about using constants
Message-Id: <7sbjgi$j8p$1@charm.magnus.acs.ohio-state.edu>
[A complimentary Cc of this posting was sent to Bart Lateur
<bart.lateur@skynet.be>],
who wrote in article <37ea7951.1113384@news.skynet.be>:
> Interesting approach. I think you're on to something. Maybe one should
> have AUTOLOADing in two parts: the prototype, and the definition. So
>
> sub F_SETFL ();
>
> compiled normally, and
>
> sub F_SETFL () {
> 4
> }
>
> autoloaded.
This is how things are supposed to be handled *now*.
> If the overhead of all the bare prototypes is still too high, your
> operator-like compile-time autoloading could serve for that, while the
> ordinary autoloading could serve to compile the actual call.
Yes, if the caller code of Foo has
foo bar, baz;
and foo() is prototypeless yet, then Foo::AUTOLOAD_PROTO('foo') is
called the moment C<foo> is seen. This allows for the lexer to
understand whether foo() takes one argument C<bar>, or eats all the
arguments C<bar, baz>.
This trades the overhead of declaring prototypes for all the stuff to
an extra subroutine call per each *used* function.
> A) constants should look like read-only variables, so that string
> interpolation works with them
You take one objective and pretend there are no others.
> B) the value lookup overhead should happen at compile time; not a
> function call every time you need the value.
This is already so for non-autoloaded functions.
Ilya
------------------------------
Date: 22 Sep 1999 20:19:36 GMT
From: mstevens@ashre.demon.co.uk (Michael Stevens)
Subject: Re: Case insensitive SQL query
Message-Id: <slrn7uieeo.kd.mstevens@swirl.internal.fict>
On Wed, 22 Sep 1999 15:55:33 GMT, c_j_marshall@hotmail.com <c_j_marshall@hotmail.com> wrote:
>Perhaps a more challenging method would be to take every inane off-topic
>question and drag it kicking and screaming into a perl solution.
>I was going to reply to this one by telling him to first pull the entire
>table into a hash keyed on the unique field and then loop through using
>m/joe/i to select his records.
Ooh! I like this idea ;)
------------------------------
Date: Wed, 22 Sep 1999 21:29:44 GMT
From: mrbog@my-deja.com
Subject: Re: Case insensitive SQL query
Message-Id: <7sbhnp$tnb$1@nnrp1.deja.com>
Fuck the "accepted" charter. This is the INTERNET. We as a people
decide our social standards, not some controlling higher body.
And yes, by the way- if I had a "general algorythym" question I
definately might post it to a perl programming group (or a java group
or a c group or a lisp group) Know why? Because is TANGENTIALLY RELATED.
In article <37E816FC.EEC725E9@mail.cor.epa.gov>,
David Cassell <cassell@mail.cor.epa.gov> wrote:
> mrbog@my-deja.com wrote:
> >
> > The connection here is that it's tangentially related to perl.
That's
> > the connection. A policy of just "perl only" is TOO RESTRICTIVE.
Ever
> > heard of that concept? "too restrictive"? It applies to your overly
> > strict perl-only theory.
>
> It's tangentially related to programming too. Maybe you should
> post it to comp.lang.misc and comp.algorithms just to make sure
> it gets out to the right places.
>
> Hasn't anyone explained to you that newsgroups are what their
> *creators* wanted, not what *you* would like them to be? Or do
> you also go to alt.food.dennys and insist that they discuss
> racism? [That's a reference, in case you wonder.] Go to
> news.newusers.questions and read the part about newsgroups
> and charters.
>
> David
> --
> David Cassell, OAO cassell@mail.cor.epa.gov
> Senior computing specialist
> mathematical statistician
>
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: 22 Sep 1999 20:47:26 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Checking for space
Message-Id: <7sbf8u$846$1@gellyfish.btinternet.com>
On Wed, 22 Sep 1999 11:41:19 -0400 Casey R. Tweten wrote:
> On Wed, 22 Sep 1999, kayec wrote:
>
> :I know there are functions for reading directories, coping files... and
> :other o/s type functions but what would be the best way to check the
> :available drive space??
>
> number_of_platters(PI(r^2))
>
> or, if using tape:
>
> L(W)
>
And for punch tape spliced and cut into a moebius strip ?
Of course you would only be able to save 3.5 bits on it - but hey !
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Wed, 22 Sep 1999 14:00:18 -0700
From: MORRISON DAVIS <MORRY.DAVIS@Sun.COM>
Subject: Compile problem
Message-Id: <37E94362.5B603BFE@Sun.COM>
Below is the error message, any ideas how to fix this? Solaris 2.6 cc
4.2
`sh cflags libperl.a perlio.o` perlio.c
CCCMD = cc -DPERL_CORE -c -O
"perlio.c", line 508: identifier redeclared: vprintf
current : function(pointer to char, pointer to char) returning
int
previous: function(pointer to const char, pointer to void)
returning int : "/usr/include/stdio.h", line 262
"perlio.c", line 515: identifier redeclared: vfprintf
current : function(pointer to struct {int _cnt, pointer to uchar
_ptr, pointer to uchar _base, uchar _flag, uchar _file}, pointer to c...
previous: function(pointer to struct {int _cnt, pointer to uchar
_ptr, pointer to uchar _base, uchar _flag, uchar _file}, pointer to c...
: "/usr/include/stdio.h", line 261
cc: acomp failed for perlio.c
*** Error code 2
make: Fatal error: Command failed for target `perlio.o'
--
Thanks Morry
e-mail address: morry.davis@Sun.COM
phone: 650 786-4792 fax 650 562-2143
------------------------------
Date: Wed, 22 Sep 1999 14:07:58 -0700
From: MORRISON DAVIS <MORRY.DAVIS@Sun.COM>
Subject: Compile problem
Message-Id: <37E9452E.511FCF0D@Sun.COM>
Below is the error message, any ideas how to fix this? Solaris 2.6 cc
4.2
`sh cflags libperl.a perlio.o` perlio.c
CCCMD = cc -DPERL_CORE -c -O
"perlio.c", line 508: identifier redeclared: vprintf
current : function(pointer to char, pointer to char) returning
int
previous: function(pointer to const char, pointer to void)
returning int : "/usr/include/stdio.h", line 262
"perlio.c", line 515: identifier redeclared: vfprintf
current : function(pointer to struct {int _cnt, pointer to uchar
_ptr, pointer to uchar _base, uchar _flag, uchar _file}, pointer to c...
previous: function(pointer to struct {int _cnt, pointer to uchar
_ptr, pointer to uchar _base, uchar _flag, uchar _file}, pointer to c...
: "/usr/include/stdio.h", line 261
cc: acomp failed for perlio.c
*** Error code 2
make: Fatal error: Command failed for target `perlio.o'
--
Thanks Morry
e-mail address: morry.davis@Sun.COM
phone: 650 786-4792 fax 650 562-2143
------------------------------
Date: Wed, 22 Sep 1999 14:01:29 -0700
From: MORRISON DAVIS <MORRY.DAVIS@Sun.COM>
Subject: Compile problem
Message-Id: <37E943A9.11B4D58C@Sun.COM>
Below is the error message, any ideas how to fix this? Solaris 2.6 cc
4.2
`sh cflags libperl.a perlio.o` perlio.c
CCCMD = cc -DPERL_CORE -c -O
"perlio.c", line 508: identifier redeclared: vprintf
current : function(pointer to char, pointer to char) returning
int
previous: function(pointer to const char, pointer to void)
returning int : "/usr/include/stdio.h", line 262
"perlio.c", line 515: identifier redeclared: vfprintf
current : function(pointer to struct {int _cnt, pointer to uchar
_ptr, pointer to uchar _base, uchar _flag, uchar _file}, pointer to c...
previous: function(pointer to struct {int _cnt, pointer to uchar
_ptr, pointer to uchar _base, uchar _flag, uchar _file}, pointer to c...
: "/usr/include/stdio.h", line 261
cc: acomp failed for perlio.c
*** Error code 2
make: Fatal error: Command failed for target `perlio.o'
--
Thanks Morry
e-mail address: morry.davis@Sun.COM
phone: 650 786-4792 fax 650 562-2143
------------------------------
Date: Wed, 22 Sep 1999 14:53:30 -0400
From: kpreid@ibm.net (Kevin Reid)
Subject: Re: CONTEST: Range Searching
Message-Id: <1dydrpz.aekm3dthae7uN@imac.loc>
Yitzchak Scott-Thoennes <sthoenna@efn.org> wrote:
> In article <1dy873h.1oek316ilsakgN@imac.loc>, kpreid@ibm.net (Kevin Reid)
> wrote:
> > for (my $i = 0; $i < $opt_A + @lindex; $i++) {
>
> Needs some work in this loop. If the pattern recurs within $opt_A
> lines, you won't catch it.
Uhh... in my tests, it handled it fine, showing the two matches in a
contiguous chunk. Try turning on -m.
> > }
> > @lindex = ();
> > $noncontiguous = 0;
> > } else {$noncontiguous = 1}
> > }
>
> Better clear @lindex here, or you might use positions from one file to
> seek in the next.
Oops.
--
Kevin Reid: | Macintosh:
"I'm me." | Think different.
------------------------------
Date: 22 Sep 1999 20:58:28 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Copying directories and subdirectories
Message-Id: <7sbftk$84c$1@gellyfish.btinternet.com>
On Wed, 22 Sep 1999 10:06:35 +0100 Brian wrote:
> First, I am working on Win Nt 4.0 (ugh) and need to copy a directory with
> all it's subdirectories and files to another location. I have tried using:
>
> system copy
> use File::Find
> use File::Copy
> readdir()
> and combinations of everything I can think of with no luck. Have I just not
> had enough coffee? I am hoping I just missed something simple.
>
Yep 'xcopy32' available in your <windows nt>/commands directory ...
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Wed, 22 Sep 1999 21:32:25 GMT
From: ming@tickets.com
Subject: executing sql statement using pool connections
Message-Id: <7sbht9$u12$1@nnrp1.deja.com>
I am running a perl script that execute some SQL statements/store
procedures on MS-SQL server 6.5. It looks like these store
procedures/sql statements is querying the database but once I hit
reload it's returns no results. That is, if I keep reloading the same
page, it will return some result sometimes and some times no results.
We are using a pool connection to the Database, which mean we have to
specify which database it's pointing to. I did specify ALL the
database, but still didn't fix the bug. Anybody have any idea what I
should check next?
Thank you much,
ming
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: 22 Sep 1999 21:13:49 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: help! trouble with a perl mail script
Message-Id: <7sbgqd$85n$1@gellyfish.btinternet.com>
On Wed, 22 Sep 1999 02:58:57 GMT topalli@my-deja.com wrote:
>
>
> I got this script from a post from Creede Lambard posted about a year and
> a half ago on this newsgroup. I beleive it is supposed to be an
> alternative to unix sendmail and seems to be compatible with macperl
>
<snip yet another script implementing SMTP>
I would read the section in perlfaq9:
How do I send mail?
Specifically this advises against using raw SMTP commands as your program
does.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Wed, 22 Sep 1999 16:13:32 -0400
From: Steve Miles <smiles@wfubmc.edu>
Subject: LWP and secure connections
Message-Id: <37E9386C.E5512D9E@wfubmc.edu>
Hi!
I know that LWP doesn't currently support 433 secure socket connections.
However, I've made a simple script that connects to a secure server,
sending it sensitive info - I placed this script on my server (a hosted
site) and ran it through my own secure server.
Am I right in saying that the information passed from my host to the
secure server was not encrypted? Even though the script ran fine on my
secure (https) server and connected to another secure one?
Thanks for any info. I know that there are other modules out there like
OpenSSL and SSLeay - but with my hosting accounts I don't have root
access to install these modules.
Thanks
Steve
--
=============================================
Steve Miles (smiles@wfubmc.edu)
----> http://www.groundbreak.com <----
Wake Forest University School of Medicine
5019 Hanes, Medical Center Blvd.
Winston-Salem, NC 27157
Phone: 336.716.0454 FAX: 336.716.7200
=============================================
------------------------------
Date: Wed, 22 Sep 1999 17:45:29 -0400
From: Elaine -HFB- Ashton <elaine@chaos.wustl.edu>
Subject: Re: LWP and secure connections
Message-Id: <37E94D56.5C1969EB@chaos.wustl.edu>
Steve Miles wrote:
> Am I right in saying that the information passed from my host to the
> secure server was not encrypted? Even though the script ran fine on my
> secure (https) server and connected to another secure one?
Yes.
> Thanks for any info. I know that there are other modules out there like
> OpenSSL and SSLeay - but with my hosting accounts I don't have root
> access to install these modules.
http://search.cpan.org/search?mode=module&query=SSLeay
You can install modules in your own directory and set the PERL5LIB env
variable or you could use a 'use lib "/dir/where/ssllibs/live"' pragma.
You could also ask your SA to install them. :)
e.
------------------------------
Date: Wed, 22 Sep 1999 15:13:57 -0600
From: Kevin Clancy <clancy@vr1.com>
Subject: MailHandler and CGI
Message-Id: <37E94695.DD27494D@vr1.com>
Dear All
I am updating a series of scripts that use MailHandler to access a
trouble ticket queue. The CGI script gets the REMOTE_USER information
and then tries to feed it into a MailHandler query
/usr/local/bin/pick --assigned-to $remote_user +trouble
Unfortunately, the script does not see the .mh_profile info in the users
home directories and then tries to run an initializing script that
croaks because it doesn't have permissions to create new
files/directories.
Has anyone ported MH to perl5? Any suggestions as to how to do this?
Thanks
kevin
------------------------------
Date: 22 Sep 1999 20:44:04 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: memory use of children
Message-Id: <7sbf2k$843$1@gellyfish.btinternet.com>
On Wed, 22 Sep 1999 14:09:31 -0400 Elaine -HFB- Ashton wrote:
> Bill Moseley wrote:
>> Oh, but he's forking from a CGI script. What happens when you kill all
>> the 'nobody' processes. Finally! Some good response time from that
>> server.
>
> *snicker*
>
> sync;sync;reboot ;)
>
> fork not quietly
> into that gentle good night
> spawn die all too soon
>
Well I figure about five minutes of :
perl -e 'fork while(1)'
Would probably require the switch to resolve on this machine ...
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Wed, 22 Sep 1999 17:52:57 -0400
From: Tom Kralidis <tom.kralidis@ccrs.nrcanDOTgc.ca>
Subject: month/day algorithm
Message-Id: <37E94FB9.DD55E132@ccrs.nrcanDOTgc.ca>
Does anyone know of a way to compute the month / day from a value which
gives the year and day number?
eg. 1992 day 236
..any ideas on the web. etc would be much appreciated.
..Tom
-----------------------------------------------------------------------------------------
Tom Kralidis Geo-Spatial Technologist
Canada Centre for Remote Sensing Tel: (613) 947-1828
588 Booth Street , Room 241 Fax: (613) 947-1408
Ottawa , Ontario K1A 0Y7 http://www.ccrs.nrcan.gc.ca
-----------------------------------------------------------------------------------------
------------------------------
Date: 22 Sep 1999 20:50:25 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Need a simple script
Message-Id: <7sbfeh$849$1@gellyfish.btinternet.com>
On Wed, 22 Sep 1999 11:17:41 -0700 David Cassell wrote:
>
> Do not use one of Matt Wright's scripts and then come back
> here because you couldn't get it to work for you, because
> people will make fun of you and the script.
>
Spoil our fun would you.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 22 Sep 1999 20:40:16 GMT
From: mstevens@ashre.demon.co.uk (Michael Stevens)
Subject: Re: Newbie question
Message-Id: <slrn7uiflg.kd.mstevens@swirl.internal.fict>
On Wed, 22 Sep 1999 11:42:30 -0400, Perry King <pking@mailpost.k-link.com> wrote:
>Hi all,
>I am completely new to Perl. I am looking for an easy way to connect to a
>web server using an HTTP GET or POST and capture the results coming back for
>subsequent text processing.
>I'm sure this must be a pretty common thing, and is somewhere on CPAN, but
>I've spent a couple of hours poking around including looking at some FAQs
>and nothing stands out. Everthing I've seen seems to be directed at
>writting PERL cgi scripts where as I want to basically simulate what a web
>browser would do.
>Can anyone point me more narrowly to the right place in the archives or
>FAQs?
Use the lwp modules available from CPAN. I believe they're in the
libwww bundle of modules.
------------------------------
Date: 22 Sep 1999 19:51:12 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: perl Ad
Message-Id: <7sbbvg$58o$1@gellyfish.btinternet.com>
On Wed, 22 Sep 1999 00:03:01 One Bored Guru wrote:
> Attention Perl-5/Linux Programmers.
<snip - you've seen it before>
OK he's been told before - the abuse address on the post is bogus
so this is the whois record for sync3.com :
Registrant:
The Sync3 Project (SYNC8-DOM)
P. O. Box 36
Jacksonville, AR 72076-3368
US
Domain Name: SYNC3.COM
Administrative Contact, Technical Contact, Zone Contact:
Byers, Steven M (SMB106) admin501@GTE.NET
(501) 960-5612
Billing Contact:
Byers, Steven M (SMB106) admin501@GTE.NET
(501) 960-5612
Record last updated on 08-Aug-99.
Record created on 08-Aug-99.
Database last updated on 21-Sep-99 14:40:22 EDT.
Domain servers in listed order:
DNS1.LIONSERV.NET 209.136.13.113
DNS2.LIONSERV.NET 209.136.13.114
DNS3.LIONSERV.NET 209.136.13.115
do with that information what you will ...
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 22 Sep 1999 21:50:30 GMT
From: petolino@joe.Eng.Sun.COM (Joe Petolino)
Subject: Re: printf mask?
Message-Id: <7sbiv6$f99$1@engnews2.Eng.Sun.COM>
>> >This is probably a simple question, but it has me stumped. I need to
>> >convert a hex string to binary and write the resulting binary string to
>> >an output file. Can I do it with printf, is there an appropriate mask?
>The best I can come up with is this, which looks slow and ugly.
>
> print unpack 'B*' => pack 'C*' =>
> map hex, '464646204646460a' =~ /(..)/g;
>
>This uses the same approach, but is somewhat slower:
>
> print map unpack('B*' => chr hex) => '464646204646460a' =~ /(..)/g;
>
>Output is:
>
> 0100011001000110010001100010000001000110010001100100011000001010
>
>Any better thoughts?
Here's a more straightforward solution (it's your call as to whether it's
any better):
$hexstring = '464646204646460a';
%hexbits = (
'0' => '0000',
'1' => '0001',
'2' => '0010',
'3' => '0011',
'4' => '0100',
'5' => '0101',
'6' => '0110',
'7' => '0111',
'8' => '1000',
'9' => '1001',
'a' => '1010',
'b' => '1011',
'c' => '1100',
'd' => '1101',
'e' => '1110',
'f' => '1111',
);
print map($hexbits{$_}, split(//, lc($hexstring) ));
-Joe
------------------------------
Date: 22 Sep 1999 21:19:22 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Problem doing authentication with Apache::DBI
Message-Id: <7sbh4q$85r$1@gellyfish.btinternet.com>
In comp.lang.perl.misc Craig Vincent <2bunnyhop@home.com> wrote:
> '/us
> r/local/lib/perl5/site_perl/5.005/i386-bsdos/auto/DBD/mysql/mysql.so' for
> module
> DBD::mysql: File not found at
>
If this is the actual message then somewhere you have made a typo because
that mysql should be capitalized - I havent got it on this machine so I
cant tell exactly how it is capitalized though ... I would favour MySQL
but that is a guess.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 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.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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.
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 879
*************************************
