[9724] in Perl-Users-Digest
Perl-Users Digest, Issue: 3318 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Aug 2 10:05:02 1998
Date: Sun, 2 Aug 98 07:00:34 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sun, 2 Aug 1998 Volume: 8 Number: 3318
Today's topics:
ActivePerl 5.005 and missing Win32:Ole <pep_mico@hp.com>
Re: ActiveState Perlscript <dcameron@bcs.org.uk>
Re: BUG: in POSIX::localeconv() (fwd) <Stefan.Vogtner@ruhr-uni-bochum.de>
Re: Good Book? <davidc@selectst.com>
Re: help help help please!!!! <thomas@daimi.aau.dk>
Re: hiding user input (Alan Barclay)
Re: hiding user input <sp@m.block>
Re: hiding user input <ljz@asfast.com>
Re: hiding user input (Gary L. Burnore)
Re: hiding user input <ljz@asfast.com>
Re: hiding user input <jdf@pobox.com>
Re: hiding user input (Gary L. Burnore)
Re: How to match several octals in a row? (Abigail)
Re: Local Perl Installation and Form Processing <mc@whoever.com>
Re: non-perl question about linux <mpersico@erols.com>
Perl interface to PostgreSQL? <thomas@provideo.dk>
Re: Perl interface to PostgreSQL? <thomas@daimi.aau.dk>
Perl/Linux/Database??? <flouden@netusa1.net>
Re: Perl/Linux/Database??? <thomas@provideo.dk>
Re: Perl/Linux/Database??? <thomas@provideo.dk>
Re: Perl/Linux/Database??? <thomas@daimi.aau.dk>
Re: Power (ie C's 4^7) (Gabor)
Re: Power (ie C's 4^7) <thomas@daimi.aau.dk>
Re: printed & bound perl 5.005 manuals? (Jan Dubois)
Re: Printing letters <jonah@g-s.net>
Re: reading a file listing? (Martien Verbruggen)
serialization and perl (Ilya M. Kirnos)
Re: write file in htdocs directory <sp@m.block>
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sun, 02 Aug 1998 13:42:12 +0200
From: Pep Mico <pep_mico@hp.com>
Subject: ActivePerl 5.005 and missing Win32:Ole
Message-Id: <35C45093.76291208@hp.com>
--------------DF4C0EC978E0358E6222E419
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Hi,
I just downloaded the latest release of Activestate, "ActivePerl" 5.005
modules. But all my scripts that has the entry USE Win32:OLE does't
work.
After a little investigation I've seen that OLE.PM file are not
included. It's normal? Should I change my
Scripts or is a problem with the distribution file?
To fix this problem I installed back previous release, a Beta release
5.00471 that works correctly.
================================================================
This is my current version (perl -v)
This is perl, version 5.005 built for MSWin32-x86-object
Copyright 1987-1998, Larry Wall
Binary build provided by ActiveState Tool Corp.
http://www.ActiveState.com
Built 10:56:51 Jul 28 1998
====================================================
And this is the error that produces a file that only contais the
following line "use Win32::OLE"
Can't locate Win32/ole.pm in @INC (@INC contains:
C:\Perl\5.005\lib/MSWin32-x86-object C:\Perl\5.005\lib
C:\Perl\site\5.005\lib/MSWin32-x86-object C:\Perl\site\5.005\lib
C:\Perl\site\lib .) at C:\USERS\DEFAULT\activeperl\sample.pl line 2.
BEGIN failed--compilation aborted at
C:\USERS\DEFAULT\activeperl\sample.pl line 2.
Regards
pep_mico@hp.com
--------------DF4C0EC978E0358E6222E419
Content-Type: text/html; charset=us-ascii
Content-Transfer-Encoding: 7bit
<HTML>
<P>Hi,
<P>I just downloaded the latest release of Activestate, "ActivePerl" 5.005
modules. But all my scripts that has the entry USE Win32:OLE does't work.
<BR>After a little investigation I've seen that OLE.PM file are not included.
It's normal? Should I change my
<BR>Scripts or is a problem with the distribution file?
<P>To fix this problem I installed back previous release, a Beta release
5.00471 that works correctly.
<BR>================================================================
<BR><B>This is my current version (perl -v)</B>
<BR>This is perl, version 5.005 built for MSWin32-x86-object
<P>Copyright 1987-1998, Larry Wall
<P>Binary build provided by ActiveState Tool Corp. <A HREF="http://www.ActiveState.com">http://www.ActiveState.com</A>
<BR>Built 10:56:51 Jul 28 1998
<BR>====================================================
<BR><B>And this is the error that produces a file that only contais the
following line "use Win32::OLE"</B>
<P>Can't locate Win32/ole.pm in @INC (@INC contains: C:\Perl\5.005\lib/MSWin32-x86-object
C:\Perl\5.005\lib C:\Perl\site\5.005\lib/MSWin32-x86-object C:\Perl\site\5.005\lib
C:\Perl\site\lib .) at C:\USERS\DEFAULT\activeperl\sample.pl line 2.
<BR>BEGIN failed--compilation aborted at C:\USERS\DEFAULT\activeperl\sample.pl
line 2.
<P>Regards
<BR>pep_mico@hp.com
<BR> </HTML>
--------------DF4C0EC978E0358E6222E419--
------------------------------
Date: 2 Aug 1998 11:52:39 GMT
From: "Duncan Cameron" <dcameron@bcs.org.uk>
Subject: Re: ActiveState Perlscript
Message-Id: <01bdbe0c$107c2ba0$4fedabc3@dns.btinternet.com>
I've installed Perlscript but not run it over the web. The release.txt
document has the following:
o PerlScript in IE 4.0 can be enabled/disabled by zones
HKEY_LOCAL_MACHINE\SOFTWARE\ActiveWare\PerlSE
REG_DWORD: EnabledZones = 0x0010 (default)
Values
Enable All 0x0001
Enable Local 0x0010
Enable Internet 0x0020
Enable Trusted 0x0040
Enable Resticted 0x0080 (for the perverse)
HTH
Duncan Cameron
Christopher Bradford <bradford@aliveonline.com> wrote in article
<PnTw1.4961$XM4.13284880@news.rdc1.md.home.com>...
> Has anyone used ActiveState's Perlscript? Any success in getting it to
work
> over the web (there is a registry key, apparently, that limits Perlscript
to
> the local machine). What do I need to change to get this to work?
>
------------------------------
Date: Sat, 01 Aug 1998 14:40:51 +0200
From: Stefan Vogtner <Stefan.Vogtner@ruhr-uni-bochum.de>
To: jhi@iki.fi
Subject: Re: BUG: in POSIX::localeconv() (fwd)
Message-Id: <35C30CD3.90F29DDA@ruhr-uni-bochum.de>
Jarkko Hietaniemi wrote:
>
>
> > It seems to me that the perl interpreter itself calls the C-function
> > setlocale. If so it would not be trivial to ensure that the interpre-
> >
> > ter is still working in the standard (C) locale.
>
> Sorry but I do not understand this remark. Please explain.
The Perl Interpreter is coded in C. If the Interpreter calls the
C-function setlocale all affected function (e. g. printf) will
operate under these locale settings. The desired behaviour should be,
that the perl interpreter (as a C-program) always runs in the standard
C-locale.
If you write a C-compiler, you probably avoid either any setlocale
and you never use functions like atof. Since these functions work
differently under different locale settings:
#include <stdio.h>
#include <stdlib.h>
#include <locale.h>
main ()
{
double f;
char s[] = "12.34";
printf ("%7.2f\n", atof (s));
setlocale (LC_ALL, "");
printf ("%7.2f\n", atof (s));
return 0;
}
To me -- that was ment with the abovementioned -- it seems as if there
is a setlocale function call within the perl-interpreter (I could not
look into the code). That implies that any call to functions like
printf or dtoa/scanf etc. will use the new decimal separator. IMHO the
currect (= expected) behaviour:
setlocale (LC_ALL, "");
$v = 1.12;
printf ("%.2f", $v);
print "$v\n";
both produce "1,12" in the de_DE locale. If you use <> to read in some
chars theres no problem. But the first time you operate numerically on
this value (with -w enabled) you'll see the complaints I mentioned in
a previous message. That means the perl runtime warns about the "wrong"
decimal separator, but actually does what is wanted: Probably the func-
tion atod is called, which operated under the locale setting, an pro-
duces the intented result.
BTW there is no module locale.pm that forces even "internal" conversions
like print or sort to use the current locale settings in perl 5.003.
>
> > > With use locale and with my fix the localeconv() no more resets
> > > the decimal separator. The fix is likely to be in 5.004_05 and
> > > 5.005_02.
> > But there's still another open question: If "use locale" would be man-
> > datory to enable the use of locale settings even for internal perl-
> > functions, would "use locale" affect the <>-operation?
>
> (I assume you are referring to your 2nd problem) This still needs more
> thinking. You see, first of all we have to be backward compatible.
> If "use locale" breaks otherwise fine scripts, we are in trouble.
s. above.
> "use locale" is anyway already needed for the sort, cmp, \w, and so on
> to behave locale-wise. It's not actually the <> that would need to be
with "sort {$a strcmp $b} @array"
> changed. <> just reads the next record, a scalar, from stdin. <>
> doesn't care what it reads -- it doesn't read strings or numbers.
OK
> It's the arithmetic operations that need chaning -- ergo, a much
> larger patch would be required -- which in turn means more potential
> breakages.
I think one only has to drop the warning. The conversion from string
to double is actually carried out "correct" i.e. under the locale set-
tings. That's what the user wants to see.
>
> --
> $jhi++; # http://www.iki.fi/~jhi/
> # There is this special biologist word we use for 'stable'.
> # It is 'dead'. -- Jack Cohen
--
+----------------------------------------+
|mailto:Stefan.Vogtner@ruhr-uni-bochum.de|
+----------------------------------------+
------------------------------
Date: Fri, 31 Jul 1998 08:13:55 +1000
From: David Coldrick <davidc@selectst.com>
Subject: Re: Good Book?
Message-Id: <35C0F023.5547B1A7@selectst.com>
Don't know that one. However, the book that convinced me that Perl was A
Good Thing, and has got to be the right intro to Perl for an experienced
programmer is Nigel Chapman's "Perl: The Programmer's Companion", John
Wiley and Sons. Chapman has a wonderfully understated sense of humour,
gives good comparisons to other languages, and has lots of great code
snippets that are really useful. Take a look at the review (by Tom
Christiansen?) at http://language.perl.com/critiques/ppc.html.
Regards,
David
Dave Mckeown wrote:
>
> I just bought "Perl 5 Complete" by Edward S. Peschko & Michele DeWolfe I
> was told by someone to buy "programming perl" by Larry wall, Randal
> Swartz or "Cgi programming for the www" Is the book I bought any good
> any one read it I sat down and read it for about 30 minutes in the store
> and it looked good any opinions??
>
> --
> Icq# 14056739
> mailto:dmckeown@istar.ca
------------------------------
Date: Sun, 02 Aug 1998 15:42:20 +0200
From: Thomas Jespersen <thomas@daimi.aau.dk>
Subject: Re: help help help please!!!!
Message-Id: <35C46CBC.C5BCC69D@daimi.aau.dk>
David wrote:
> If anyone can provide the Perl for this I would really appreciate it.
>
So you want someone to write a CGI script to a commercial website for
free?
No thanks, not interested
------------------------------
Date: 31 Jul 1998 13:48:44 GMT
From: gorilla@elaine.drink.com (Alan Barclay)
Subject: Re: hiding user input
Message-Id: <901892916.313620@elaine.drink.com>
In article <35c8e560.14065952@nntpd.databasix.com>,
Gary L. Burnore <gburnore@databasix.com> wrote:
>On 30 Jul 1998 14:00:03 -0700, in article <6pqmsj$m0p@Xenon.Stanford.EDU>,
>hirano@Xenon.Stanford.EDU (Kelly Hirano) wrote:
>>please don't tell me that you're going to follow up each of abigail's posts
>>with this message. why not send such messages in email instead of spewing it
>>out to everyone. sorta like this message. 8^)
>
>Because that would be abuse and would be grounds for termination of an account
>by most reputable ISP's.
Posting the same message over and over again is also abuse, and also
grounds for termination of an account by most reputable ISP's.
------------------------------
Date: Sun, 02 Aug 1998 20:34:06 +0900
From: Spam Block <sp@m.block>
Subject: Re: hiding user input
Message-Id: <35C44EAF.FCF6FD2C@m.block>
I've been following this thread with interest, and I have a suggestions:
Suggestion: we need a FAQ which explains why it is abusive to respond to a
postingt in terms like "Are you thicker than shit or can't you just read?".
This should then be weekly into the news group, and then if Abagail still
doesn't take the hint we should hold a vote to see who goes over to her house
and explain it in person.
------------------------------
Date: 02 Aug 1998 09:20:47 -0400
From: Lloyd Zusman <ljz@asfast.com>
Subject: Re: hiding user input
Message-Id: <ltzpdno6z4.fsf@asfast.com>
gbacon@cs.uah.edu (Greg Bacon) writes:
> In article <lt1zr14kcp.fsf@asfast.com>,
> Lloyd Zusman <ljz@asfast.com> writes:
> : But how do most "newbies" know that so many people have invested so
> : much time? Being "newbies" means that they are unfamiliar with the
> : fact that this has occurred until *after* someone points it out
> : to them. Should this pointing out be done rudely or politely?
>
> You're sadly misinformed. The advice for new users in (surprise!)
> news.announce.newusers (have you read it?) suggests that new users
> lurk for a while before posting. If new users would wait at most a
> week before posting, they'd see gnat's and TomP's posts about FAQs.
So ... are you contending that all the people who come here with
frequently asked questions have already read `news.announce.newusers'
and are deliberately flouting the conventions discussed therein? I
would be willing to bet that a very high percentage of the first-time
posters who come here asking such questions have not even heard of
`news.announce.newusers' ... and therefore have not been lurking for a
while, either.
I assume you read my entire post that you're responding to. In that
post, I stated that I am *in* *favor* of pointing people who ask
"newbie" questions to the FAQ's and doc's.
What I am not in favor of is sending people to these places in a rude,
condescending, insulting manner.
Consider these three possible responses to a "newbie" who posts a
frequently asked question ...
Response A:
"Is there something wrong with your eyes that you didn't read
the FAQ?"
Response B:
"Your question is a Frequently Asked Question which is answered
in the excellent FAQ, which can be found at the following URL,
among other places:
ftp://ftp.oleane.net/pub/mirrors/CPAN/doc/FAQs/FAQ/PerlFAQ.html
In order to help reduce repetition and clutter in this newsgroup,
I and many others here would appreciate it if you would please go
go to this location to get the answer to your question. Also, if
haven't already done so, please check the `news.announce.newusers'
newsgroup to familiarize yourself with the generally accepted
conventions for usenet posting."
Response C:
[ Do and say nothing, and just hit the "n" key, trusting that
this first-time poster will soon receive the auto-mini-FAQ
via email and will read it, and that he or she will soon
encounter the periodic posting of this and similar information
here in the newsgroup. ]
I contend that Response B and Response C are much more desirable than
Response A. Furthermore, I would add that I consider Response A to
be totally uncalled for.
> The whole reason people compose FAQ lists is because they're tired of
> seeing the same questions over and over and over and over and over and
> over [ ... ]
Just keep in mind that each time you see a person posting a FAQ, it is
almost always a *totally* *new* *person* doing so ... not the same
person (or small group thereof) deliberately ignoring conventions or
trying to disrupt the newsgroup by posting over and over and over and
over ...
> When people are this frustrated, one takes one's chances by pushing them
> further. This wouldn't happen if they'd wait a while before posting
> immediately.
Losing ones temper and posting something like Response A, above, does
not improve the signal-to-noise ratio here in c.l.p.misc, due to the
flames which may very well ensue. Response B and Response C work much
better.
Again, how can "newbies" who haven't heard of `news.announce.newusers'
and who haven't lurked a while in c.l.p.misc possibly know that you
and others are so frustrated in the first place? Why not just give
them the benefit of the doubt on their first-time posting and save the
angry responses for that very small minority of non-first-time posters
who ignore your pointers to the FAQ's and who persist in flouting
convention?
--
Lloyd Zusman ljz@asfast.com
perl -e '$n=170;for($d=2;($d*$d)<=$n;$d+=(1+($d%2))){for($t=0;($n%$d)==0;
$t++){$n=int($n/$d);}while($t-->0){push(@r,$d);}}if($n>1){push(@r,$n);}
$x=0;map{$x+=(($_>0)?(1<<log($_-0.5)/log(2.0)+1):1)}@r;print"$x\n"'
------------------------------
Date: Sun, 02 Aug 1998 13:42:54 GMT
From: gburnore@databasix.com (Gary L. Burnore)
Subject: Re: hiding user input
Message-Id: <35c56ccc.212283464@nntpd.databasix.com>
On 2 Aug 1998 08:27:50 GMT, in article <6q17u6$7hs$1@news.ycc.yale.edu>,
mnc@diana.law.yale.edu (Miguel Cruz) wrote:
>X-No-Archive: No
Gee Michael, looks like you forgot your comment.
--
for i in databasix primenet ; do ; gburnore@$i ; done
---------------------------------------------------------------------------
How you look depends on where you go.
---------------------------------------------------------------------------
Gary L. Burnore | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
DOH! | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3 3 4 1 4 2 ]3^3 6 9 0 6 9 ][3
spamgard(tm): zamboni | Official Proof of Purchase
===========================================================================
------------------------------
Date: 02 Aug 1998 09:52:40 -0400
From: Lloyd Zusman <ljz@asfast.com>
Subject: Re: hiding user input
Message-Id: <ltww8ro5hz.fsf@asfast.com>
gb@hugo.westfalen.de (Georg Bauer) writes:
> In article <lt1zr14kcp.fsf@asfast.com>, Lloyd Zusman <ljz@asfast.com> wrote:
>
> >But how do most "newbies" know that so many people have invested so
> >much time? Being "newbies" means that they are unfamiliar with the
> >fact that this has occurred until *after* someone points it out
> >to them. Should this pointing out be done rudely or politely?
>
> Huh? Almost _every_ newsgroup has a FAQ nowadays. Actually the existence
> of a FAQ is quite known - so why do people always ask FAQs instead of
> looking for the answer at the usual places first? And don't say that those
> newbies don't know that FAQs exist - if they don't know this simple fact,
> they shouldn't be on Usenet.
What *should* happen and what *does* happen are sometimes two
different things. The vast majority of new users coming onto usenet
do indeed read `news.announce.newusers', learn to lurk before posting,
find out about the FAQ lists, etc. That's why we don't see hundreds
of "newbie" questions every day here instead of the few that do show
up.
But with all the people who are discovering the net these days, there
are some who just "fall through the cracks" and get into usenet
without having heard of `news.announce.newusers', netiquette, FAQ
lists, etc.
These people should be made aware of netiquette and of these
resources, and when this is done, most of them "get with the program"
and gladly start to follow conventions.
There is no need to resort to rudeness or insults when pointing this
small minority of people to these resources. Save it for those who
refuse to follow convention even after being educated about it.
> [ ... ] It is ridicoulus how much people around here
> refuse to read the FAQ, refuse to read the newsgroup for some time before
> posting and refuse to use common sense to get answers to their questions,
> before posting here.
How do you know that these people "refuse" to do these things? I
contend that they are simply part of the small group who haven't yet
learned usenet conventions and haven't yet realized that FAQ's,
etc. are available.
Do you have any statistics that back up your seeming assertion that
these "newbies" know about these conventions and resources before
posting their questions here?
> [ ... ] And it is really unnerving to see how many people
> ignore the existence of the documentation and the copy of the FAQ that
> come with Perl. Actually _do_ they look into the directory of the
> installed version of Perl they just installed? It's not as if it is really
> that hard to find documentation and hints for Perl - you have to be blind
> to not see them. Makes me wonder how they actually were able to find Perl
> at all.
You're right. Some people don't do that. But even these people deserve
a polite pointer to their installed documentation instead of insults.
Furthermore, what percentage of "newbies" who are trying to use Perl
have installed it on their own machines? Many of them are just users
on systems that are maintained by others, and who are wanting to try
their hands at Perl because they heard how wonderful it is.
> No, I have no mercy for those "newbies" that refuse to use their brain.
I would be willing to bet that a majority of the "newbies" you are
referring to would happily stop posting their questions and would
gratefully read the FAQ's and `news.announce.newusers' after being
given a short, polite, respectful pointer to these resources and a
request to make use of them. No insults are necessary for these
people.
> Only difference between me and Abigail: I don't think those "newbies" are
> not worth the effort and I usually plonk them or just even don't do that.
> I don't flame them, because I think they are not worth it and in any case
> won't have enough brain to understand. And I do filter several topics so I
> don't read them, for example everything with "help" or "newbie" in the
> subject. I know that I miss good questions and answers to those by this
> method - you have to thank those ignorant wannabee-newbies for that.
In many cases, an "ignorant wannabee-newbie" can be turned into one of
the kind that you prefer simply by educating him or her about
netiquette, `news.announce.newusers', the FAQ's, etc. ... and by doing
that without gratuitous (i.e., uncalled for) insults.
> I _do_ like real newbies - those that start programming in Perl, ask
> sensible questions, try to build up their own answers, and come back when
> they solved their problem and so give back what they learned by helping
> others. Those newbies will most definitely read the FAQ and will read the
> Perl documentation and they won't ask "hey, I lost my brain, have you
> found it?"-type of questions.
>
> BTW: the existence of the FAQ is announced weekly. So you really wouldn't
> have to wait long to get knowledge of the existence of the FAQ. Even if
> you really missed the fact that it is already on your harddisc after
> installing Perl.
Well, then your approach of ignoring the "newbies" is a good one,
since after a week, the person posting the question is likely to see
the periodically posted FAQ as he or she keeps returning to this
newsgroup seeking an answer to his or her question. No insults are
necessary.
Furthermore, every time someone submits a first-time posting here,
they will receive the auto-mini-FAQ via email. Your approach of
ignoring these "newbies" seems to include trusting that the poster
will be reading the auto-mini-FAQ soon enough in his or her and
following the suggestions therein. Again, no insults are necessary.
--
Lloyd Zusman ljz@asfast.com
perl -e '$n=170;for($d=2;($d*$d)<=$n;$d+=(1+($d%2))){for($t=0;($n%$d)==0;
$t++){$n=int($n/$d);}while($t-->0){push(@r,$d);}}if($n>1){push(@r,$n);}
$x=0;map{$x+=(($_>0)?(1<<log($_-0.5)/log(2.0)+1):1)}@r;print"$x\n"'
------------------------------
Date: 30 Jul 1998 22:35:28 -0500
From: Jonathan Feinberg <jdf@pobox.com>
To: sstark@informix.com (Scott Stark)
Subject: Re: hiding user input
Message-Id: <pvemae0v.fsf@mailhost.panix.com>
sstark@informix.com (Scott Stark) writes:
> As a matter of fact I did check the faq and didn't find any such
> animal
perlfaq8 deals extensively with the various ways in which you can
manipulate the tty.
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf/
------------------------------
Date: Sun, 02 Aug 1998 13:56:33 GMT
From: gburnore@databasix.com (Gary L. Burnore)
Subject: Re: hiding user input
Message-Id: <35c66d04.212339606@nntpd.databasix.com>
On Sun, 02 Aug 1998 20:34:06 +0900, in article <35C44EAF.FCF6FD2C@m.block>,
Spam Block <sp@m.block> wrote:
>I've been following this thread with interest, and I have a suggestions:
>
>Suggestion: we need a FAQ which explains why it is abusive to respond to a
>postingt in terms like "Are you thicker than shit or can't you just read?".
That would be good. Unfortunately, new users won't know to use it to their
defense.
>
>This should then be weekly into the news group, and then if Abagail still
>doesn't take the hint we should hold a vote to see who goes over to her house
>and explain it in person.
That would be a bad thing. Some have already suggested they wish they knew
who my "employer" was so they could "get me fired" which is wrong. Going to
Abagails house would be much worse than that. USENet is NOT real life. Not
even comp groups. Those who try to make it so live in a fantasy world all
their own.
The discussions about BOTH harassing newbies and sending email have gone on
here before. The answers are always the same. It's not right to attack new
Perl users just because you're an expert and they didn't read or may not have
read the faqs. It's not proper USENEt etiquette to email someone over a
USENet post without it being requested. It's not proper net-etiquette to post
sprivate emails to USENet. It's not ethical to post articles that someone
X-No-Archived just so they'll be archived.
I said what I said to Abagail in the manner I said it to try to draw attention
to how rude it is to treat people that way. It got the attention it was
intended to get. It's got to stop. There's a brand-spanking-new moderated
group created just for such people. The argument about "well they didn't read
the faq was discussed ad-nausium. Abagail and Bacon and those who support
their kind of posts should simply post there and unsub from this group so that
the lowly almost experts, the intermediates (i consider myself one of those as
I certainly don't know near enough about Perl> and the newbies can learn
without being frightened away.
I've read this group for longer than I remember. I usually don't post here at
all. No reason to post since usually someone will have already asked a
question that I would have asked and usually several, no always several people
respond with an answer. I followed up to abigail because I'm NOT a new user
to the internet or to USENet and I'm NOT going to take any shit from anyone.
SOMEONE needed to stand up and say something about the jerkoffs who just can't
keep their mouths (keyboards> shut when they see a question that's already
been asked and can't seem to answer with a polite :check this section of that
faq: message.
So for those who want to jump in someone's shit over posts here, if you think
how abigail and her ilk do it is fine, go to .moderated. If you absoulutly
must have someone to flame, flame me. I can indeed take it and will be glad
to dish it back if need be. Leave the new posters ALONE. What the hell is so
hard about that?
--
for i in databasix primenet ; do ; gburnore@$i ; done
---------------------------------------------------------------------------
How you look depends on where you go.
---------------------------------------------------------------------------
Gary L. Burnore | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
DOH! | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3 3 4 1 4 2 ]3^3 6 9 0 6 9 ][3
spamgard(tm): zamboni | Official Proof of Purchase
===========================================================================
------------------------------
Date: 31 Jul 1998 02:30:07 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: How to match several octals in a row?
Message-Id: <6pra7f$3vt$1@client3.news.psi.net>
Michael Shavel (mshavel@erols.com) wrote on MDCCXCIV September MCMXCIII
in <URL: news:mshavel-3007981746070001@130.9.16.207>:
++
++ I am trying to create a regular expression that will match the following
++ character string. I have tried using ?: but to no avail. I need to strip
++ these characters only if they occur consecutively in this order.
++
++ $_=~s/(?:\015\040\040\040\040\031)//g;
I see nothing wrong with that regex. Of course, there's lots of redundancy.
s/\015\040\040\040\040\031//g;
would do as well. What makes you say it doesn't work? What happened, and
what were you expecting?
Abigail
--
perl -wleprint -eqq-@{[ -eqw+ -eJust -eanother -ePerl -eHacker -e+]}-
------------------------------
Date: Fri, 31 Jul 1998 13:02:12 +0100
From: Martin C Brown <mc@whoever.com>
Subject: Re: Local Perl Installation and Form Processing
Message-Id: <35C1B244.2A9FA976@whoever.com>
Bill 'Sneex' Jones wrote:
> Martin C Brown wrote:
>
> If the Perl Script is 'perl scripting' from ActiveState, you can :)
True, but I don't remember seeing an OS, and...
> You can tell Winders to associate the perl script with an action,
> like execute the ActiveState interpreter, and bam! Instant
> security hole :)
Even on a local machine, I hate security bugs :))
MC
------------------------------
Date: Thu, 30 Jul 1998 22:24:26 -0400
From: "Matthew O. Persico" <mpersico@erols.com>
Subject: Re: non-perl question about linux
Message-Id: <35C12ADA.4EC0622F@erols.com>
Brent Verner wrote:
>
> hey, i'm sorry if this non-perl question offends you, but i have a great
> amount of respect for some of the regular posters, and their opinions would
> be appreciated on this matter -- i know i'm wrong, so please don't waste any
> more space by flaming this post.
If you are wrong you should not do something. That is silly. What you
should do is re-phrase the question so that you get past the wall of
flame:
"I'm going to leave the perl/win32 world for perl/linux. I'd like to
know if there are any strong preferences as to which Linux distribution
is the best platofrm for running Perl."
That might keep you cooler.
As for me, I only know Redhat. I like it.
------------------------------
Date: Sun, 02 Aug 1998 05:30:40 -0700
From: Thomas Albech <thomas@provideo.dk>
Subject: Perl interface to PostgreSQL?
Message-Id: <35C45BEF.35969C38@provideo.dk>
Hi everyone,
I'm trying to look a bit into creating databases accessible through a
web browser. I came across the PostgreSQL database. Doe's anyone know
how the PostgreSQL interface works with Perl? Is there a better
alternative (database)? If so, where can it be found. I've read in the
Learning Perl, that ordinary DBM databases shouldn't contain more than
1000 records. Is this only when we are talking about databases accessed
on your local harddrive (because of the lack of speed) or is it simply
the way that Perl handles the DBM files, which is not good?
Thanx,
Thomas
--
Product Specialist, Alias|Wavefront Assist Denmark
PowerAnimator Level 2 -- Maya Caracter Animation
--------------------------------------------------
Crystal Graphics Tel. +45 54 70 71 10
Guldborgvej 3 Mob. +45 20 40 12 03
DK-4990 Sakskxbing Fax. +45 54 70 03 10
Denmark email: thomas@provideo.dk
------------------------------
Date: Sun, 02 Aug 1998 15:53:53 +0200
From: Thomas Jespersen <thomas@daimi.aau.dk>
Subject: Re: Perl interface to PostgreSQL?
Message-Id: <35C46F71.4D1D0988@daimi.aau.dk>
Thomas Albech wrote:
>
> Hi everyone,
> I'm trying to look a bit into creating databases accessible through a
> web browser. I came across the PostgreSQL database. Doe's anyone know
> how the PostgreSQL interface works with Perl? Is there a better
Go to CPAN, and get DBD-Pg and DBI
------------------------------
Date: Sun, 2 Aug 1998 07:22:37 -0500
From: R Frank Louden <flouden@netusa1.net>
Subject: Perl/Linux/Database???
Message-Id: <Pine.LNX.3.96.980802070608.2465A-100000@fairfield.home.sweet.net>
I am wanting to build a database and don't know which way to go. I am
kinda new to Linux and Perl. This seems to me to be the best way to go
but I am also gonna need to be able to run this data app. on MS
Windows machines. I know Perl is available for MS Windows so it seems
to me that any code written on my Linux box ought to port fairly
easily to a Win machine. I have been struggling with coding this in C
(also new to me) and the development time is taking too long.
The database will store mostly text concerned with auctions. I want to
be able to have a resource database of items that frequently show up
in the auction so the db app user doesn't always have to type in an
entire item so I need a way to search through the item list based on
partial entries by the user and then offer them a list of possible
matches to choose from based on their partial input. I also want to
store the auction attendees data for repeated use as it is the same
people showing up at auction after auction.
Each auction event can be kept in it's own directory for historical
reference.
OK, I hope this gives you some idea of what I am wanting to do. Now
here are my questions...
1. Is Perl a good language to use?
2. Is it easy to port to MS Windows?
3. Is there a good reference book I can get to help with this
database?
Thank you for any responses you might have the time to make.
+-----------------+------------+---------------------------------------+
| R. Frank Louden | AKA #07581 | e-mail: flouden@netusa1.net |
| | | HomePage: www.netusa1.net/~flouden |
+-----------------+------------+---------------------------------------+
------------------------------
Date: Sun, 02 Aug 1998 08:00:49 -0700
From: Thomas Albech <thomas@provideo.dk>
Subject: Re: Perl/Linux/Database???
Message-Id: <35C47F20.F4462373@provideo.dk>
R Frank Louden wrote:
> I am wanting to build a database and don't know which way to go. I am
> kinda new to Linux and Perl. This seems to me to be the best way to go
> but I am also gonna need to be able to run this data app. on MS
> Windows machines. I know Perl is available for MS Windows so it seems
> to me that any code written on my Linux box ought to port fairly
> easily to a Win machine. I have been struggling with coding this in C
> (also new to me) and the development time is taking too long.
>
> The database will store mostly text concerned with auctions. I want to
> be able to have a resource database of items that frequently show up
> in the auction so the db app user doesn't always have to type in an
> entire item so I need a way to search through the item list based on
> partial entries by the user and then offer them a list of possible
> matches to choose from based on their partial input. I also want to
> store the auction attendees data for repeated use as it is the same
> people showing up at auction after auction.
>
> Each auction event can be kept in it's own directory for historical
> reference.
>
> OK, I hope this gives you some idea of what I am wanting to do. Now
> here are my questions...
>
> 1. Is Perl a good language to use?
>
> 2. Is it easy to port to MS Windows?
>
> 3. Is there a good reference book I can get to help with this
> database?
>
> Thank you for any responses you might have the time to make.
>
> +-----------------+------------+---------------------------------------+
> | R. Frank Louden | AKA #07581 | e-mail: flouden@netusa1.net |
> | | | HomePage: www.netusa1.net/~flouden |
> +-----------------+------------+---------------------------------------+
Hi Frank,
I've been looking into the PostgreSQL database lately. This seems to me as
a good entry to database programming. This program can be downloaded
freely. I believe it can be downloaded from any major Linux site. This will
require a UNIX machine to handle the database itself, but different kind of
SQL compatible clients can access it through the network. I'm working on a
similar database, where the clients are web browsers. I've read something
about a Perl interface somewhere. Actually I've just asked the news group
about this interface.
I hope this gives you a place to start.
Cheers,
Thomas
--
Product Specialist, Alias|Wavefront Assist Denmark
PowerAnimator Level 2 -- Maya Caracter Animation
--------------------------------------------------
Crystal Graphics Tel. +45 54 70 71 10
Guldborgvej 3 Mob. +45 20 40 12 03
DK-4990 Sakskxbing Fax. +45 54 70 03 10
Denmark email: thomas@provideo.dk
------------------------------
Date: Sun, 02 Aug 1998 08:04:20 -0700
From: Thomas Albech <thomas@provideo.dk>
Subject: Re: Perl/Linux/Database???
Message-Id: <35C47FF4.D8CAA40E@provideo.dk>
R Frank Louden wrote:
> I am wanting to build a database and don't know which way to go. I am
> kinda new to Linux and Perl. This seems to me to be the best way to go
> but I am also gonna need to be able to run this data app. on MS
> Windows machines. I know Perl is available for MS Windows so it seems
> to me that any code written on my Linux box ought to port fairly
> easily to a Win machine. I have been struggling with coding this in C
> (also new to me) and the development time is taking too long.
>
> The database will store mostly text concerned with auctions. I want to
> be able to have a resource database of items that frequently show up
> in the auction so the db app user doesn't always have to type in an
> entire item so I need a way to search through the item list based on
> partial entries by the user and then offer them a list of possible
> matches to choose from based on their partial input. I also want to
> store the auction attendees data for repeated use as it is the same
> people showing up at auction after auction.
>
> Each auction event can be kept in it's own directory for historical
> reference.
>
> OK, I hope this gives you some idea of what I am wanting to do. Now
> here are my questions...
>
> 1. Is Perl a good language to use?
>
> 2. Is it easy to port to MS Windows?
>
> 3. Is there a good reference book I can get to help with this
> database?
>
> Thank you for any responses you might have the time to make.
>
> +-----------------+------------+---------------------------------------+
> | R. Frank Louden | AKA #07581 | e-mail: flouden@netusa1.net |
> | | | HomePage: www.netusa1.net/~flouden |
> +-----------------+------------+---------------------------------------+
I just found the URL http://www.postgresql.org/
Thomas
--
Product Specialist, Alias|Wavefront Assist Denmark
PowerAnimator Level 2 -- Maya Caracter Animation
--------------------------------------------------
Crystal Graphics Tel. +45 54 70 71 10
Guldborgvej 3 Mob. +45 20 40 12 03
DK-4990 Sakskxbing Fax. +45 54 70 03 10
Denmark email: thomas@provideo.dk
------------------------------
Date: Sun, 02 Aug 1998 15:58:31 +0200
From: Thomas Jespersen <thomas@daimi.aau.dk>
Subject: Re: Perl/Linux/Database???
Message-Id: <35C47087.1328D012@daimi.aau.dk>
R Frank Louden wrote:
> 1. Is Perl a good language to use?
Sure perl is excellent to manipulate with such files.
> 2. Is it easy to port to MS Windows?
Yes
> 3. Is there a good reference book I can get to help with this
> database?
I recommend "Learning Perl".
Also look at:
http://www.cgi-resources.com/Programs_and_Scripts/Perl/Auctions/
Maybe some of these scripts are adequate for you.
------------------------------
Date: 2 Aug 1998 12:06:36 GMT
From: gabor@vmunix.com (Gabor)
Subject: Re: Power (ie C's 4^7)
Message-Id: <slrn6s8lmv.80.gabor@guava.vmunix.com>
In comp.lang.perl.misc, Thomas van Gulick <melkor@valimar.middle.earth> wrote :
# I couldn't find it in the perlop pages so I'll try here, is there some sort
# of power function in perl ala the ^ operator in C, or do I have to do it all
# myself?
You must be programming in some special version of C. ^ is bitwise
exclusive OR. 4 ^ 7 == 3. However, there is such an operator in perl,
but you'll learn more by finding it yourself in the docs that came with
perl. ;)
------------------------------
Date: Sun, 02 Aug 1998 15:21:43 +0200
From: Thomas Jespersen <thomas@daimi.aau.dk>
Subject: Re: Power (ie C's 4^7)
Message-Id: <35C467E7.E710B814@daimi.aau.dk>
Thomas van Gulick wrote:
>
> I couldn't find it in the perlop pages so I'll try here, is there some sort
> of power function in perl ala the ^ operator in C, or do I have to do it all
> myself?
In perl you can write a^b as:
a**b
------------------------------
Date: Fri, 31 Jul 1998 20:53:49 +0200
From: jan.dubois@ibm.net (Jan Dubois)
Subject: Re: printed & bound perl 5.005 manuals?
Message-Id: <35c610a4.132909293@news2.ibm.net>
[mailed & posted]
karl@gnu.org wrote:
>I was hoping most for pod2texinfo since then everything would come out
>right and I could more easily read it online as well. Sigh. If anyone
>has a Texinfo version of 5.005, I'd love to know about it.
My inbox contains a message by <krishpl@shamu.engr.sgi.com> promising a
new version (of pod2texi and also the converted docs) as soon as 5.005 is
out. So keep a watch on the RECENT file on CPAN. :-)
-Jan
------------------------------
Date: Sun, 02 Aug 1998 09:39:51 GMT
From: "Jonah Olsson" <jonah@g-s.net>
Subject: Re: Printing letters
Message-Id: <HtWw1.920$JR2.1429200@nntpserver.swip.net>
>Yay for checking the return value of open! It will be even more useful
>if you change it to:
>
>open (FILE, "$fil") || die "Can't open $file: $!\n";
I use that too.
>> Then let say I want to print out the file letter by letter and not line
by
>> line as you usually do. I just can't get that work.
>
>Do you want to print each letter on a separate line, or pause after
>printing each letter, or what?
I don't know yet. It's for a news feed on a webpage.
>Either way, since you're not concerned with the original line breaks,
>you should read the file into a string instead of an array:
>
>{
>local $/;
>$contents = <FILE>;
>}
Didn't think of that. It makes it much easier!
>For the former, you could use substr and print each character followed
>by a newline:
>
>for ($i=0; $i<length $contents; ++$i) {
> print substr($contents, $i, 1), "\n";
>}
>
>For the latter, you could use substr and print each character, then
>sleep for a brief period:
>
>for ($i=0; $i<length $contents; ++$i) {
> print substr($contents, $i, 1);
> sleep 1;
>}
>
>
>Are either of those what you had in mind?
Yes, I was actually looking for a way to stop the feed after about 100
letters, and I can do that with this code.
Thanks for you help Ronald!
--
Regards,
Jonah Olsson
Generation Software
http://www.g-s.net
------------------------------
Date: 30 Jul 1998 23:28:24 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: reading a file listing?
Message-Id: <6pqvio$5gu$4@nswpull.telstra.net>
In article <6pku5g$3j9$1@nnrp1.dejanews.com>,
salvador@my-dejanews.com writes:
> try replacing the foreach sentence with
>
> foreach $files (eval $Filepattern) {
> ...
> }
That is horrible. Why would you do that if a simple glob will work?
Why would you want to include operators in variables which you then
have to run through eval, when it's just as simple, and 100 times more
readable to just put the pattern in the variable, and the operators
outside of it.
$fp = '123.txt*';
foreach (glob $fp)
{
}
Avoid eval. It can be evil.
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | "In a world without fences,
Commercial Dynamics Pty. Ltd. | who needs Gates?"
NSW, Australia |
------------------------------
Date: 29 Jul 1998 20:56:15 GMT
From: imkirnos@CS.Princeton.EDU (Ilya M. Kirnos)
Subject: serialization and perl
Message-Id: <6po29f$ov5$1@cnn.Princeton.EDU>
Does perl have any facilities for writing out/reading in perl data
structures, e.g. hashes? I'm looking for something akin to serialization
in java. Thanks.
-ilya
------------------------------
Date: Sun, 02 Aug 1998 20:46:55 +0900
From: Spam Block <sp@m.block>
Subject: Re: write file in htdocs directory
Message-Id: <35C451B0.B1CA2203@m.block>
Check if the Apache server is running the CGI wrapper programm, in which case
you'll probably have to use the shell path - www.web.server/users/your directory
> >Can anyone tell me how (if it is possible) to write into the html
> >documents directory (htdocs) from a perl program on an Apache server?
> >Is it a permission thing? I've tried using "../htdocs/" to get into
> >the directory and also "http://www.myplace.com/" but it doesn't like
> >that either.
> >
> >My purpose is that I would like to create static HTML documents based
> >on User input.
> >
> >Thanks (especially as this is such a basic question),
> >
> >
> >Chris Clarke
>
> --
> Kelly William Hirano Stanford Athletics:
> hirano@cs.stanford.edu http://www.gostanford.com/
> hirano@alumni.stanford.org (WE) BEAT CAL (AGAIN)! 100th BIG GAME: 21-20
------------------------------
Date: 12 Jul 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 Mar 98)
Message-Id: <null>
Administrivia:
Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.
If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu.
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 3318
**************************************
