[9279] in Perl-Users-Digest
Perl-Users Digest, Issue: 2874 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Jun 15 09:17:13 1998
Date: Mon, 15 Jun 98 06:00:57 -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 Mon, 15 Jun 1998 Volume: 8 Number: 2874
Today's topics:
Re: [Q] Help creating a perl cgi script - word1.txt [ (Tad McClellan)
Re: Bug? Why is this... (Ilya Zakharevich)
Re: CFV: comp.lang.perl.moderated moderated (Chip Salzenberg)
Re: CFV: comp.lang.perl.moderated moderated (John Stanley)
Re: diff-like utility in Perl? (Tim Bunce) (Tim Bunce)
Re: Have we got a good free Perl manual? <dak@mailhost.neuroinformatik.ruhr-uni-bochum.de>
Re: Have we got a good free Perl manual? <pas@unh.edu>
Help With Perl On UNIX to MS-SQL on NT (Neville Jennings)
how to create a bidirectional pipe? (GEMINI)
Re: how to create a bidirectional pipe? (Tad McClellan)
Re: How to do a non-numeric sort of a hash? (Tad McClellan)
Re: I have looked everywhere! <chrisnb@wenet.net>
Re: ibm aix rs 6000 & Perl (Tad McClellan)
Re: Information needed! (Florian Kuehnert)
Re: Information wanted (Tad McClellan)
Re: Information wanted <trung.tranduc@prague.ixosY.cz>
Re: Information wanted (Michael J Gebis)
MAPI commands <guillaume@deepend.co.uk>
Re: MODERATION: Time to Vote (Chip Salzenberg)
Re: MODERATION: Time to Vote (John Stanley)
Re: Need a jumpstart with creating csv (Tad McClellan)
Remove repeats script in Perl (Kristien)
Re: REVIEW: Perl CGI Programming - No Experience Requir jon@amxdigital.com
Re: REVIEW: Perl CGI Programming - No Experience Requir (Michael J Gebis)
SQL Server and Win 32 ODBC Problem vinod@surya.rws.soft.net
strange error message .. "value of <handle> ..." (Byron Jones)
Re: strange error message .. "value of <handle> ..." (Michael J Gebis)
Re: strange error message .. "value of <handle> ..." (Allan M. Due)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 15 Jun 1998 00:00:42 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: [Q] Help creating a perl cgi script - word1.txt [1/1]
Message-Id: <qp92m6.oug.ln@localhost>
anonymous (anonymous@nouce.net) wrote:
: I like to know if someone might be able to help me write a simple
: perl cgi script
: that when a person goes to a pull down menu he/she will be able to
: have 5 choses from
Yes.
Someone might be able to do that.
: Any help or suggestions would be appreciated
1) Follow usual Usenet convention and wordwrap at 70-72 characters
like everybody else does
2) Put an actual subject in your Subject: header
3) My name is Tad. What's yours?
4) Post your code. We like code here.
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: 15 Jun 1998 08:39:05 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Bug? Why is this...
Message-Id: <6m2mj9$o17$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was NOT sent to Ilya Zakharevich
<ilya@math.ohio-state.edu>],
who wrote in article <6m1tfg$6u7$1@mathserv.mps.ohio-state.edu>:
> > ($a, $b, $c) = split ('\t', "blah blah blah");
> > print "$a $b $c\n";
>
> To me it looks like a bug in a RE engine.
>
> split '\t', EXPR;
>
> should be equivalent to
>
> split /\\t/, EXPR;
>
> Is it? What am I missing?
OK, here is the top 30% of the solution: regexp-quotish context does
not interpolate \t and friends, thus the RE engine sees '\t' when
given /\t/. Thus
split /\t/, EXPR;
is equivalent to
split '\t', EXPR;
which is, by definition, equivalent to
$re = '\t';
split /$re/o, EXPR;
Hope this helps,
Ilya
P.S. With (future?) 5.004_67 one can deduce the above by something
like
perl -le 'print study /\t/';
This is not going to be a supported way to do things, just a stopgap
until
print qr/\t/;
------------------------------
Date: Mon, 15 Jun 1998 03:01:16 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: CFV: comp.lang.perl.moderated moderated
Message-Id: <6m22sp$g55$1@cyprus.atlantic.net>
According to stanley@skyking.OCE.ORST.EDU (John Stanley):
>Oops, moderator shows lack of knowledge of netiquette. It is considered
>rude to redirect followups without saying so in your message.
Not all netiquette rules are created equal. The redirect 'rule'
you refer to does not have the same universality as, say, properly
attributing quotations. (I, for example, don't worry about it.)
But I must wonder why you now consider putative inexperience as
newsworthy. Do you mean to imply more than you are willing to say?
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
"I brought the atom bomb. I think it's a good time to use it." //MST3K
-> Ask me about Perl training and consulting <-
Like Perl? Want to help out? The Perl Institute: www.perl.org
------------------------------
Date: 15 Jun 1998 06:16:07 GMT
From: stanley@skyking.OCE.ORST.EDU (John Stanley)
Subject: Re: CFV: comp.lang.perl.moderated moderated
Message-Id: <6m2e77$nhl$1@news.NERO.NET>
In article <6m22sp$g55$1@cyprus.atlantic.net>,
Chip Salzenberg <chip@mail.atlantic.net> wrote:
>Not all netiquette rules are created equal.
They are, however, all "netiquette rules".
>But I must wonder why you now consider putative inexperience as
>newsworthy. Do you mean to imply more than you are willing to say?
It was "newsworthy" enough to include as moderation criteria. I must now
wonder why you now consider it un-newsworthy. Or do you mean to imply
more than you are willing to say?
------------------------------
Date: Sat, 13 Jun 1998 14:45:50 GMT
From: Tim.Bunce@ig.co.uk (Tim Bunce) (Tim Bunce)
Subject: Re: diff-like utility in Perl?
Message-Id: <EuHvoE.2Iq@ig.co.uk>
In article <lt7m2mayai.fsf@asfast.com>, Lloyd Zusman <ljz@asfast.com> wrote:
> Tom Christiansen <tchrist@mox.perl.com> writes:
>
> > [courtesy cc of this posting sent to cited author via email]
> >
> > In comp.lang.perl.misc,
> > Lloyd Zusman <ljz@asfast.com> writes:
> > :I know of no such Perl-based `diff', but perhaps someone out there has
> > :invented such a thing without having posted it to CPAN.
> >
> > Is there a Perl-based netstat? Or ps? Or vi?
>
> Probably not, but there is a Perl-based `find', a Perl-based `grep', a
> Perl-based `tail', a Perl-based `whois', a Perl-based `lex', a
> Perl-based `telnet', a Perl-based `ftp', a Perl-based `mv', a
> Perl-based `cp', a Perl-based `rm' ... etc. ...
>
> Therefore, it's perfectly reasonable for someone to wonder if perhaps
> there might also be a Perl-based `diff' out there somewhere.
And a perl implementation of an n-way merge (related to diff) would
possibly be a useful way of approaching the "Puzzle challenge" I've
posted elsewhere in the newsgroup.
Tim.
------------------------------
Date: 15 Jun 1998 11:35:21 +0200
From: David Kastrup <dak@mailhost.neuroinformatik.ruhr-uni-bochum.de>
Subject: Re: Have we got a good free Perl manual?
Message-Id: <m23ed73t46.fsf@mailhost.neuroinformatik.ruhr-uni-bochum.de>
lehman@visi.com (Todd Lehman) writes:
> Barry Margolin <barmar@bbnplanet.com> writes:
> > Well, the words he often chooses are easily misinterpreted. For instance,
> > his references to the existing Perl documentation said, "but they were no
> > good because they weren't free." By "no good" he meant "not acceptable" or
> > "not appropriate", but it's easy to understand why people would interpret
> > it as "not good" == "bad".
>
> Is that sort of thing intentional or is he just a crummy writer? Or does
> he expect all readers to speak his dialect of English? Curious,
In most dialects of literate English there is a distinction between
"no good" and "not good".
--
David Kastrup Phone: +49-234-700-5570
Email: dak@neuroinformatik.ruhr-uni-bochum.de Fax: +49-234-709-4209
Institut f|r Neuroinformatik, Universitdtsstr. 150, 44780 Bochum, Germany
------------------------------
Date: 15 Jun 1998 12:43:48 GMT
From: Paul A Sand <pas@unh.edu>
Subject: Re: Have we got a good free Perl manual?
Message-Id: <6m34u4$ohq@mozz.unh.edu>
David Kastrup <dak@mailhost.neuroinformatik.ruhr-uni-bochum.de> writes:
>In most dialects of literate English there is a distinction between
>"no good" and "not good".
Not that anyone asked me, but to reproduce the full sentence from
the task list:
(There are proprietary books, but these are no good, because they
are being withheld from our community by their owners.)
It's reasonable--and certainly not at all ``wild'' or illiterate--to
read ethical judgment into the sentence quoted above. The us-vs-them
phrasing following the ``no good'' judgment certainly encourages it.
Add that to the fact that the Perlfolk are the only ones singled out on
the list as `withholders', and you get a whiff of really specific
moralistic finger-pointing.
Is there some reason to pretend that RMS *doesn't*, at base, view this
as a moral issue? I suppose it's easy to forget that, or not know it in
the first place. A few weeks back, Barry Margolin reminded me (gently)
that:
In RMS's ideal world, people wouldn't feel the need to own
software, so they wouldn't consider the above right an interesting
thing to have. Just as 200 years ago slavery was considered normal
by many people, but now it's considered abhorent. RMS wishes for a
society in which intellectual property is considered as wrong as
human property.
Pragmatic considerations and arguments are always present, of course,
but it would be surprising if moralistic language *didn't* rear its
head here and there. Not that there's anything inappropriate in that,
given the apparent grave seriousness with which RMS imbues the issue.
(If anything, I would wish that the ethical argument be made more
upfront than it is, people would be less confused about the ethical
bases upon which RMS is proceding.)
--
-- Paul A. Sand | Don't believe anything you hear
-- University of New Hampshire | or anything you say.
-- pas@unh.edu |
-- http://pubpages.unh.edu/~pas |
------------------------------
Date: Mon, 15 Jun 1998 10:25:29 GMT
From: nj2@soton.ac.uk (Neville Jennings)
Subject: Help With Perl On UNIX to MS-SQL on NT
Message-Id: <3584f2c5.177411581@news.soton.ac.uk>
Can anyone give any information to help with the following :
I want to be able to communicate with an MS-SQL Server running under
NT from perl scripts running on a Solaris box.
I have found what I think is a possible route to do this from the UNIX
end
Perl DBI Modules
|
|
Perl DBD::ODBC Modules
|
|
Solaris ODBC Driver Manager (From Intersolv)
|
|
Solaris MS-SQL ODBC Driver (DataDirect/Intersolv)
Given that the MS-SQL Server on NT and Perl on Unix(Solaris) are
unalterable factors:
1. Can anyone confirm that the above is a correct method ?
2. Does anyone know of a (better) alternative ?
3. Does anyone know of any source of alternative OBDC driver managers
and MS-SQL drivers for UNIX (Solaris)
4. Are there any free MS-SQL ODBC drivers for Solaris
5. Do I need anything extra at the MS-SQL end to make the above work ?
Any concrete suggestions would be appreciated.
---
Neville
------------------------------
Date: 15 Jun 1998 05:37:30 GMT
From: dennis@info4.csie.nctu.edu.tw (GEMINI)
Subject: how to create a bidirectional pipe?
Message-Id: <6m2buq$9dr$2@netnews.csie.NCTU.edu.tw>
hi all,
in my perl program, I'd like to build
a bidirectional pipe with another program.
but I only know how to create one-direction pipe by
"| prog" or "prog |".
In another word, I wish to read another program's output by
<P>, and to generate another program's input by print P...
anybody knows the solution?
thanks.
p.s. please reply me by mail directly if possible,
I haven't too much chance to read News.
------------------------------
Date: Mon, 15 Jun 1998 01:01:23 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: how to create a bidirectional pipe?
Message-Id: <jbd2m6.u8h.ln@localhost>
GEMINI (dennis@info4.csie.nctu.edu.tw) wrote:
: in my perl program, I'd like to build
: a bidirectional pipe with another program.
: In another word, I wish to read another program's output by
: <P>, and to generate another program's input by print P...
: anybody knows the solution?
This is a Frequently Asked Question.
"How can I open a pipe both to and from a command?"
: p.s. please reply me by mail directly if possible,
: I haven't too much chance to read News.
You haven't much chance of getting your Frequently Asked
Question answered then either...
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 15 Jun 1998 00:40:21 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: How to do a non-numeric sort of a hash?
Message-Id: <54c2m6.v4h.ln@localhost>
Jeffery Cann (jc_cann@ix.netcom.com) wrote:
: When I use the following code to numerically sort the hash by value:
^^^^^^^^^^^
^^^^^^^^^^^
: foreach $key (sort { $hash{$b} cmp $hash{$a} } keys %hash) {
^^^
^^^
cmp compares *strings*
<=> compares *numbers*
: How can I sort correcly this data by the hash value?
By using the correct comparison operator ;-)
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 15 Jun 1998 00:27:04 -0700
From: "Chris Burbridge" <chrisnb@wenet.net>
Subject: Re: I have looked everywhere!
Message-Id: <6m2iai$af9$1@its.hooked.net>
I'm not sure if this is relevant, but you could use the OLE module to get
Access to do what you want (like saving to CSV), if nothing else.
Jeremy D. Zawodny wrote in message ...
>Chris Denman <chris@microdeal.co.uk> writes:
>
>> How can I get live data from a Microsoft Access database file?
>
>Use Access, maybe?
>
>> Are there any conversion files that can turn an Access file to
>> flatbase?
>
>You can probably export from Access to CSV.
>
>> This way every 1000 accesses to my perl would
>> instigate this conversion utility and then read the ascii stuff.
>
>> I would we well happy if someone could help me out.
>
>You could just use ADO via Perl for Win32. I've done that before and
>it works quite well. But that's really an ADO issue, and not a Perl
>issue.
>
>Jeremy
>--
>Jeremy D. Zawodny Web Geek, Perl Hacker, etc.
>http://www.wcnet.org/~jzawodn/ jzawodn@wcnet.org
>
>LOAD "LINUX",8,1
------------------------------
Date: Mon, 15 Jun 1998 00:17:25 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: ibm aix rs 6000 & Perl
Message-Id: <5pa2m6.t1h.ln@localhost>
ELSS Admin (elssa09@callisto.si.usherb.ca) wrote:
: I may have the wrong group - tell me which is teh correct one - if I am
: not in the right place.
comp.infosystems.www.advocacy
comp.infosystems.www.announce
comp.infosystems.www.authoring.cgi
comp.infosystems.www.authoring.html
comp.infosystems.www.authoring.images
comp.infosystems.www.authoring.misc
comp.infosystems.www.browsers.mac
comp.infosystems.www.browsers.misc
comp.infosystems.www.browsers.ms-windows
comp.infosystems.www.browsers.x
comp.infosystems.www.misc
comp.infosystems.www.servers.mac
comp.infosystems.www.servers.misc
comp.infosystems.www.servers.ms-windows
comp.infosystems.www.servers.unix
comp.infosystems.www.providers
comp.infosystems.www
comp.infosystems.www.users
: I was told I could program my own system messages,
*Some* people can program their own system messages.
I think you have to hack at the kernel for that though...
: say if someone visits
: my site
If "site" is short for "web site" then you do indeed have
the wrong newsgroup as this one is about Perl. The ones
listed above are about web stuff.
: and tries to open a page that does not exist.
How your system handles page faults is dependant on the
Operating System.
I don't know how AIX deals with them.
: I was also told it had something to do with Perl!!??
Or C.
Or sh.
Or Visual Basic.
Or ...
: Seems ridiculous.
I think so too.
: I'm on an IBM AIX rs 6000 server
Perl does not have a server.
Yet another indication that you have the wrong newsgroup.
: Please mail replies
You gotta be kidding, right?
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: 15 Jun 1998 11:41:46 GMT
From: sutok@gmx.de (Florian Kuehnert)
Subject: Re: Information needed!
Message-Id: <slrn6oa23p.45t.sutok@babelon.in-brb.de>
luong@my-dejanews.com schrieb/wrote/icrivait/ha scritto:
>Could anybody tell me where on the Internet that I can find documentation of
>Perl for Win 32, and where I can download perl modules.
http://www.perl.com
Florian
--
"Warum kostet Linux nichts?
Warum gibt es kein einheitliches Frontend?"
-- aus "Wie starte ich einen Endlos-Thread?", Teil 1327
(Holger Schauer in dcolm)
------------------------------
Date: Mon, 15 Jun 1998 00:25:48 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Information wanted
Message-Id: <s8b2m6.t1h.ln@localhost>
luong@my-dejanews.com wrote:
: Could anybody tell me where on the Internet that I can find the documentation
: of Perl for Win 32 and where I can download the perl modules.
There is a new and wonderful Internet service known as the World
Wide Web.
It is all pointy clicky and easy to use.
There are these things called "search engines" there that, well,
... search for stuff.
Maybe you should try one of those (like the one you posted from...)
: Thanks.
Yeah, right.
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: 15 Jun 1998 09:23:54 +0200
From: Trung Tran-Duc <trung.tranduc@prague.ixosY.cz>
Subject: Re: Information wanted
Message-Id: <u3ed7xh4l.fsf@prague.ixosY.cz>
luong@my-dejanews.com writes:
> Could anybody tell me where on the Internet that I can find the documentation
> of Perl for Win 32 and where I can download the perl modules.
www.perl.com
--
Trung Tran-Duc
To reply by e-mail, remove the 'Y' from my address.
------------------------------
Date: 15 Jun 1998 04:40:17 GMT
From: gebis@albrecht.ecn.purdue.edu (Michael J Gebis)
Subject: Re: Information wanted
Message-Id: <6m28jh$6up@mozo.cc.purdue.edu>
luong@my-dejanews.com writes:
}Could anybody tell me where on the Internet that I can find the documentation
}of Perl for Win 32 and where I can download the perl modules.
}Thanks.
In the version of netscape you're using, you can probably go the the
"Go to:" box and type "perl". Those behind firewalls might have to
type "perl.com" but it could hardly be much easier. Really pedantic
folks might have to type "http://www.perl.com/".
Unfortunately, I now answered your question, and you have a debt
until _you_ help out someone in need. Seems like a pretty lame
question to go into debt over, but that was your decision, not mine.
Homer: So you're selling what?
Apu: Karmic realignment.
Homer: You can't sell that. Karma can only be apportioned by the universe.
Good luck.
--
Mike Gebis gebis@ecn.purdue.edu mgebis@eternal.net
------------------------------
Date: Mon, 15 Jun 1998 13:07:08 +0100
From: Guillaume Buat-Menard <guillaume@deepend.co.uk>
Subject: MAPI commands
Message-Id: <35850E6C.63E7B75A@deepend.co.uk>
Hi,
I'm don't use MAPI but I'm using Perl scripts on a site hosted on a NT
server.
I have to put this up a soon as possible and I need to know the command
and the
options for MAPI. I'm trying to find something in the NT help but its
really a
waiste of time.
If somebody can give me an example with 'from', 'to', 'subject' and
'content'
options ...
Thanks,
Guillaume.
------------------------------
Date: Mon, 15 Jun 1998 03:03:55 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: MODERATION: Time to Vote
Message-Id: <6m231p$g5r$1@cyprus.atlantic.net>
According to stanley@skyking.OCE.ORST.EDU (John Stanley):
>It does my heart good to find yet another person who would rather let
>other people tell him how to judge someone than judge for himself.
Can you say, "opportunity cost"?
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
"I brought the atom bomb. I think it's a good time to use it." //MST3K
-> Ask me about Perl training and consulting <-
Like Perl? Want to help out? The Perl Institute: www.perl.org
------------------------------
Date: 15 Jun 1998 06:19:32 GMT
From: stanley@skyking.OCE.ORST.EDU (John Stanley)
Subject: Re: MODERATION: Time to Vote
Message-Id: <6m2edk$ni2$1@news.NERO.NET>
In article <6m231p$g5r$1@cyprus.atlantic.net>,
Chip Salzenberg <chip@mail.atlantic.net> wrote:
>Can you say, "opportunity cost"?
Sure. Or do you mean to imply more than you are willing to say? Maybe
"it's a GOOD thing to let other people tell you what your opinions should
be"?
------------------------------
Date: Mon, 15 Jun 1998 00:37:03 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Need a jumpstart with creating csv
Message-Id: <vtb2m6.v4h.ln@localhost>
Barry Ringuet (ringuetb@ix.netcom.com) wrote:
: I'd like to take the contents of a text file and write it to a
: comma-delimited file. Don't know where to begin.
Begin by reading the copious documentation that is included
with every proper perl distribution.
When you have some code, post it here to get help.
: Pls post to this newsgroup or e-mail to barry.ringuet@piog.com
Hmmm.
What third alternative are you trying to rule out there?
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 15 Jun 1998 12:23:45 GMT
From: subscriber@lhs.be (Kristien)
Subject: Remove repeats script in Perl
Message-Id: <3585113e.835562@news.alt.net>
Hi!
This is the first time I post a message in this newsgroup. Sorry if I
am breaking any rules. My question is, does anyone know how to write a
script in Perl that removes blocks of repeated texts in huge text
files (of about 30 MB or more)? I am currently using a C script, but
it isn't working 100 %, and we's like to try it in Perl, but some
people here think that such a Perl script will tke up too much memory,
because it is such a memory-consuming operation.
Thank you very much!
Kristien
------------------------------
Date: Mon, 15 Jun 1998 08:06:08 GMT
From: jon@amxdigital.com
Subject: Re: REVIEW: Perl CGI Programming - No Experience Required
Message-Id: <6m2klg$kgb$1@nnrp1.dejanews.com>
In article <6m0sod$6n1$1@justus.ecc.lu>,
> > I wish I understood why no one understands this.
> the confusion stems from the
> fact that most Perl programmers don't know enough about
> interpreter/compiler construction to even moderately understand
> the innards of Perl - which is as it should be.
>
> <flame bait>
> The awful^H^H^H^H^Hflexible syntax doesn't help either;
> Perl can be more arcane than LISP and C++ combined ;-)
> </flame bait>
Most people who speak English don't know what a subjunctive is, and sometimes
fail to use it when they ought to, or use it wrongly. Generally they get away
with it because we all know what they mean. If they are lawyers or
philosophers they don't get away with it because both those arts require very
precise terms of expression. This does not make subjunctives evil things that
exist only so that black hearted lawyers can pour scorn on the attempts of
the common man to draft his own legal defence. Many people who program Perl
don't know the difference between a list and an array. Generally they get
away with it because Perl knows what they mean. If they are doing something
with references they don't get away with it because references are
complicated things that require very precise terms of expression. This does
not make lists, or arrays, or array contexts evil things created by LISP
programmers to confuse unwitting Basic and C programmers.
P.S. What I have written may, or may not, be complete sophistry.
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: 15 Jun 1998 04:27:17 GMT
From: gebis@albrecht.ecn.purdue.edu (Michael J Gebis)
Subject: Re: REVIEW: Perl CGI Programming - No Experience Required
Message-Id: <6m27r5$6sr@mozo.cc.purdue.edu>
pudge@pobox.com (Chris Nandor) writes:
}Anyway, as pointed out by others, there are several differences between a
}list and an array, not the least of which is that some functions take
}arrays as arguments where lists do not suffice. But the one example
}difference you cited is not actually a difference.
In what other situations does the difference make a, um, difference?
In other words, when does having the misconception "lists are arrays"
screw me? (Serious question, not a "snap.")
--
Mike Gebis gebis@ecn.purdue.edu mgebis@eternal.net
------------------------------
Date: Mon, 15 Jun 1998 06:04:18 GMT
From: vinod@surya.rws.soft.net
Subject: SQL Server and Win 32 ODBC Problem
Message-Id: <6m2dh1$cdf$1@nnrp1.dejanews.com>
Hi, I installed Perl for win 32 from www.activeware.com (build 316). Then I
copied the ODBC.pll file to lib\auto\win32\odbc\odbc.pll (which I got from
Roth.net) but I can't seem to be able to run the test.pl which comes along
with it. I get an error called "error:parse exception". According to
instructions this error occurs only when Perl for Win 32 and ODBC.pll are not
compatible. I think what I have done so far is correct, but then I can't
seem to run this test.pl. Have I left out some thing? My other cgi programs
are working fine. I'm using Windows 95. I need to establish connectivity to
a remote database using ODBC (for accepting inputs through a web page and
then storing it in a RDBMS). Any suggestions for this, other than IDC. Any
help regarding would be greatly appreciated. I'm new to perl, so please make
it as detailed as possible.
Bye
Vinod
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: Mon, 15 Jun 1998 13:01:41 +0800
From: byronj@nd.edu.au (Byron Jones)
Subject: strange error message .. "value of <handle> ..."
Message-Id: <byronj-1506981301410001@t-man.nd.edu.au>
greetings
(please cc any replies to my email address as i don't check this group
frequently)
i'm writing a perl program (suprise suprise) however when i run it i get :
Value of <HANDLE> construct can be "0"; test with defined() at
./print.cgi line 65535.
strange thing is, there's only 52 lines of code. the only 2 places where
i'm reading from a file i've written as
while (<HANDLE>)
and i don't have a variable called "HANDLE".
the program still runs with the above warning message, however as it's a
cgi-based program it fails when i try to access it via the web.
the source is at
http://www.nd.edu.au/perl/print.pl
(can you tell i'm still learning perl).
| "Twitchy as a two legged : Byron Jones |
|| whippet." : Communications Manager ||
|| byronj@nd.edu.au : Notre Dame University ||
| http://www.nd.edu.au/byronj/ : Fremantle, Australia |
------------------------------
Date: 15 Jun 1998 06:56:24 GMT
From: gebis@albrecht.ecn.purdue.edu (Michael J Gebis)
Subject: Re: strange error message .. "value of <handle> ..."
Message-Id: <6m2gio$7lf@mozo.cc.purdue.edu>
byronj@nd.edu.au (Byron Jones) writes:
}i'm writing a perl program (suprise suprise) however when i run it i get :
} Value of <HANDLE> construct can be "0"; test with defined() at
}./print.cgi line 65535.
}strange thing is, there's only 52 lines of code. the only 2 places where
}i'm reading from a file i've written as
} while (<HANDLE>)
Actually, in one place in your code, you have this:
...
while ($tmp = <TMP>) {
...
Change it to
...
#pragma DWIM
while (defined ($tmp = <TMP>)) {
..
And your troubles should go away. If you're super curious about
this, dejanews for this topic on perl5-porters. Ignornace may be
bliss in this case, as this warning is going to be removed in the next
version of perl, and the transformation I did will happen
automatically behind the scenes for you. (I hope I'm not out of touch
on this one--anybody care to verify this?)
--
Mike Gebis gebis@ecn.purdue.edu mgebis@eternal.net
------------------------------
Date: 15 Jun 1998 12:23:21 GMT
From: due@murray.fordham.edu (Allan M. Due)
Subject: Re: strange error message .. "value of <handle> ..."
Message-Id: <6m33np$qbd$0@206.165.146.39>
[This followup was posted to comp.lang.perl.misc and a copy was sent to
the cited author.]
In article <byronj-1506981301410001@t-man.nd.edu.au>, Byron Jones
(byronj@nd.edu.au) posted...
|greetings
|
|(please cc any replies to my email address as i don't check this group
|frequently)
|
Folks in this newsgroup often find such requests annoying. Individuals
take the time to try and offer assistance, but you can't take the time to
check back. At least you say you will return at some point. My
experience is that such statements dramatically decrease the probability
of helpful follow-up posts.
|i'm writing a perl program (suprise suprise) however when i run it i get :
|
| Value of <HANDLE> construct can be "0"; test with defined() at
|./print.cgi line 65535.
|
|strange thing is, there's only 52 lines of code. the only 2 places where
|i'm reading from a file i've written as
|
| while (<HANDLE>)
|
Not so strange. You using a file handle which you defined as TMP which may
not produce the desired results, so Perl is warning you. One solution
might be to use
while ($tmp = defined <TMP>)
in place of
while ($tmp = <TMP>)
to make sure that <TMP> is defined before you get into trouble.
HTH
--
Allan M. Due
Due@Murray.Fordham.edu
The beginning of wisdom is the definitions of terms.
- Socrates
------------------------------
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 2874
**************************************
