[10816] in Perl-Users-Digest
Perl-Users Digest, Issue: 4417 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Dec 14 05:07:25 1998
Date: Mon, 14 Dec 98 02:00:17 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Mon, 14 Dec 1998 Volume: 8 Number: 4417
Today's topics:
Re: ($e_mail !~ /\w+[-\w]*\@\w+[-\w]*\.\w+/) (John Moreno)
Re: ($e_mail !~ /\w+[-\w]*\@\w+[-\w]*\.\w+/) (Emmett McLean)
Re: ($e_mail !~ /\w+[-\w]*\@\w+[-\w]*\.\w+/) (Sam Holden)
Re: ($e_mail !~ /\w+[-\w]*\@\w+[-\w]*\.\w+/) <ajohnson@gatewest.net>
Re: *** FAQ: ANSWERS TO YOUR QUESTIONS! READ FIRST! Pos (Martien Verbruggen)
ARGV <darrensweeney@eswap.co.uk>
Re: ARGV <uri@sysarch.com>
Re: ARGV (Bart Lateur)
Re: ASP and PerlScript <erlangen72@hotmail.com>
Re: ASP and PerlScript <matt@teamamiga.org_NOSPAM>
Calling API's <gernot@cat.at>
Re: CGI Redirection (Adam Levy)
Re: CGI.pm vs. old way I'm used to? (Martin Vorlaender)
how can script get file http://... <globus@infonet.ee>
Re: how can script get file http://... <ebohlman@netcom.com>
non-blocking socket connect question (Adam Levy)
Re: OLE referencing problem: PerlScript, ASP and CDONTS <matt@teamamiga.org_NOSPAM>
Programming Prob <momiji@slip.net>
Re: redirection after headers sent in CGI file <WeAreUs@Ibm.net>
Re: Saving Multidimentional Hash's? <ebohlman@netcom.com>
Re: SCO Unix (Danny Aldham)
Re: Writing Perl with Notepad dave@mag-sol.com
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 14 Dec 1998 01:23:21 -0500
From: phenix@interpath.com (John Moreno)
Subject: Re: ($e_mail !~ /\w+[-\w]*\@\w+[-\w]*\.\w+/)
Message-Id: <1dk04dy.w9v40l1wxixorN@roxboro0-002.dyn.interpath.net>
Randal Schwartz <merlyn@stonehenge.com> wrote:
> Emmett> So if you're an advanced user and you've seen the question in the FAQ
> Emmett> and you don't want to respond, don't. Just skip it. Leave the
> Emmett> question for other, perhaps new, newsgroup participants.
>
> No, I'm correcting a mis-answer also in this thread. I hate this FAQ
> because it gets answered WRONG frequently as well. Mostly from other
> well-meaning but underinformed posters.
Not that I disagree with the general thrust of what you are saying, but
if you are referring to Matthew Bafford's post he /does/ say "Where
valid is your definition of valid" which while not strong enough does
imply that his definition of "valid" doesn't match up with a what is
"valid" according to the mail specs.
--
John Moreno
------------------------------
Date: 14 Dec 1998 00:02:53 -0800
From: emclean@slip.net (Emmett McLean)
Subject: Re: ($e_mail !~ /\w+[-\w]*\@\w+[-\w]*\.\w+/)
Message-Id: <752gnd$shi@slip.net>
Randal asked ?
>In what way did "read the FAQ" disparage you?
Then continued ...
> It was accurate and to
>the point.
Then this statement :
>>> Please stop swimming upstream... you missed the spawning season. :)
The latter statment is clearly meant to be disparaging. A chartible
reading would be the comment doesn't make sense and an unchartible reading
might be something like advice Clinton could have used two years ago.
My guess is that you are leaning toward the second interpretation.
Hardly a comment which might be described as accurate.
>Emmett> Just a comment. Aside from the fact that no one has bothered
>Emmett> to post the FAQ in a long time.
>
>The FAQ doesn't get posted because it is INCLUDED with your copy of
>Perl.
Not mine.
> And a mini-FAQ gets posted here every few days that says that.
You're grasping, I searched the most recent listing of 500 messages and didn't
find a match on FAQ.
>And a copy of *that* gets sent to you after your first post to this
>group (remember that mail you got?).
Huh? How could I remember a mail message I never recieved?
And another mini-FAQ gets posted
>every few days to comp.lang.perl.announce as well. Do we need to
>attach this info to EVERY post? <sigh>
Absolutely not. If you are not inclined to answer you can pass.
>
Yes, I attached an exasparated comment to the end because
>I've seen this mis-question and mis-answer all too often here.
Since you see it so often, perhaps you'd be better off if you
took a break form the newsgroup instead of ignoring the reality
of new user's questions and posts. Accepting reality
instead of fighting it will leave you with more energy and the tone
of your posts won't be so arrogant and grumpy as to need twenty smileys.
But as
>you can see above, at least I put a smiley face on it.
That's a laugh. Big deal.
>Emmett> grumble on literate posts, and then post small tid bits
>Emmett> of information. Simple questions allow users at all levels to
>Emmett> contribute, not just the people who've been programming Perl
>Emmett> their entire careers.
>
>I encourage new users,
In your imagination you're encouraging new users, but not in reality.
How does being arrogant, grumpy and picky encourage new users?
but I also expect new users to QUICKLY
>understand that there are FAQs and Dejanews available for first-line
>research before posting worn-out questions word-for-word and wasting
>*all* our time with it.
Just because someone asks a question doesn't mean they haven't
come up to speed quickly.
I doubt dejanews has a post specifically about using a minus sign
with square brakets. However, the question fits into the catagory that any
well versed Perl programmer would know the answer. Hence the post.
>Emmett> In my case I researched the question for over a half hour with
>Emmett> Wall's text and didn't come up with an answer.
>
>Yes, I am intimately familiar with that text, and I can assure you
>that the answer is not there. :)
>
Hum, first you complain I didn't read the FAQ then you agree that the
answer is not there.
>Emmett> A half hour is about
>Emmett> as much as most people spend researching a question which has
>Emmett> a very simple answer.
>
>Precisely. But five minutes with Dejanews would have found your
>answer in six minutes. So why did you waste 24 other minutes?
>Seriously.
>
My read on it is that, to you, the *seriously* part has more
to do with flaming and much less to do with talking about Perl.
>Emmett> So if you're an advanced user and you've seen the question in the FAQ
>Emmett> and you don't want to respond, don't. Just skip it. Leave the
>Emmett> question for other, perhaps new, newsgroup participants.
>
>No, I'm correcting a mis-answer also in this thread. I hate this FAQ
>because it gets answered WRONG frequently as well. Mostly from other
>well-meaning but underinformed posters.
>
I supposed the Perl FAQ says that you've been appointed you the
Perl king of c.l.p.m.
I newsgroup is enhanced when it gets well-meaning but underinformed posts.
>Emmett> While I appreciate the help offered in answers to my questions
>Emmett> I think some of the people in this group should lighten up. Either
>Emmett> that or some day we'll be programming in Visual Basic.
>
>In fact, I find these days that most of the time, I'm merely
>correcting or augmenting the mis-1answers of others, and I still find
>it necessary to do that about three to five times a day. If you'd
>actually like me to go away, I can do that (maybe :), but then you'll
>be left with not just NO information, but INCORRECT information.
Yes, go away.
That would be best. I'd appreciate answers and helpful suggestions
but don't look forward arrogance, grumpy posts and disparaging comments.
You are certainly kidding yourself if you think you are the *only*
person having correct information about Perl. That is a laugh.
>Do you really want that? I don't think so.
Absolutely. If it is difficult for you to tolerate the posts of new users
you should pass. We're here to talk about Perl, and if some
career Perl programmer is offended because after a half hour of research
I didn't review my non existent perl documentation, and I didn't do a useless
query on dejanews then what's the big deal? If you aren't posting to help
Perl users, and you're just the FAQ cop, then just don't post.
I've noted this isn't the only thread where new users have been discouraged
from posting and disparaged.
Emmett
------------------------------
Date: 14 Dec 1998 08:43:49 GMT
From: sholden@pgrad.cs.usyd.edu.au (Sam Holden)
Subject: Re: ($e_mail !~ /\w+[-\w]*\@\w+[-\w]*\.\w+/)
Message-Id: <slrn779ju4.anm.sholden@pgrad.cs.usyd.edu.au>
On 14 Dec 1998 00:02:53 -0800, Emmett McLean <emclean@slip.net> wrote:
>Randal asked ?
>
>>In what way did "read the FAQ" disparage you?
>
>Then continued ...
>
>> It was accurate and to
>>the point.
>
>Then this statement :
>
>>>> Please stop swimming upstream... you missed the spawning season. :)
>
>The latter statment is clearly meant to be disparaging. A chartible
>reading would be the comment doesn't make sense and an unchartible reading
>might be something like advice Clinton could have used two years ago.
>My guess is that you are leaning toward the second interpretation.
>Hardly a comment which might be described as accurate.
I would read it as "you are trying to do something the wrong way, best to
give up and try another tact"...
>
>>Emmett> Just a comment. Aside from the fact that no one has bothered
>>Emmett> to post the FAQ in a long time.
>>
>>The FAQ doesn't get posted because it is INCLUDED with your copy of
>>Perl.
>
>Not mine.
Then your copy of perl is broken and you best get it fixed since who knows what
else won't work properly. It is probably in violation of the license as well,
since it qualifies as a modified version and thus should have a reference
pointing you to the original documented version (I think anyway).
I actually doubt you don't have documentation, and even so a quick visit to
www.perl.com (a pretty obvious place to try) would have found you some.
>
>> And a mini-FAQ gets posted here every few days that says that.
>
>You're grasping, I searched the most recent listing of 500 messages and didn't
>find a match on FAQ.
He said every few days... 500 messages is not a few days on this newsgroup...
I did a two second dejanews search on FAQ in clpm and the first thing returned
was :
*** FAQ: ANSWERS TO YOUR QUESTIONS! READ FIRST! Posted Twice Weekly ***
So it most definantly does get posted often and it most definantly does have
a noticable subject with that magic word FAQ in it.
>
>>And a copy of *that* gets sent to you after your first post to this
>>group (remember that mail you got?).
>
>Huh? How could I remember a mail message I never recieved?
Which is very strange... you sure you didn't filter it out or something?
>
> And another mini-FAQ gets posted
>>every few days to comp.lang.perl.announce as well. Do we need to
>>attach this info to EVERY post? <sigh>
>
>Absolutely not. If you are not inclined to answer you can pass.
>
>>
> Yes, I attached an exasparated comment to the end because
>>I've seen this mis-question and mis-answer all too often here.
>
>Since you see it so often, perhaps you'd be better off if you
>took a break form the newsgroup instead of ignoring the reality
>of new user's questions and posts. Accepting reality
>instead of fighting it will leave you with more energy and the tone
>of your posts won't be so arrogant and grumpy as to need twenty smileys.
Can you comprehend that the question was a FAQ, and that Randal was correcting
a factual error...
>
>But as
>>you can see above, at least I put a smiley face on it.
>
>That's a laugh. Big deal.
>
>>Emmett> grumble on literate posts, and then post small tid bits
>>Emmett> of information. Simple questions allow users at all levels to
>>Emmett> contribute, not just the people who've been programming Perl
>>Emmett> their entire careers.
>>
>>I encourage new users,
>
>In your imagination you're encouraging new users, but not in reality.
>How does being arrogant, grumpy and picky encourage new users?
>
> but I also expect new users to QUICKLY
>>understand that there are FAQs and Dejanews available for first-line
>>research before posting worn-out questions word-for-word and wasting
>>*all* our time with it.
>
>Just because someone asks a question doesn't mean they haven't
>come up to speed quickly.
But asking a FAQ would indicate it.
>
>I doubt dejanews has a post specifically about using a minus sign
>with square brakets. However, the question fits into the catagory that any
>well versed Perl programmer would know the answer. Hence the post.
It may I haven't checked and have no inclination to. But the documentation
that comes with perl gives us the answer and it is surely the place
everyone (bar you) would look :
If you want "-" itself to be a member of a
class, put it at the start or end of the list, or escape
it with a backslash. -- perlre
>
>>Emmett> In my case I researched the question for over a half hour with
>>Emmett> Wall's text and didn't come up with an answer.
>>
>>Yes, I am intimately familiar with that text, and I can assure you
>>that the answer is not there. :)
>>
>
>Hum, first you complain I didn't read the FAQ then you agree that the
>answer is not there.
The book is not the FAQ. The book is not the FAQ. The book is not the FAQ.
Can you see the difference...
>
>>Emmett> A half hour is about
>>Emmett> as much as most people spend researching a question which has
>>Emmett> a very simple answer.
>>
>>Precisely. But five minutes with Dejanews would have found your
>>answer in six minutes. So why did you waste 24 other minutes?
>>Seriously.
>>
>
> My read on it is that, to you, the *seriously* part has more
> to do with flaming and much less to do with talking about Perl.
You could try answering the question as well... Why did you spend 30
minutes when 6 minutes would have found your answer?
>
>>Emmett> So if you're an advanced user and you've seen the question in the FAQ
>>Emmett> and you don't want to respond, don't. Just skip it. Leave the
>>Emmett> question for other, perhaps new, newsgroup participants.
>>
>>No, I'm correcting a mis-answer also in this thread. I hate this FAQ
>>because it gets answered WRONG frequently as well. Mostly from other
>>well-meaning but underinformed posters.
>>
>
> I supposed the Perl FAQ says that you've been appointed you the
> Perl king of c.l.p.m.
>
> I newsgroup is enhanced when it gets well-meaning but underinformed posts.
Posts which are technically incorrect do no benefit to anyone. If you think
they do then follow the advice of the next person that uses the year field in
localtime as if it returns <year>%100 and see how far you get.
Factual errors result in buggy programs, which someday have to be fixed
probably by someone else who has far better things to do.
>>Emmett> While I appreciate the help offered in answers to my questions
>>Emmett> I think some of the people in this group should lighten up. Either
>>Emmett> that or some day we'll be programming in Visual Basic.
>>
>>In fact, I find these days that most of the time, I'm merely
>>correcting or augmenting the mis-1answers of others, and I still find
>>it necessary to do that about three to five times a day. If you'd
>>actually like me to go away, I can do that (maybe :), but then you'll
>>be left with not just NO information, but INCORRECT information.
>
> Yes, go away.
Better burn that perl book since you don't seem to want any input from
Randal.
>
> That would be best. I'd appreciate answers and helpful suggestions
> but don't look forward arrogance, grumpy posts and disparaging comments.
>
> You are certainly kidding yourself if you think you are the *only*
> person having correct information about Perl. That is a laugh.
You can easily have what you want just kill file those people who
correct other people's answers that would be : Randal Schwartz, Tom
Christianson, Larry Wall, Larry Rosler, Abigail, and a few others who
I'm sure you will find (sorry about the spelling of people's names).
Of course you will also have removed the most knowledgable people from
the articles you read but that seems to be what you want. If you want
incorrect answers then don't read posts from people who give correct
answers, because they actually know what they are talking about, and
have seen the damage technical errors do.
>
>>Do you really want that? I don't think so.
>
> Absolutely. If it is difficult for you to tolerate the posts of new users
> you should pass. We're here to talk about Perl, and if some
> career Perl programmer is offended because after a half hour of research
> I didn't review my non existent perl documentation, and I didn't do a useless
> query on dejanews then what's the big deal? If you aren't posting to help
> Perl users, and you're just the FAQ cop, then just don't post.
That 'useless' query would have got you your answer. You do have strange
definition of useless...
There's this concept on newsgroups that you read the FAQ, and don't post
questions that are answered in it. This is not a clpm thing, but a news thing.
Answering FAQs wastes the time of people, reading FAQs wastes poeple's time,
correcting errors in the answers to FAQs wastes a large amount of people's
time.
>
> I've noted this isn't the only thread where new users have been discouraged
> from posting and disparaged.
If you post a FAQ then you will be told that what you did was wrong. Most
people learn from the experience and check the FAQ before they post their
next question. I think this is known as learning.
--
Sam
compiling kernels is what I do most, so they do tend to stick to the
cache ;) --Linus Torvalds
------------------------------
Date: Mon, 14 Dec 1998 04:03:36 -0600
From: Andrew Johnson <ajohnson@gatewest.net>
Subject: Re: ($e_mail !~ /\w+[-\w]*\@\w+[-\w]*\.\w+/)
Message-Id: <3674E278.3CF7CDAD@gatewest.net>
Emmett McLean wrote:
!
! Randal asked ?
!
! >In what way did "read the FAQ" disparage you?
!
! Then continued ...
!
! > It was accurate and to
! >the point.
!
! Then this statement :
!
! >>> Please stop swimming upstream... you missed the spawning season. :)
!
! The latter statment is clearly meant to be disparaging. A chartible
! reading would be the comment doesn't make sense and an unchartible
! reading might be something like advice Clinton could have used two
! years ago. My guess is that you are leaning toward the second
! interpretation. Hardly a comment which might be described as
! accurate.
Please Emmett, consider the possibility that you may have a
misunderstanding of what has taken place---I think very few people
would take Randal's comment as disparaging or a flame. I would
translate this to simply:
you're headed in the wrong direction... you missed the good stuff
the 'good stuff' being the included documentation, including the
FAQ's ... depending on your installation of perl, the docs should
be available as manpages 'man perlfaq9', or using the included
perldoc utility 'perldoc perlfaq9', or possibly installed as html
pages somewhere on your system.
Randal has accused you of:
swimming upstream, missing the spawning season
He also told you where you could find a more detailed answer
to your question.
You have accused him of:
being arrogant, being grumpy, being picky, being a FAQ cop,
ignoring reality, not encouraging new users, flaming ...
You have also told him to 'go away'.
Again, I ask that you at least entertain the possibility that you
have (mis)interpreted his post in a manner that was not intended and
that you have, as a result of feeling personally insulted, engaged in
an unwarranted personal attack that serves only to exemplify the very
behaviour your seem to be so upset about.
regards
andrew
------------------------------
Date: Mon, 14 Dec 1998 04:52:36 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: *** FAQ: ANSWERS TO YOUR QUESTIONS! READ FIRST! Posted Twice Weekly ***
Message-Id: <oQ0d2.111$SU4.334@nsw.nnrp.telstra.net>
In article <perl-resource-list-1-913604402@frii.com>,
gnat@frii.com writes:
> 1. Perl development has taken two courses: 5.004_05 is the latest
> stable version, while 5.005_02 is the latest experimental version.
> You can download them from
> http://www.perl.com/CPAN/src/
> (look in ftp://ftp.perl.com/perl/ for a list of FTP-based mirrors)
The few CPAN mirrors I just tried mention that 5.005_02 is the latest,
and the stable release. 5.004_05 doesn't even get a mention, and is
not available in the src/5.0 directory.
Are the mirrors out of date, or is this document?
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | Very funny Scotty, now beam down my
Commercial Dynamics Pty. Ltd. | clothes.
NSW, Australia |
------------------------------
Date: Sun, 13 Dec 1998 21:08:38 -0800
From: "E-swap" <darrensweeney@eswap.co.uk>
Subject: ARGV
Message-Id: <7526h8$5g6@dfw-ixnews5.ix.netcom.com>
Hi
Is there a limit to the length of a argument vector?
e.g. http://www.***.com/cgi-bin/cgi.cgi?hjlkjhkljhlkhl&ljhjhljh&lkjhlkhlh
Thanks
Darren
------------------------------
Date: 14 Dec 1998 00:13:29 -0500
From: Uri Guttman <uri@sysarch.com>
Subject: Re: ARGV
Message-Id: <x7iuffs3uu.fsf@sysarch.com>
>>>>> "E" == E-swap <darrensweeney@eswap.co.uk> writes:
E> Is there a limit to the length of a argument vector?
E> e.g. http://www.***.com/cgi-bin/cgi.cgi?hjlkjhkljhlkhl&ljhjhljh&lkjhlkhlh
that is not an ARGV argument (and has nothing to do with perl), but a
cgi query. ask the question in a cgi group (comp.infosystems.www.*)
and study up on the CGI.
hth,
uri
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
Perl Hacker for Hire ---------------------- Perl, Internet, UNIX Consulting
uri@sysarch.com ------------------------------------ http://www.sysarch.com
The Best Search Engine on the Net ------------- http://www.northernlight.com
------------------------------
Date: Mon, 14 Dec 1998 08:17:12 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: ARGV
Message-Id: <3676c919.3025488@news.skynet.be>
Uri Guttman wrote:
> E> Is there a limit to the length of a argument vector?
>
> E> e.g. http://www.***.com/cgi-bin/cgi.cgi?hjlkjhkljhlkhl&ljhjhljh&lkjhlkhlh
>
>that is not an ARGV argument (and has nothing to do with perl), but a
>cgi query.
You'd be amazed.
Just try this CGI script:
#!/usr/local/bin/perl
print "Content-type: text/plain\n\n";
$" = '|';
print "Data line: @ARGV\n";
I ran this with
htpp://.../test.cgi?Be+prepared+to+be+amazed!
And this is what I got:
Data line: Be|prepared|to|be|amazed!
> ask the question in a cgi group (comp.infosystems.www.*)
>and study up on the CGI.
Yup. That's right.
Bart.
------------------------------
Date: Sun, 13 Dec 1998 22:38:23 -0800
From: "ErLanGen" <erlangen72@hotmail.com>
Subject: Re: ASP and PerlScript
Message-Id: <752bt9$kc4$2@ash.prod.itd.earthlink.net>
Ok,
I'm answering my own post. After some searching
and experimenting, I got this to work:
==============snip===================
REGEDIT4
[HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\W3SVC\ASP]
[HKEY_LOCAL_MACHINE\System\CurrentControlSet\_
Services\W3SVC\ASP\LanguageEngines]
[HKEY_LOCAL_MACHINE\System\CurrentControlSet\_
Services\W3SVC\ASP\LanguageEngines\PerlScript]
"Write"="$Response->write(|);"
"WriteBlock"="$Response->writeblock(|);"
====================snip=====================
Now all the ASP samples work perfectly. I installed PWS4 after
I got Perl 5.00502.
HTH someone, Mark
ErLanGen wrote in message <74vvtc$ss8$1@ash.prod.itd.earthlink.net>...
>Hello,
> The Win32, Build 502, Doc files have some ASP samples that
>are in PerlScript. I read my html Perl Docs using the PWS (4.0). It
>seems that PWS expects ASP to be in VBScript and I do have the
>VBScript engine. Thus I get VBscript errors when I try to run these
>pages. My question is:
> What can I do to default the script engine to PerlScript. I have seen
>these changes recommended on Matt's page at
>http://www.fastnetltd.ndirect.co.uk/Perl/asp.pm
>...Change the following :
>
> HKEY_LOCAL_MACHINE\
> SYSTEM\
> CurrentControlSet\
> Services\
> W3SVC\
> ASP\
> LanguageEngines\
> PerlScript
>============
> However, Im using Win95 and I dont see the
>"LanguageEngine" key. Can I just add this key?
>=============
> I need help with this to make ASP pages using
>Perl 5.00502. Thanks in advance, Mark ICQ22542142
>mpryorREM@OVEsprintmail.com
>http://wwp.mirabilis.com/22542142
>
>
>
------------------------------
Date: Mon, 14 Dec 1998 09:10:47 +0000
From: Matt Sergeant <matt@teamamiga.org_NOSPAM>
Subject: Re: ASP and PerlScript
Message-Id: <3674D617.27DD9757@teamamiga.org_NOSPAM>
ErLanGen wrote:
>
> Hello,
> The Win32, Build 502, Doc files have some ASP samples that
> are in PerlScript. I read my html Perl Docs using the PWS (4.0). It
> seems that PWS expects ASP to be in VBScript and I do have the
> VBScript engine. Thus I get VBscript errors when I try to run these
> pages. My question is:
> What can I do to default the script engine to PerlScript. I have seen
> these changes recommended on Matt's page at
> http://www.fastnetltd.ndirect.co.uk/Perl/asp.pm
> ...Change the following :
This is set using Microsoft Management Console. Although I'm not sure if
that comes with personal web server. Other than that I can't help you -
I've never used Win95 (thankfully).
--
<Matt email="matt@teamamiga.org" />
| Fastnet Software Ltd | Perl in Active Server Pages |
| Perl Consultancy, Web Development | Database Design | XML |
| http://come.to/fastnet | Information Consolidation |
------------------------------
Date: Mon, 14 Dec 1998 10:43:33 +0100
From: Gernot Homma <gernot@cat.at>
Subject: Calling API's
Message-Id: <3674DDC5.E3BD0974@cat.at>
This is a multi-part message in MIME format.
--------------132A6C91A885D8976805AFCD
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
HI there
please don't kill me but i have some platform-specific question.
1. is there a possibility to start a perl-program as a service in WinNT
2. Is it possible to access api's or procedures in DLL's in Perl on the
WinNT-Platform.
Thanks
Gernot
PS:
If you know a better group to place my questions, please tell me.
--------------132A6C91A885D8976805AFCD
Content-Type: text/x-vcard; charset=us-ascii;
name="gernot.vcf"
Content-Transfer-Encoding: 7bit
Content-Description: Card for Gernot Homma
Content-Disposition: attachment;
filename="gernot.vcf"
begin:vcard
n:Homma;Gernot
x-mozilla-html:FALSE
org:Cyber-Atelier
adr:;;;Vienna ;;1210;Austria
version:2.1
email;internet:gernot@cat.at
tel;fax:+43 1 272 92 51 9
tel;work:+43 1 272 92 51
x-mozilla-cpt:;0
fn:Homma, Gernot
end:vcard
--------------132A6C91A885D8976805AFCD--
------------------------------
Date: Mon, 14 Dec 1998 00:06:51 -0600
From: adrade@wwa.com (Adam Levy)
Subject: Re: CGI Redirection
Message-Id: <adrade-1412980006510001@pool1-030.wwa.com>
In article <comdog-ya02408000R0712981744550001@news.panix.com>,
comdog@computerdog.com (brian d foy) wrote:
> In article <74cduh$4a4$1@nnrp1.dejanews.com>, fairbairn_97@yahoo.com posted:
>
> > I was enquiring whether any body knows where I can get a CGI script that
> > redirects URLs to another place automatically... I was planning on doing
> > something like ML.ORG where they redirect TEST.HOME.ML.ORG to
> > www.mydomain.com/test/test/test/go.html
>
> > He who gives me the correct answer will be placed on the front page of
my web
> > site.......
>
> how would you recognize a correct answer? if you want to do this,
> forget about Perl or CGI and configure the server to do it automatically.
> that is, unless you want to use a Perl trans handler or the like.
>
> there are about 15 different ways to do this, and those are only
> the ones i know off the top of my head. still, i don't want to be
> on your webpage ;)
Two good ways:
1. With Perl:
------------
#!/usr/local/bin/perl
$newpage = "http://www.perl.org/";
print "$newpage\n\n";
1;
------------
2. With the server:
If you're using Apache or HTTPD, create a file called ".htaccess" in a
directory served by web pages. On one of the lines, put the following:
Redirect /path/to/test http://www.my-new-site.com/test
"/path/to/test" - the full path to the diretory you want to redirect
"http://www.my-new-site.com/test" - the destination of the redirect
This will then redirect http://site-now.com/path/to/test/ to
http://www.my-new-site.com/test/ and every file inside the directory to
the respective place, so http://site-now.com/path/to/test/blah.html would
be redirected to http://www.my-new-site.com/test/blah.html and so on.
You could, of course, come by this same effect with a perl script using
PATH_INFO, but this would be stupid.
------------------------------
Date: Mon, 14 Dec 1998 05:46:11 +0100
From: martin@RADIOGAGA.HARZ.DE (Martin Vorlaender)
Subject: Re: CGI.pm vs. old way I'm used to?
Message-Id: <36749813.524144494f47414741@radiogaga.harz.de>
Dave Stephens (stepherd@gusun.georgetown.edu) wrote:
: I've been coding perl cgi using the following subroutine to parse form
: contents for years:
:
: sub parse_form {
: read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
So you only use POST forms?
[...]
: $in{$name} = $value;
So you have no <SELECT MULTIPLE> in your forms?
: BUT, I see everyone referring to CGI.PM as the greatest thing ever. So
: I'm wondering, what am I missing? Anyone give me some pointers on why
: this module is superior to the way I've doing it?
I doubt the above restrictions are documented in any of your CGI scripts.
Always imagine unwary web designers using Frontpage when coding ;-)
CGI.pm works correctly for both of the cases mentioned.
cu,
Martin
--
| Martin Vorlaender | VMS & WNT programmer
VMS is today what | work: mv@pdv-systeme.de
Microsoft wants | http://www.pdv-systeme.de/users/martinv/
Windows NT 8.0 to be! | home: martin@radiogaga.harz.de
------------------------------
Date: Mon, 14 Dec 1998 08:21:53 +0200
From: Gleb Ekker <globus@infonet.ee>
Subject: how can script get file http://...
Message-Id: <3674AE81.EAA03A3D@infonet.ee>
Hi all
Is it possible to get some file (http://www.somehost.com/file.html) from
another server without using CPAM library?
Thanks.
Gleb.
------------------------------
Date: Mon, 14 Dec 1998 08:13:47 GMT
From: Eric Bohlman <ebohlman@netcom.com>
Subject: Re: how can script get file http://...
Message-Id: <ebohlmanF3y46z.2A9@netcom.com>
Gleb Ekker <globus@infonet.ee> wrote:
: Is it possible to get some file (http://www.somehost.com/file.html) from
: another server without using CPAM library?
Yes, but it would involve quite tediously re-inventing the wheel. Why do
you want to do it? If the answer is something like "I don't have
permission to modify my server's Perl directories," then you should take
a look at the FAQ, which at some point (I forget the exact location, but
you can easily look it up yourself) tells you how to install modules in
your local directories.
------------------------------
Date: Sun, 13 Dec 1998 22:39:01 -0600
From: adrade@wwa.com (Adam Levy)
Subject: non-blocking socket connect question
Message-Id: <adrade-1312982239010001@pool1-030.wwa.com>
I just started playing with sockets, so excuse my ignorance. What I'm
looking to do is, in a script, connect to two servers, send some data to
the servers as they accept, and then keep checking to see if any input has
come in from either.
I assume I'm looking to make these non-blocking because I don't want one
connect to not allow me to make the other, but don't quite know how.
1. How do I make the socket non-blocking?
2. How do I then know when the connection has been made so I can send the
data?
3. How do I know when its ready to be read?
4. And finally, how would I read it? (I read somewhere about using
sysread when using non-blocking)
Any help would be so greatly appreciated. Thank you,
-Adam Levy
------------------------------
Date: Mon, 14 Dec 1998 09:04:27 +0000
From: Matt Sergeant <matt@teamamiga.org_NOSPAM>
Subject: Re: OLE referencing problem: PerlScript, ASP and CDONTS.NewMail object
Message-Id: <3674D49B.95DA5A12@teamamiga.org_NOSPAM>
bdavis@mediaphex.com wrote:
>
> I'm trying to use the CDONTS.NewMail object from the SMTP server component of
> IIS 4 from a PerlScript driven ASP page. I've gotten the basic functionality
> of the object mapped over to PerlScript. I can set the standard headers and
> send the mail message. I have not however been able to set arbitrary headers.
>
> A method named Value is used to set arbitrary message headers. Its VBScript
> syntax is:
>
> <object ref>.Value(header) = strHdrValue.
This is using the SetProperty with multiple values system. It's a
horrible horrible thing. Unfortunately MS think it's useful, so you're
stuck with it.
You can only do this on AS perl build 504 and above (so make sure you
upgrade), and the syntax would be:
$obj->Value->SetProperty('Item', 'header', 'headervalue');
(I think)...
--
<Matt email="matt@teamamiga.org" />
| Fastnet Software Ltd | Perl in Active Server Pages |
| Perl Consultancy, Web Development | Database Design | XML |
| http://come.to/fastnet | Information Consolidation |
------------------------------
Date: Mon, 14 Dec 1998 01:51:30 -0800
From: Eric Umehara <momiji@slip.net>
Subject: Programming Prob
Message-Id: <3674DFA0.47F498D6@slip.net>
I'm learning Perl.
I had this wild idea about a problem that would often occur if it is
real.
If you have a form which is accessed a lot and one person submits it,
the script opens a file to input the data whiile at the same time
another person submits the same form that would require the same output
file what would happen. Would each sumbit have to wait in line for the
one prebious to it to go or can Perl/CGI scrits run simoltaniously?
Another problem. I'm program a script that is like a online shopping
cart. I have figured out how to overcome the problem with people who use
proxy servers and share IP addresses by assiging each person a ID
alphnumberic character string that they carry around in through out
their use. The problem is that what are the chaces of 2 people getting
the same ID character which are all lowercase alph char and is their a
way to aviod this problem?
ie.
abjcdetdpaa-Person A same ID number- big problem
abjcdetdpaa-Person B
Any help would be appreciated, thanks,
Eric Umeahra
momiji@slip.net
------------------------------
Date: Mon, 14 Dec 1998 06:05:12 GMT
From: "Warren Baker" <WeAreUs@Ibm.net>
Subject: Re: redirection after headers sent in CGI file
Message-Id: <sU1d2.7756$DO1.4333@news.rdc1.bc.wave.home.com>
Hi All!
I hope this question is appropriate. Please educate me if not. . .
I would like to do something like exec("cgifile.pl"); or
print "Location: data.cgi \n\n";
The former doesn't work for me after I've done a bunch of other CGI things
in a file, and the latter has to be issued prior to the completiong of
sending HTML headers and the beginning of something else. IOW the latter,
if issued late in the game results in the actual printing of "Location:
data.cgi ", which while very nice is not what I need. I want to be able to
execute another cgi file (without returning) at any point I choose. Can
this be done?
Thanks very much!
--Warren
------------------------------
Date: Mon, 14 Dec 1998 08:00:27 GMT
From: Eric Bohlman <ebohlman@netcom.com>
Subject: Re: Saving Multidimentional Hash's?
Message-Id: <ebohlmanF3y3Kv.1rq@netcom.com>
ConRad68 <conrad68@hotmail.com> wrote:
: Can someone please give me some direction to how I can save a
: multidimentional hash to a file. I had a look at the TIE function, but the
: MLDBM is not available under WIN32 Perl. I don't need a TIE/DB solution,
: just a fast a dirty way to dump the hash into a file, and then read it in
: again.
Go over to CPAN and take a look at Data::Dumper, FreezeThaw, Storable and
MLDBM. Beg, borrow or steal a copy of Sriram Srinivasan's _Advanced Perl
Programming_ (the "panther" book) and read the chapter on "persistence."
------------------------------
Date: 14 Dec 1998 00:44:05 GMT
From: danny@lennon.postino.com (Danny Aldham)
Subject: Re: SCO Unix
Message-Id: <751n0l$1j7$2@lennon.postino.com>
X-Newsreader: TIN [version 1.2 PL2]
> "Robert" == Robert Annandale <rob_a@unipharm.com> writes:
Robert> I tried to install perl5.003 on SCO 5.04. I used the
Robert> command 'sh configure' and a snazzy script ran some checks
Robert> on my system. Then it bombed with the error 'Your C
Robert> compiler "cc" doesn't seem to be working!' ''You better
Robert> start hunting for one and let me know about it.'
Robert> Snazzy eh?
Robert> Anyways, does this mean I need to splurge 400 greenbacks
Robert> for a SCO Development Kit?
No. You can install the development libraries off of the OS cdrom
for free, and then get a copy of gcc from the Skunkware collection
at www.sco.com. Perl5 builds fine with gcc. Or you can get pre-built
perl binaries in the same skunkware collection. But rolling your own
is a much better solution, since installing modules is a problem
without make.
--
Danny Aldham SCO Ace, MCSE, JAPH, DAD
Field Service Manager BCTel Systems Support
7000 Lougheed Hwy, Burnaby BC (604) 444-8949
------------------------------
Date: Mon, 14 Dec 1998 09:35:29 GMT
From: dave@mag-sol.com
Subject: Re: Writing Perl with Notepad
Message-Id: <752m51$hf3$1@nnrp1.dejanews.com>
In article <36730C4B.D0A1B217@technologist.com>,
Evan Panagiotopoulos <evanp@technologist.com> wrote:
> This is a multi-part message in MIME format.
> --------------31C935D452E45C802F4A6D88
Please configure your news client not to post MIME messages. It makes your
posts difficult to read on some of the most used newsreaders.
> I have no problems writing Perl scripts with vi. Yesterday though, I
> tried to write a script with Notepad but after I saved it on Linux and
> tried to execute it gave me an error complaining about linefeeds or
> something like that. Can I use Notepad or different windows editor
> for script writing? I have a class of high school students and using
> vi is like pulling teeth.
Nothing to do with Perl or vi or Notepad. You're falling foul of the
difference between line endings on Windows and on real operating systems. I
don't know how you're tranferring the files between Windows and Linux, but if
you're using FTP you should transfer in ASCII mode. If you do this, the line
endings will be automatically converted for you.
If you are using some other transfer method, you'll need to convert the files
yourself. Many Unixen come with a pair of filters called dos2unix and unix2dos
which will convert between the different formats. Use them like this:
dos2unix < ugly_dos_file.txt > pristine_unix_file.txt
If your Unix doesn't have these filters (and I can't remember if Linux does)
it's a reasonably trivial task to write them. All you need to know is that
DOS (and therefore Windows) terminates lines with CR/LF whilst Unix
terminates them with just a LF (incidently, just to complete the set, Macs
terminate lines with just a CR).
hth,
Dave...
--
Magnum Solutions Ltd: <http://www.mag-sol.com/>
London Perl M[ou]ngers: <http://london.pm.org/>
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 12 Dec 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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 V8 Issue 4417
**************************************
