[8131] in Perl-Users-Digest
Perl-Users Digest, Issue: 1749 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jan 28 09:09:49 1998
Date: Wed, 28 Jan 98 06:00:53 -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 Wed, 28 Jan 1998 Volume: 8 Number: 1749
Today's topics:
Re: "Teach Yourself Perl in 21 days" (Was: Re: substitu <hell@puls04.desy.de>
Re: "Teach Yourself Perl in 21 days" (Was: Re: substitu <terjekv@ifi.uio.no>
Anyway to handle inconsistent perl locations in #! ? (Terry Carroll)
Re: Anyway to handle inconsistent perl locations in #! pgf@foxharp.boston.ma.us
Re: check URL (Abigail)
Re: Conversion to an array (Rob)
Re: FAQ too big (Was: Re: PERL forking) (Bart Lateur)
Re: Help with debugging perl without the web <joseph@5sigma.com>
hex -> int -> byte ??? <f95-plu@nada.kth.se>
If somebody has compiled Perl5.003 or 5.004 <bidouye@club-internet.fr>
Re: making lists of items in text file using perl <James@cydaps.nospam.co.uk>
Perl interface to xfig? (Ari Jolma)
Re: perl4, solaris, varargs <fanf@demon.net>
Re: Please define the usage in this example. <xxTony.Curtis@vcpc.univie.ac.at>
Re: printing an image (Bart Lateur)
Re: Remove elements of array1 from array2. <joseph@5sigma.com>
Re: Survival Of perl (Tad McClellan)
Re: Survival Of perl (John M. Klassa)
Re: Survival Of perl (John M. Klassa)
Vote/poll/survey Script needed <bozzmon@bigfoot.com>
why no one ever reply? angyny@interport.net
Re: WIN32 LWP Problem <jbattikha@highsynth.com>
Win32:EventLog does not work <iob@leonberger.bawue.com>
Win32:Eventlog does not work <iob@leonberger.bawue.com>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 28 Jan 1998 10:06:27 +0100
From: Otto Hell <hell@puls04.desy.de>
Subject: Re: "Teach Yourself Perl in 21 days" (Was: Re: substitute...)
Message-Id: <Pine.HPP.3.95.980128100106.6717A-100000@puls04.desy.de>
On Tue, 27 Jan 1998, Tom Phoenix wrote:
> Date: Tue, 27 Jan 1998 12:27:00 -0800
> From: Tom Phoenix <rootbeer@teleport.com>
> To: Duane Lecky <dlecky@uvic.ca>
> Newsgroups: comp.lang.perl.misc
> Subject: "Teach Yourself Perl in 21 days" (Was: Re: substitute...)
>
> On 27 Jan 1998, Duane Lecky wrote:
>
> > My reference book for Perl was initially "Teach Yourself
> > Perl in 21 days" by David Till. It was excellent.
>
> My experience with that book is somewhat less positive.
>
> I had heard Randal claim that he could start at any random page in that
> book and find a serious error of fact within four pages. It was hard for
> me to believe that it could be that bad. So, when a student in one of my
> classes had a copy, I asked to borrow it. I figured that, although I'm not
> up on every detail as much as Randal, maybe I could spot an error or two.
>
> I flipped it open at random.
>
> The first function described in the first paragraph of the first page I
> opened to listed the function's two parameters in the wrong order.
>
> I gave the book back.
>
> Although it's too small a sample to be statistically useful, I can now say
> that 100% of the information I've checked from that book is wrong. :-)
>
> --
> Tom Phoenix Perl Training and Hacking Esperanto
> Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
>
I read this book half way through, and I regret not to have taken the time
for the rest. I'm not able to spot perl errors, but I do recognise good
writing when I see it. From this point of view I second the motion that
this book is excellent.
Mit freundlichem Gruss / Greetings / Bien a vous Otto Hell
--
<Otto.Hell@desy.de> DESY - Abteilung ZDV
tel: 49 40 8998 2317 Notkestrasse 85
fax: 49 40 8994 2317 D 22603 Hamburg
------------------------------
Date: 28 Jan 1998 11:19:11 +0100
From: Terje Kvernes <terjekv@ifi.uio.no>
Subject: Re: "Teach Yourself Perl in 21 days" (Was: Re: substitute...)
Message-Id: <wxxzpkg295r.fsf@refil.ifi.uio.no>
Otto Hell <hell@puls04.desy.de> writes:
> I read this book half way through, and I regret not to have taken the time
> for the rest. I'm not able to spot perl errors,
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
That's part of the problem, if you're gonna learn perl, then learning
it from a book with errors is't what you want. Perl can be confusing
enough _without_ errors (I don't think, or hope, anyone will be much
offended by that statement... :-) A beginner might not notice the
errors, and have great difficulty getting things to work. This was my
experience with perl in the beginning, especially with regexps, if
someone I knew was good at perl gave me some code, I thought that to
be safe, and looked for errors elsewhere...
> but I do recognise good
> writing when I see it. From this point of view I second the motion that
> this book is excellent.
Agreed... The parts I have read are good, but a new version with some
code-checking will be great... :-)
--
Terje Kvernes
http://www.ifi.uio.no/~terjekv/
------------------------------
Date: Wed, 28 Jan 1998 08:53:49 GMT
From: carroll@tjc.com (Terry Carroll)
Subject: Anyway to handle inconsistent perl locations in #! ?
Message-Id: <34d5eeea.59309571@news.ncal.verio.com>
I have some perl programs that are resident on a filesystem mounted on two
different systems.
For reasons known only to the sysadmin, perl is located at two different
locations: /usr/bin/perl on one system, /usr/local/bin/perl on another.
So, #!/usr/bin/perl works on the first, but not the second;
#!/usr/local/bin/perl works on the second, but not the first.
I thought of creating a link in my home directory, and pointing to that,
but the home directory is the same on both shells, too.
To complicate things, I make the program available to users besides
myself, so I couldn't just set an environmental variable in my .cshrc and
use that.
Ideas?
------------------------------
Date: 28 Jan 1998 13:24:31 GMT
From: pgf@foxharp.boston.ma.us
Subject: Re: Anyway to handle inconsistent perl locations in #! ?
Message-Id: <6anbif$e4q$1@wbnws01.ne.highway1.com>
In comp.unix.shell Terry Carroll <carroll@tjc.com> wrote:
: For reasons known only to the sysadmin, perl is located at two different
: locations: /usr/bin/perl on one system, /usr/local/bin/perl on another.
:
: So, #!/usr/bin/perl works on the first, but not the second;
: #!/usr/local/bin/perl works on the second, but not the first.
the only way i know to fix this is to have your sysadmin create a symlink
from /usr/local/bin/perl to /usr/bin/perl, or vice versa, approptiately, so
that perl is available in a common location in both places.
if there's another solution, i'd love to hear it...
--
=---------------------
paul fox, pgf@foxharp.boston.ma.us (arlington, ma, where it's 28.6 degrees)
------------------------------
Date: 28 Jan 1998 07:38:02 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: check URL
Message-Id: <6amn8q$9ll$3@client2.news.psi.net>
Tom Phoenix (rootbeer@teleport.com) wrote on 1611 September 1993 in
<URL: news:Pine.GSO.3.96.980127214536.13242O-100000@user1.teleport.com>:
++ On 27 Jan 1998, Wei Weng wrote:
++
++ > Is there anyway to use perl to test a URL is valid or not?
++
++ Use the LWP module. Hope this helps!
LWP will tell you if email addresses are valid?
Abigail
--
<URL:mailto:abigail@fnx.com> is also an URL.
------------------------------
Date: Wed, 28 Jan 1998 13:07:49 GMT
From: rob@nospam.demon.co.uk (Rob)
Subject: Re: Conversion to an array
Message-Id: <34cf2d4a.13998776@news-reader.bt.net>
On 27 Jan 1998 15:59:17 +600, "Kevin Tonkin" <kjt111@hotmail.com>
wrote:
>Can someone tell me if it is possible to convert the variables from a
>database file to an array?
>
>Example: Database stored in a text file like so...
>
>Bob|24|blue|single
>Fred|32|green|married
>
>If I wanted to put blue and green into an array, how would I achieve this?
>
>Any help would be appreciated!
>Kevin
open(DB, "/directory_path/dbfile.db");
$n="0";
while(<DB>)
{
@array = split(/\|/, $_);
$name[$n] = $array[0];
$age[n] = $array[1];
$color[$n] = $array[2];
$stat[$n] = $array[3];
print "@color[$n]\n";
$n++;
}
This isn't the best way to do it, but it works. Just split the fields
by the pipe and load them into the array. Then load each item into
it's corresponding array using the counter to traverse it. You could
use another counter to generate the arrays themselves, and ideally you
should be using a hash pointing to each array so you can search by the
key (and a for loop to save pointer initialising and incrementing).
japh
------------------------------
Date: Wed, 28 Jan 1998 12:22:46 GMT
From: bart.mediamind@tornado.be (Bart Lateur)
Subject: Re: FAQ too big (Was: Re: PERL forking)
Message-Id: <34d90537.8785473@news.tornado.be>
aml@world.std.com (Andrew M. Langmead) wrote:
>Are you saying that many Windows users don't realize that there is any
>way to search through text?
Sortof. Make that "search though multiple text files".
HTH,
Bart.
------------------------------
Date: Tue, 27 Jan 1998 23:53:37 -0700
From: "Joseph N. Hall" <joseph@5sigma.com>
Subject: Re: Help with debugging perl without the web
Message-Id: <34CED5BB.8E0A1499@5sigma.com>
Why is it that people who post CGI questions here sometimes
think they're being ignored.
Hmm?!?
-joseph
brian d foy wrote:
>
> you only need to post once.
--
Joseph N. Hall, prop., 5 Sigma Productions mailto:joseph@5sigma.com
Author, Effective Perl Programming . . . . . http://www.effectiveperl.com
Perl Training . . . . . . . . . . . . . . . http://www.perltraining.com
------------------------------
Date: Wed, 28 Jan 1998 12:52:28 +0100
From: patrik lundin <f95-plu@nada.kth.se>
Subject: hex -> int -> byte ???
Message-Id: <34CF1BFA.42012FCD@nada.kth.se>
Hi.
My expertise is not in Perl, but I have to create a cgi-script
that can handle data sent from an ActiveX control through
a regular html-form on a webpage.
My question is, if I have a string with hexadecimal values ( 0 - 255 )
separated with "-" like this : "-0D-0A-FF-EF-09" ... etc
How can I convert the hexnumbers to byte's and then write them to
a binary file.
The server this script will run under is a UNIX server.
Thankyou.
Patrik Lundin
f95-plu@nada.kth.se
http://www.student.nada.kth.se/~f95-plu/
------------------------------
Date: Wed, 28 Jan 1998 08:04:37 +0000
From: STOCK Fridiric <bidouye@club-internet.fr>
Subject: If somebody has compiled Perl5.003 or 5.004
Message-Id: <34CEE695.5F58@club-internet.fr>
Hello,
If somebody has compiled Perl5.003 or Perl5.004 under SCO Unix R3.2V4.2,
please let me know !!!
Thank's
--
00 00
Fridiric STOCK
00 00
------------------------------
Date: Wed, 28 Jan 1998 10:52:11 +0000
From: James <James@cydaps.nospam.co.uk>
Subject: Re: making lists of items in text file using perl
Message-Id: <r0mc2RAb3wz0EwX9@cydaps.co.uk>
On Tue, 27 Jan 1998, Tom Phoenix wrote:
>On Tue, 27 Jan 1998, James wrote:
>
>> Is there any way that I can get perl to search through a delimited text
>> file for all the occurances of a certain item, (ie if there is a list of
>> different colour jumpers) and then create a file to store this
>> information in, but not to repeat duplicate items.
>
>Yes, you can do that with a hash. Good luck!
>
Hi
Thanks for everyones help with this, have managed to get this working
with a great little script from Andrew (thanks!).
Best wishes
James
------------------------------
Date: 28 Jan 1998 10:08:18 +0200
From: ajolma@ahti.hut.fi (Ari Jolma)
Subject: Perl interface to xfig?
Message-Id: <6amp1i$cbg$1@ahti.hut.fi>
Has anybody written an interface to xfig files in Perl
that s/he would like to share?
xfig is a menu-driven tool to draw an manipulate graphic
objects. xfig saves the objects in a text file and the
interface is easy to write since the source code is
available. I just would like to save my time.
I would like to use xfig as a visualization tool for
my (spatial) data. Having a Perl interface would make
it easy to render the data which I have in a database
into an image which can then be modified, printed, etc
in the xfig program.
Ari Jolma
------------------------------
Date: 28 Jan 1998 10:27:56 GMT
From: Tony Finch <fanf@demon.net>
Subject: Re: perl4, solaris, varargs
Message-Id: <6an17c$3se$1@info.noc.demon.net>
bren@fangorn.cs.monash.edu.au (Brendan Macmillan) wrote:
>Tom Phoenix (rootbeer@teleport.com) wrote:
>: On 27 Jan 1998, Tony Finch wrote:
>:
>: > Our customers want to be able to use perl 4 for their CGI scripts,
>:
>: No, they don't. They want to use Perl 5.
>
>*sigh* this is the typical response to any perl4 question.
>
>There may be a reason the poster said they want "to be able to use perl 4".
>Perhaps compatibility with existing CGI scripts?
Exactly. It isn't our job to ecucate our customers, merely provide a
service to them. It isn't my job to decide what service we provide.
Anyway, for future reference, it appears I answered a veiled question
about calling conventions incorrectly. "Were your libraries compiled
with gcc?" No, but they are compatible. Sigh.
Tony.
--
F.A.N.Finch ::0:0::: <dot@dotat.at>
System Administrator <fanf@demon.net>
Demon Internet [speaking in a private capacity]
------------------------------
Date: 28 Jan 1998 11:38:10 +0100
From: Remove xx to reply <xxTony.Curtis@vcpc.univie.ac.at>
To: mpryor@shareone.com
Subject: Re: Please define the usage in this example.
Message-Id: <7xd8hcanot.fsf@beavis.vcpc.univie.ac.at>
Re: Please define the usage in this example., Mark
<mpryor@shareone.com> said:
Mark> foreach $i(0..$#in_key)
Mark> What exactly does the # sign perform? I realize it's
Mark> used for comments, but in this case, I haven't found
Mark> an explanation in the docs.
Hmm, easiest by example I think:
@array = ('apple', 'banana', 'pear', 'peach');
print "$#array\n";
==> 3
$# tells you the highest index of an array (here @array goes
from 0 .. 3).
So the `foreach' simply iterates over all elements of the
array `in_key'.
hth,
tony
------------------------------
Date: Wed, 28 Jan 1998 12:22:53 GMT
From: bart.mediamind@tornado.be (Bart Lateur)
Subject: Re: printing an image
Message-Id: <34da15ac.12998440@news.tornado.be>
George Cyriac <gcyriac@internetmci.com> wrote:
>I want to make a script that outputs an image to a browser. This is
>what I got so far:
>#!/usr/bin/perl
>open("sm.gif",IMAGE);
>print "content-type: image/gif\n\n";
>print <IMAGE>;
>close(IMAGE);
>
>What am I doing wrong? How do I get the image into a variable?
First: swap the parameters for open(). The filehandle-to-be should come
first.
Second, especially on a PC, use the next statement just after opening
the file.
binmode(IMAGE);
HTH,
Bart.
------------------------------
Date: Tue, 27 Jan 1998 23:51:15 -0700
From: "Joseph N. Hall" <joseph@5sigma.com>
Subject: Re: Remove elements of array1 from array2.
Message-Id: <34CED52D.402FD3AF@5sigma.com>
An alternative approach might also be:
%hash1 = map { $_, $hash1{$_} } grep { not exists $hash2{$_} } keys %hash1;
if %hash1 is small and %hash2 is large. Or, Shaun, just use a
loop if map scares you. :-)
-joseph
Tom Phoenix wrote:
> As I read it, Shaun wants to delete any element in hash2 which has a
> corresponding key in hash1. With a recent version of Perl, this should do
> that.
>
> delete @hash2{ keys %hash1 };
>
> (If there are more than, say, 100 keys in %hash1, I'd probably do this in
> a loop, though.) Hope this helps!
--
Joseph N. Hall, prop., 5 Sigma Productions mailto:joseph@5sigma.com
Author, Effective Perl Programming . . . . . http://www.effectiveperl.com
Perl Training . . . . . . . . . . . . . . . http://www.perltraining.com
------------------------------
Date: Wed, 28 Jan 1998 00:15:09 -0600
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Survival Of perl
Message-Id: <ddima6.ns5.ln@localhost>
Jason Christian (jason@primal.ucdavis.edu) wrote:
[
This followup is meant for the group at large.
It is not directed at Jason, but at the folks he describes.
(ie. 'you' below is a generic sort of you :-)
]
: <sticks head out from wing-flat to check if tomatoes are still flying>
Very pragmatic ;-)
: It depends (typical economist answer).
heh, heh.
: I learned (some) Perl to help me to transform ugly output from an
: econometric program into input for a pretty LaTeX table...and stayed to
: (re)learn programming. I now use Perl to do a remarkable variety of
: things.
I learned Perl to help me stop munging text in C (with lex for the
regexps). Can't believe I ever did things that cumbersome, expensive
way...
Did you know that besides being a part of the free software movement,
that Perl is also responsible for reducing mental health care costs?
I knew I had a problem and that I needed help ;-)
<AA>
"I am a C/lex programmer, and have been for X years..."
</AA>
: If I were a Real Programmer,
^ ^
I'm one of those, so I'll snip for a while...
[snip]
: In a way it is a throwback to the old days, before shrink-wrap, when
^^^^^^^^^^^^^^^^^^
I might have characterized it as "before point and click", but I get
your drift.
: people knew how to cause the computer to do good things. Programming was
: not something done in programming shops, it was done *by the end user.*
Yes, but in those days users where hobbiests. Fueled by passion,
and willing to expend some effort to Get It Done.
Today's users are consumers (well, at least the users Frank has
mentioned). The same folks that buy appliances from that
lonely repairman, and blue light specials, and even stuff from
the Evil Empire.
They need it prechewed. With someone to spoon it up to their mouths.
And someone to wipe it off of their chin ;-)
I'm not trying to denigrate such folks. They're just not expected to
have any level of technical expertise.
Programming is going to be Hard if you don't have _any_ technical expertise.
"Web programming" with Perl has brought a lot of folks who would
otherwise not give a rip about any form of programming into the
"fold". I suppose VB has pulled in some folks as well. Because
they are so darn easy to use.
That is what the Web's popularity has brought to programming in
the small. A whole bunch more programmers, who aren't (can't?) going
to spend a lot of time learning how to Do It Right.
Maybe this was what Frank meant?
More like a heavy, blunt bulldozer blade than a knife edge though ;-)
And that's OK. Programming should be popular (because, well, it's
just so cool that we RPs (see above) like to do it all day long ;-)
: So what has this to do with scores (hundreds?)
Oh. So you haven't been here very long ;-)
It is for sure in the thousands for at least some folks (might they
be the snippy ones?)
Let's say 20-40 such noise posts in a day.
perl -e 'print 20*365, "\n"'
7300
Seven thousand a year (maybe twice that).
Many have been here for a few years...
: of off-topic posts
^^^^^^^^^
I don't ask my butcher how to adjust my fuel injectors.
I ask someone who knows about such things.
People that know about Perl are in this newsgroup here.
People that know about CGI applications are in another newsgroup.
: by people who *should* be using CGI.pm,
CGI.pm is prechewed, spooned up, and even helps with the digestion ;-)
Just what the doctor ordered.
It pains me to see people relearn what has been learned before
and packaged up into a solution so that it will hardly ever be
an issue again. They are working waaaay too hard.
: reading the faq,
There are thousands of Perl programmers. Each and every one of
them was new at some point. Trying to learn Perl.
Just like today's new Perl programmers.
Don't these new users think that their particular question might
just maybe have been asked by 20-10,000 of the people who have
walked that road previously?
1) Post to Usenet
Get answer in hours? days? never?
Get an answer that worked for one person (who may be just a few
weeks ahead of you
on the same track.
How can you tell?)
--
OR
--
2) Get the answer from the FAQ
Get answer in ten minutes at the most, even with an Operating
System that is not very helpful in your operating of the system.
Get an answer that has been examined by _thousands_ of other
people. Some of them the very people who wrote the language
interpreter that you are trying to learn how to use.
Hmmm. Which should they chose? ;-)
: and posting to
: *.cgi-authoring ?
$_ = 'cgi-authoring';
print join('.', reverse(split(/-/))), "\n"; # <grin>
: Just this. Those Clueless Newbies *are* all using
: Perl (or at least a very small subset of it), in much the same way that
: I started out using a subset of Perl (string processing stuff). Many of
: them may well stumble into the discovery that small-scale programming is
: Fun and Useful.
Great! The more the merrier.
: Hey, some of them may even be convinced that for a wide
: variety of purposes the mass-produced schlock is not as good as a custom
: solution, written by a Perl Pro, but which they can (to some extent)
: maintain.
And the programmers all get rich? Could happen I suppose... ;-)
: I (and I suspect the previous target of the Perl Pros' Tomatoes) do not
: prescribe any new programming effort, nor argue with the Tomato Hurlers
: opinions about what is or isn't hip or hard or important. I also
: respect (tremendously) all the free help that you people hand out
: (which I have mostly got by reading, and reading, and reading), and
: understand your frustration with repeated clueless questions.
: And yet... the level of snappishness in this newsgroup has increased so
: much since I first perused it, that I fear that I might have written Perl
: off as a difficult (well, I think the OO stuff is hard) language used
: mainly by a lot of arrogant and rude people. That would be too bad, at
: least for me.
I'm afraid I'm one of the subjects of that last paragraph. I do my
best (too frequently unsuccessfully) to stifle my annoyance. But
sometimes it just comes gushing out.
Sorry to any readers who I've snapped at.
I lack the self control of many of the other posters here.
Let me take this opportunity (well, there really isn't any
applicable opportunity here, but I want to say it, so I'm gonna)
to present what I feel is really behind most "ventings" hereabouts.
FAQs and off-topic posts are "noise". When the noise level crosses
a person's threshold, they stop participating in the newsgroup.
Objecting to such noise is SOP across nearly all Usenet newsgroups.
There is nothing particularly Perl-ish about that.
Long time c.l.p.m readers have seen the folks that used to answer their
questions abandon the group. They're not here anymore. (well,
some mostly lurk now. I've seen familiar names every now and again).
The quality of free consulting available here has diminshed
because of it.
I think maybe I can't help but blame FAQ askers for helping to remove
that avenue to the solution of my Perl programming problem de jour.
: So I answer,
What was the question again?
Sheesh. This is a mighty hefty thread. Now here I am feeding it
chocolate sundaes...
: "it depends." If you want some of the Clueless Newbies to
^^^^^^^^^^^^^^^^
I think the aim of the responders (surely for me anyway) is to
make it so that you can speak of those folks without needing that
"Clueless" modifier.
;-)
: stick around, quietly perhaps, and come back, and become decent and
: confident users of their computers and this wonderful language, then
: there is something you (plural!) can do: edit the venom from the
: flames, offer politely (as many of you do) the suggestion to go to a
: more appropriate newsgroup, perhaps even ship off the canned discussion
: of where the boundary lies between a CGI question and a perl question.
: If instead you wish there to be a Sacred Priesthood of Perl, to which
: None but the Brilliant May Aspire, then by all means set the
: flamethrowers on Scorch.
: Of course, even that might not work: Perl is such a cool language that
: it may salve even the third-degree net.burn ...
One more thing, dredged from the dreary depths of my hard drive:
----------------------------------------------
In article <1995Nov9.193745.13694@netlabs.com>, lwall@netlabs.com (Larry
Wall) wrote: ...
<Larry> [snip] I view a programming language as a place to be
<Larry> explored, like Disneyland. You don't need to have a lot of preparation
<Larry> to explore a theme park. You do have to go along with the crowd
<Larry> control measures, though. In a sense, each ride has its own
<Larry> prerequisites--if you cut in line, you risk getting tossed out of the
<Larry> park.
<Larry>
<Larry> What we have here in this newsgroup is a failure in crowd control.
<Larry> Reading the FAQ is like staying in line--it's something you should
<Larry> learn in kindergarten. Usenet needs a better kindergarten.
----------------------------------------------
See him around here much?
: btw, I think the thread is badly misnamed...the question is not at all
: the *survival* of Perl but rather Perl outreach.
Well put.
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: 28 Jan 1998 13:16:14 GMT
From: klassa@aursgh.aur.alcatel.com (John M. Klassa)
Subject: Re: Survival Of perl
Message-Id: <6anb2u$b89$1@aurwww.aur.alcatel.com>
On 27 Jan 1998 22:50:44 GMT, Tom Christiansen <tchrist@mox.perl.com> wrote:
-> "If you think Emacs is such a great editor, just look what it did for
-> Richard Stallman's typing skills!"
Reminds me of that recent Dilbert where Dogbert is seeking out technology
that has been possessed by the demons of stupidity. He comes across a
software developer who is mumbling, "I'll make the command easy to remember
like 'CTRL-ALT-F4-DEL'..." My first thought was, "Richard Stallman: Emacs".
:-)
Nonetheless, I remain an avid Emacs user. Go figure...
John
--
John Klassa / Alcatel Telecom / Raleigh, NC, USA <><
------------------------------
Date: 28 Jan 1998 13:19:39 GMT
From: klassa@aursgh.aur.alcatel.com (John M. Klassa)
Subject: Re: Survival Of perl
Message-Id: <6anb9b$b89$2@aurwww.aur.alcatel.com>
On 28 Jan 1998 00:24:39 GMT, Tom Christiansen <tchrist@mox.perl.com> wrote:
->Simpler is better. Remember your roots. Kill complexity.
On the other hand (even after my post yesterday, in favor of adding
threads), I do agree with this sentiment. I occasionally think back to the
"good old days" when writing software was fun, and didn't involve "business
rules" and "enterprise-wide solutions" and all the rest of the jibberish
that pervades computing today.
--
John Klassa / Alcatel Telecom / Raleigh, NC, USA <><
------------------------------
Date: Wed, 28 Jan 1998 01:18:32 -0700
From: "BozzMon" <bozzmon@bigfoot.com>
Subject: Vote/poll/survey Script needed
Message-Id: <6ampfu$84c@ecuador.earthlink.net>
I need a script that allows people to respond, and then view the current
results in a graphical form. I have a couple scripts like this already, but
they show the stats before you vote, and therefore produce a biased poll.
Can anyone point me to one so I don't have to re-invent the wheel?
TM
------------------------------
Date: Wed, 28 Jan 1998 07:03:59 +0800
From: angyny@interport.net
Subject: why no one ever reply?
Message-Id: <34CE67DF.68FB@interport.net>
I've posted several times but never get anyone reply.
I'm still looking for the unzip tool to install Perl on alpha NT.
------------------------------
Date: Wed, 28 Jan 1998 04:08:42 -0500
From: Jihad Battikha <jbattikha@highsynth.com>
Subject: Re: WIN32 LWP Problem
Message-Id: <34CEF59A.B02B1690@highsynth.com>
Martin Vorlaender wrote:
> : Can't locate /auto/LWP/UserAgent/env_proxy.al in @INC ....
>
> On my OS/2 system, it's installed in perl's site library directory.
> If it isn't on your system, a workaround would be not to use the
> env_proxy() method of LWP::UserAgent (as it isn't common outside the
> Eunichs world, anyway), but to replace it by the proxy() method to set
> up proxies. See LWP::UserAgent's POD.
I've been running into the same problem using the ActiveState port of
Perl (I had to manually install the Autoload files & edit the
UserAgent.pm file a bit). Everything is there but I either get the same
error mentioned by John or I get a server error. I checked my logs &
the docs, but nothing helps. Also, I'm not using any proxy calls in my
own code -- that leaves me very confused since I still get the "can't
locate auto/LWP/UserAgent/_env_proxy.al in @INC".
Of course, I guess I could just install the G.S. port of Perl & be done
with it, but I've heard cases of people managing to get LWP to work with
ActiveState. Oh, to wait for convergence... I pray for 5.005 daily...
--
===================================================================
Jihad Battikha <jbattikha@highsynth.com> http://www.highsynth.com
-=< graphics . 2d/3d animation . illustration . web authoring >=-
-----------------------------------------------------------------
PGP: http://www.highsynth.com/jihad/pgp.htm
- fingerprint: 9B5E 0484 0D88 6454 380B 964D E9B7 7A58 15C0 CAD7
- expires: 1/1/1999
===================================================================
------------------------------
Date: 28 Jan 1998 13:07:24 GMT
From: "Leonberger Bausparkasse AG" <iob@leonberger.bawue.com>
Subject: Win32:EventLog does not work
Message-Id: <01bd2be4$be487780$df8cc3c2@p01026>
# want to read the NT eventlog, but nothing is diplayed.
# whats wrong with is, please.
# Thank you.
use Win32::Eventlog;
$eventinfo =
{ 'Key' => '',
'Category' => '',
'EventID' => '',
'Data' => '',
'Strings' => '',
};
sub read_it
{ my $EventLogs;
Win32::EventLog::Open($EventLogs, "system", '') || die $!;
$EventLogs->Read('EVENTLOG_FORWARDS_READ', 1, \%eventinfo) || die $!;
foreach $key (keys %eventinfo)
{ print $key, "\n";
}
}
read_it;
------------------------------
Date: 28 Jan 1998 13:07:25 GMT
From: "Leonberger Bausparkasse AG" <iob@leonberger.bawue.com>
Subject: Win32:Eventlog does not work
Message-Id: <01bd2be5$2c10de10$df8cc3c2@p01026>
# want to read the NT eventlog, but nothing is diplayed.
# whats wrong with is, please.
# Thank you.
use Win32::Eventlog;
$eventinfo =
{ 'Key' => '',
'Category' => '',
'EventID' => '',
'Data' => '',
'Strings' => '',
};
sub read_it
{ my $EventLogs;
Win32::EventLog::Open($EventLogs, "system", '') || die $!;
$EventLogs->Read('EVENTLOG_FORWARDS_READ', 1, \%eventinfo) || die $!;
foreach $key (keys %eventinfo)
{ print $key, "\n";
}
}
read_it;
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
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 V8 Issue 1749
**************************************
