[9741] in Perl-Users-Digest
Perl-Users Digest, Issue: 3335 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Aug 3 23:05:37 1998
Date: Mon, 3 Aug 98 20:00:21 -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, 3 Aug 1998 Volume: 8 Number: 3335
Today's topics:
any ISAPI for std version of perl? (GEMINI)
Re: Array or hash question ? webmaster@vaticanmuseumtreasures.com
Re: Array or hash question ? <rick.delaney@shaw.wave.ca>
Re: Can Net::Ftp send a quote command structure? (Jeffrey Drumm)
CGI scripts executing other Perl scripts without hangin (Tom O'Neil)
Re: ch (Fernando Miramontes)
Re: Change Unix NIS password though the WEB interface <rootbeer@teleport.com>
Cheapest Win32 5.005 build <mpersico@erols.com>
Re: Cheapest Win32 5.005 build <dgris@rand.dimensional.com>
Re: comp.lang.perl.announce redux (I R A Aggie)
Re: comp.lang.perl.announce redux (Charles DeRykus)
Different IPC::open2 problems (Tramm Hudson)
Re: Good Book? <gwynne@utkux.utk.edu>
Re: Good Book? <gwynne@utkux.utk.edu>
gz vs Z on the CPAN <mpersico@erols.com>
Re: hiding user input (Chris Nandor)
Re: hiding user input justinb@ignored.cray.com
Re: hiding user input (Gary L. Burnore)
Re: hiding user input <mpersico@erols.com>
how to write a script using perl to configure a CISCO r <iznik@rocketmail.com>
Re: Passing Large Numbers of Parameters to Subroutines <mpersico@erols.com>
Re: Perl "system" command and Informix (Gary L. Burnore)
Re: Perl "system" command and Informix (Gary L. Burnore)
Re: Perl Counter <donatla@ix.netcom.com>
Re: Perl recipes (Steve Linberg)
Re: Problem with variables in simple script... <alf@orion.it>
Re: Win95 Server and Perl CGI Scripts <dmckeown@istar.ca>
Re: Win95 Server and Perl CGI Scripts <dtbaker_@flash.net>
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 4 Aug 1998 02:21:22 GMT
From: dennis@info4.csie.nctu.edu.tw (GEMINI)
Subject: any ISAPI for std version of perl?
Message-Id: <6q5r72$b8n$1@netnews.csie.NCTU.edu.tw>
I'd like to find the ISAPI for my
standard version of perl (not activeware).
However, I can only find the version from
ActiveWare so far. Could anybody help?
Thanks.
------------------------------
Date: Tue, 04 Aug 1998 01:02:53 GMT
From: webmaster@vaticanmuseumtreasures.com
Subject: Re: Array or hash question ?
Message-Id: <6q5mjt$t2i$1@nnrp1.dejanews.com>
In article <35C6256C.1B4685A2@shaw.wave.ca>,
Rick Delaney <rick.delaney@shaw.wave.ca> wrote:
> One post with one subject from one domain would have been sufficient.
Sorry 'bout that, but the old domain was my old email address, I was trying to
update it when I posted this and it must have kept the others in the que.
> perldoc perldsc
>
> See the section, "Lists of Hashes". There are plenty of good examples
> there.
>
Been there, done that...... still don't understand as I stated above.
Thank you anyway though.
- Jason
> --
> Rick Delaney
> rick.delaney@shaw.wave.ca
>
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Tue, 04 Aug 1998 02:32:57 GMT
From: Rick Delaney <rick.delaney@shaw.wave.ca>
Subject: Re: Array or hash question ?
Message-Id: <35C67443.7784C576@shaw.wave.ca>
webmaster@vaticanmuseumtreasures.com wrote:
>
> In article <35C6256C.1B4685A2@shaw.wave.ca>,
> Rick Delaney <rick.delaney@shaw.wave.ca> wrote:
>
> > perldoc perldsc
> >
> > See the section, "Lists of Hashes". There are plenty of good
> > examples there.
> >
>
> Been there, done that...... still don't understand as I stated above.
>
Okay, you've read a row of data into these variables:
$itemNum = 'SKU_1';
$price = '30.00';
$description = 'Widget';
$size = '10';
$color = 'Blue';
# Now set up your hash:
%hash = (
itemNum => $itemNum,
price => $price,
desc => $description,
size => $size,
color => $color,
);
# and push a reference to it onto your array:
push @rows, \%hash;
# Repeat for the other rows.
# Then, to do something like total the prices:
my $total = 0;
foreach $row (@rows) {
$total += $row->{price};
}
print "Total price is $total\n";
HTH
--
Rick Delaney
rick.delaney@shaw.wave.ca
------------------------------
Date: Tue, 04 Aug 1998 01:57:16 GMT
From: drummj@mail.mmc.org (Jeffrey Drumm)
Subject: Re: Can Net::Ftp send a quote command structure?
Message-Id: <35c665aa.218614414@news.mmc.org>
[posted and mailed]
On Mon, 03 Aug 1998 23:11:45 GMT, bhoylma@uswest.com wrote:
>I wish to send the following ftp command to a server using Net::Ftp, but
>cannot figure out a way to do so:
>
> quote "site recfm=fb lrecl=80 blksize=6160"
(snip)
>Is the quot() method a good approach to crafting this command? Any other
>suggestions?
Yes, but your attempt was, um, redundant; the server was actually
receiving:
QUOT quote "site recfm=fb lrecl=80 blksize=6160"
You would be able to see this in action by turning on Debug (see perldoc
Net::FTP for details).
Try:
$ftp->quot("site recfm=fb lrecl=80 blksize=6160");
You can check $ftp->message for any results that might be returned by the
site command:
print "SITE Command status: ", $ftp->message;
--
Jeffrey R. Drumm, Systems Integration Specialist
Maine Medical Center Information Services
420 Cumberland Ave, Portland, ME 04101
drummj@mail.mmc.org
"Broken? Hell no! Uniquely implemented." -me
------------------------------
Date: Tue, 04 Aug 1998 01:10:14 GMT
From: tom@netoutfit.com (Tom O'Neil)
Subject: CGI scripts executing other Perl scripts without hanging?
Message-Id: <35c65e01.283130625@news.keyway.net>
I have a CGI script that calls another Perl script to run. My problem
is that this second script takes a little while to run, and as it
stands right now, the webserver keeps the HTTP connection to the
client open until the second script finishes execution. What I'd like
to do is run the second script and then close the HTTP connection
without waiting for it to finish execution. The relevant section of
code is:
$pid = fork ();
if ($pid == 0) {
#this is the second script
system ("./make_dbm.pl&");
} else {
#print out a web page that lets the user know that the make_dbm script
#is running
The code prints out the display page, but the HTTP connection remains
open until make_dbm.pl finishes execution. Any ideas as to how to
eliminate this problem?
Tom O'Neil
tom@netoutfit.com
------------------------------
Date: 4 Aug 1998 00:57:06 GMT
From: fmiramon@students.wisc.edu (Fernando Miramontes)
Subject: Re: ch
Message-Id: <6q5m92$r1q$1@news.doit.wisc.edu>
I's working on a win95 sys to access (via telnet) a unix account. What i do is
download the file into my win95 sytem and then I FTP-it to the Unix computer.
When I downloades to my computer is when the change of name occurs; then I just
rename the file to what I think it should be (based on the instructions) and
then y send it (as a binary file)... then i try the tar command and i get the
error message......... is there another way I can decompress this file??
------------------------------
Date: Tue, 04 Aug 1998 02:52:25 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: Change Unix NIS password though the WEB interface
Message-Id: <Pine.GSO.4.02.9808031951180.14147-100000@user2.teleport.com>
On Mon, 3 Aug 1998, Mostafa Kassem wrote:
> Can't locate loadable object for module Ioctl in @INC
That message is a sign that the Ioctl module isn't properly installed for
your perl binary. You may need to re-build the entire perl binary from the
source. Good luck!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Mon, 03 Aug 1998 22:18:07 -0400
From: "Matthew O. Persico" <mpersico@erols.com>
Subject: Cheapest Win32 5.005 build
Message-Id: <35C66F5F.52F1308F@erols.com>
I understand that 5.005 can be built on Win32 boxes using MS or Borland
(Inprise - who thinks of these names!?) compilers. What I'd like to know
is given the latest numeric version of each one, what is the cheapest
implementation that will build Perl? Each one has a "Personal Edition",
"Professional Edition",
"Super-duper-give-me-your-first-born-for-payment" edition. What is the
lowest version that people have built with?
I hope the answer is the el cheapo version!
--
Matthew O. Persico
mpersico@erols.com
Bill Clinton's theme song should have been
"Go Away Little Girl"
------------------------------
Date: Tue, 04 Aug 1998 02:55:31 GMT
From: Daniel Grisinger <dgris@rand.dimensional.com>
Subject: Re: Cheapest Win32 5.005 build
Message-Id: <6q5sdf$qu$1@rand.dimensional.com>
[posted to comp.lang.perl.misc and mailed to the cited author]
In article <35C66F5F.52F1308F@erols.com>
"Matthew O. Persico" <mpersico@erols.com> wrote:
>I hope the answer is the el cheapo version!
I believe that gcc is available for win32. You might
want to take a look at <hmmm... looks for address>
I'm confused, the egcs faq says that it isn't available
for windows, but the gnu-win32 page says that it is.
Either way you'll probably prefer that over a proprietary
compiler, especially if money is a major consideration.
It's available here- http://www.cygnus.com/misc/gnu-win32/
This isn't really on topic for clpm, followups are set.
dgris
--
Daniel Grisinger dgris@perrin.dimensional.com
"No kings, no presidents, just a rough consensus and
running code."
Dave Clark
------------------------------
Date: Mon, 03 Aug 1998 21:09:35 -0500
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: comp.lang.perl.announce redux
Message-Id: <fl_aggie-0308982109350001@aggie.coaps.fsu.edu>
In article <35C63ED2.288@min.net>, jdporter@min.net wrote:
+ Oh yeah! I saw somewhere (damn, where was it... Dr. Dobbs?)
+ where they did a translation back and forth between English and
+ various other languages, including Russian, of a piece of prose.
+ The result was hilarious!
Well, let's see...I'll start with a translated quote:
The fact that slaughter is a horrifying spectacle must make us take
war more serioulsy, but not provide an excuse for gradually blunting
our swords in the name of humanity. Sooner or later someone will come
along with a sharp sword and hack off our arms.
-- Carl von Clausewitz
The French:
Le fait que l'abattage est un spectacle horrifiant doit rendre nous la
guerre de prise serioulsy, mais ne pas fournir une excuse pour blunting
graduellement nos ipies au nom de l'humaniti. Ttt ou tard quelqu'un viendra
avec une ipie et une entaille pointues outre de nos bras.
Back to the English (what? BabelFish won't do a French->German??):
The fact that demolition is a horrifying spectacle must return us to it
war of catch serioulsy, but not provide an excuse for blunting gradually
our swords in the name of humanity. Early or late somebody will come with
a pointed sword and a notch in addition to our arms.
Ok, that's fairly funny...now, this to German:
Die Tatsache, da_ Demolition ein erschreckendes Schauspiel ist, mu_ uns
zu ihr zur|ckbringen der Krieg der Verriegelung serioulsy, aber eine
Entschuldigung nicht f|r unsere Klingen stufenweise blunting im Namen
der Menschlichkeit zur Verf|gung stellen. Fr|h oder spdt kommt jemand
mit einer spitzen Klinge und einer Kerbe zusdtzlich zu unseren Armen.
And back to English (von Clausewitz is rolling in his grave...I can hear
it from North America, and I think his ghost is going to come and haunt
me):
The fact that Demolition is a frightening play, must return us to it the
war of the interlock serioulsy, but an apology not for our blade blunting
in the name of the humanity to the order to place gradually. Early or late
someone comes with a pointed blade and a notch additionally to our levers.
Oy...not only that, notice how "serioulsy" they take the Demolition?
James - and Digital paid how much for this translator??
------------------------------
Date: Tue, 4 Aug 1998 01:23:15 GMT
From: ced@bcstec.ca.boeing.com (Charles DeRykus)
Subject: Re: comp.lang.perl.announce redux
Message-Id: <Ex556s.7KH@news.boeing.com>
In article <35d13600.106274881@nntpd.databasix.com>,
Gary L. Burnore <whatpartofdontemailme@dontyouunderstand> wrote:
>On Mon, 03 Aug 1998 21:26:27 GMT, in article
><6q59u3$7ht$1@nnrp1.dejanews.com>, birgitt@my-dejanews.com wrote:
> ...snipped
>It _would_ be fun since it's sort of like that old telephone game where
>someone tells person a something then it moves to b, c, d and z recites what
>he thinks a said. :)
Gosh, that already happens all the time :)
--
Charles DeRykus
------------------------------
Date: 3 Aug 1998 19:36:41 -0600
From: tbhudso@panther.cs.sandia.gov (Tramm Hudson)
Subject: Different IPC::open2 problems
Message-Id: <6q5oj9$m4g$1@panther.cs.sandia.gov>
Folks,
I've reviewed the perlipc faq on open2 and am using a copy of the
code contained in its example. The open2 works as expected, but
I experience anomalous behavior if I redirect stdout to a file.
Here is the shortest program that generates the oddities, regardless
of whether autoflush is on or off:
---- Snip! ----
#!/usr/bin/perl -w
use FileHandle;
use IPC::Open2;
for $i (1..4)
{
$pid = open2( \*READER, \*WRITER, "cat -u -n" );
WRITER->autoflush();
print "line $i\n";
}
----
And the output when sent to the screen is:
[tbhudso@alaska-sss1-1 config]$ ./test
Name "main::WRITER" used only once: possible typo at ./test line 9.
Name "main::pid" used only once: possible typo at ./test line 9.
Name "main::READER" used only once: possible typo at ./test line 9.
line 1
line 2
line 3
line 4
But when I send it to a file:
[tbhudso@alaska-sss1-1 config]$ ./test > bar
Name "main::WRITER" used only once: possible typo at ./test line 9.
Name "main::pid" used only once: possible typo at ./test line 9.
Name "main::READER" used only once: possible typo at ./test line 9.
[tbhudso@alaska-sss1-1 config]$ cat bar
line 1
line 1
line 2
line 1
line 2
line 3
line 1
line 2
line 3
line 4
Note that each new line of output repeats all previous lines. The
perl version is 5.004_01 running on Linux/AXP 2.0.34. In the shortterm
I have worked around it by opening a file and writing there instead
of stdout. Note that stderr is not affected by this bug, although my
short program doesn't demonstrate it.
I plan to rewrite the script to use the Expect module, but this
seems to be a problem for anyone trying to use open2 and stdout.
Any ideas?
Tramm
--
o hudson@cs.tulane.edu tbhudso@cs.sandia.gov O___|
/|\ http://www.cs.tulane.edu/~hudson/ H 505.266.59.96 /\ \_
<< KC5RNF @ N5YYF.NM.AMPR.ORG W 505.284.24.32 \ \/\_\
0 U \_ |
------------------------------
Date: Mon, 3 Aug 1998 22:22:44 -0400
From: "Bob Gwynne" <gwynne@utkux.utk.edu>
Subject: Re: Good Book?
Message-Id: <6q5rg5$c39$1@gaia.ns.utk.edu>
The answer to your question depends on how much programming experience you
have. In general, Learning Perl by Randal Schwartz and Tom Christiansen is
considered the standard book for learning Perl; however, if you want a
tutorial to work through, I suggest Perl 5 Interactive Course by Jon Orwant.
It assumes that the reader has less programming experience than does
Learning Perl, and it has many useful exercises. Although it is not an
O'Reilly book, was not written by Schwartz, Christiansen, or Wall, it is
pedagogically superior to their books. It also is useful as a reference. If
you want to do CGI programming (e.g., interactive forms, guestbooks, etc.),
consider The Official Guide to CGI.pm by Lincoln Stein. Lincoln wrote the
module CGI.pm and explains it thoroughly and relatively clearly. However,
you should have a basic knowledge of Perl and HTML before tackling this
book.
Programming Perl by Wall, et.al, is most useful as a reference.
Hope this helps,
Bob Gwynne
Dave Mckeown wrote in message <35C0DC21.FB200D4E@istar.ca>...
>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: Mon, 3 Aug 1998 22:26:22 -0400
From: "Bob Gwynne" <gwynne@utkux.utk.edu>
Subject: Re: Good Book?
Message-Id: <6q5rn0$c7u$1@gaia.ns.utk.edu>
BTW: Chris Nandor's MacPerl: Power and Ease is a good book to read if you
are using a Mac. You can preview it at http://yggdrasil.com/~rdm/MP/i2.html.
Bob Gwynne
------------------------------
Date: Mon, 03 Aug 1998 22:51:17 -0400
From: "Matthew O. Persico" <mpersico@erols.com>
Subject: gz vs Z on the CPAN
Message-Id: <35C67725.6F72A624@erols.com>
If the default behavior of the x2hs generated stubs yields a Makefile
that uses "compress" as the default for distribution files, why is it
then that most of, if not all of CPAN is gz? You mean everyone does
make dist COMPRESS=gzip
or whatever the non-default incantation is?
--
Matthew O. Persico
mpersico@erols.com
Bill should be just as scared of Perl/Tk
as he should be of Linux!
------------------------------
Date: Mon, 03 Aug 1998 21:05:28 -0400
From: pudge@pobox.com (Chris Nandor)
Subject: Re: hiding user input
Message-Id: <pudge-0308982105280001@192.168.0.3>
In article <35c6545f.114050309@nntpd.databasix.com>,
whatpartofdontemailme@dontyouunderstand wrote:
# On Mon, 03 Aug 1998 20:11:10 -0400, in article
# <pudge-0308982011100001@192.168.0.3>, pudge@pobox.com (Chris Nandor) wrote:
#
# >In article <35d5480f.110898281@nntpd.databasix.com>,
# >whatpartofdontemailme@dontyouunderstand wrote:
# >
# ># Feel free. Just shows what kind of person _YOU_ are.
# >
# >Exactly. It shows I am the kind of person who is interested in truth and
# >historical record.
#
# No, if you were interested in truth and historical record, you'd have included
# the part of the post I was following up to.
I don't need to quote every little bit. It is all on DejaNews.
# Fortunately, with a bit of work, those reading DejaNews and considering it a
# "record" will SEE the parts you so carefully left out.
I did not carefully leave anything out. I just kept the stuff at the
bottom. If anything, I sloppily left things out. Paranoid much?
# The parts that show
# YOU are a liar.
If I lied, you show exactly what I said that was a lie, and show how it
was a lie. If you do not comply, then you admit that you lied when you
said that I lied. Of course, if you do comply, you will prove that what
you lied when you said that I lied, because I said nothing that was a
lie. I made not statement that you can prove is not factual.
Seriously, you need professional help. I don't know if you really did
molest that kid or not, and I don't care; I just do know that you need
professional help.
--
Chris Nandor mailto:pudge@pobox.com http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6'])
------------------------------
Date: 03 Aug 1998 20:59:36 -0700
From: justinb@ignored.cray.com
Subject: Re: hiding user input
Message-Id: <kgciuk9wg5z.fsf@dervish.cray.com>
gburnore@databasix.com (Gary L. Burnore) writes:
> It's clear that both of you have NO clue what the difference is between email
> and USENet. While you're all so happy to see abigail abuse new users and
> complaining that I say something about it you're being hypocrites by posting
> sending private email and then posting the reply to USENet.
>
> I'll be sure to Call both Stanford and Dartmouth on Monday and let the admins
> there know exactly what I think of your actions.
Good shit! You're really the draconian fascist I always imagined you
to be! I wondered, and didn't really know (through the databasix crypto days)
but you leave little to the imagination. Don't bother calling [sgi|cray],
as they're unlikely to be sympathetic.
-justinb
--
Justin Banks - Silicon Graphics Inc. Eagan, MN
Now I am become Death, the destroyer of worlds. - Vishnu
------------------------------
Date: Tue, 04 Aug 1998 02:24:03 GMT
From: gburnore@databasix.com (Gary L. Burnore)
Subject: Re: hiding user input
Message-Id: <35c86e27.120651216@nntpd.databasix.com>
On Mon, 03 Aug 1998 21:05:28 -0400, in article
<pudge-0308982105280001@192.168.0.3>, pudge@pobox.com (Chris Nandor) wrote:
>In article <35c6545f.114050309@nntpd.databasix.com>,
>whatpartofdontemailme@dontyouunderstand wrote:
>
># On Mon, 03 Aug 1998 20:11:10 -0400, in article
># <pudge-0308982011100001@192.168.0.3>, pudge@pobox.com (Chris Nandor) wrote:
>#
># >In article <35d5480f.110898281@nntpd.databasix.com>,
># >whatpartofdontemailme@dontyouunderstand wrote:
># >
># ># Feel free. Just shows what kind of person _YOU_ are.
># >
># >Exactly. It shows I am the kind of person who is interested in truth and
># >historical record.
>#
># No, if you were interested in truth and historical record, you'd have included
># the part of the post I was following up to.
>
>I don't need to quote every little bit. It is all on DejaNews.
>
>
># Fortunately, with a bit of work, those reading DejaNews and considering it a
># "record" will SEE the parts you so carefully left out.
>
>I did not carefully leave anything out. I just kept the stuff at the
>bottom. If anything, I sloppily left things out.
So it's just 'convenient'.
> Paranoid much?
>
>
># The parts that show
># YOU are a liar.
>
>If I lied, you show exactly what I said that was a lie, and show how it
>was a lie. If you do not comply, then you admit that you lied when you
>said that I lied. Of course, if you do comply, you will prove that what
>you lied when you said that I lied, because I said nothing that was a
>lie. I made not statement that you can prove is not factual.
I apologize. I consistently confuse you and a couple of other posters in this
group. Not hard to do since you each do the same things over and over. You
didn't outright lie but omitting part of the follow up while ensuring the
remainder makes it to dejanews is still being a bit dishonest.
>Seriously, you need professional help.
So you don't agree with the way that I post and determine from that, that I
need professional help? What about emailing someone when they ask you not to.
What about continuing after being told to stop? You did that several times to
several people. I, like others, munged my Reply-to address and you emailed
anyway. Just as you did during the RFD for .moderated. Perhaps it's YOU that
needs mental help? Perhaps it's YOU that has a warped sense of reality.
> I don't know if you really did
>molest that kid or not, and I don't care; I just do know that you need
>professional help.
I seriously hope you stay on the innuendo side of the line and not cross over
to libel.
--
I DO NOT WISH TO RECEIVE EMAIL IN REGARD TO USENET POSTS
---------------------------------------------------------------------------
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
Special Sig for perl groups. | Official Proof of Purchase
===========================================================================
------------------------------
Date: Mon, 03 Aug 1998 22:35:47 -0400
From: "Matthew O. Persico" <mpersico@erols.com>
Subject: Re: hiding user input
Message-Id: <35C67383.850DCD32@erols.com>
Three thoughts:
1) I'd like to see all the combatants in one physical room. Five bucks
says few, if any, of the venemous words we've seen here would have been
said. This is just like being brave with the finger in your car, btu not
in the street next to the same person. I guess we can call this "Usenet
Rage"?
2) Maybe the Perl and Nettiquite FAQs should be posted EVERY DAY?
3) A solution to the "can't stand answering the obvious newbie who
didn't bother to do any research (ONWDBTDAR)" problem is simply to skip
the message in your news reader. If a person is not yet knowledgeable
enough to put something other than "please help me" or "Can't print" in
the subject, odds are it is a ONWDBTDAR (no, I don't know how to
pronounce it, I just made it up) adn you can safely skip it.
4) How 'bout someone whipping up a PerlTK news reader (if it doesn't
already exist) that you can have filter out headers by subject line.
Come to think of it, you could do this with exmh, a mail reader. Surely,
this exists for news readers too? List of subjects to filter can be
stored/maintained at CPAN.
Just a thought or four...
--
Matthew O. Persico
mpersico@erols.com
Bill Clinton's them song should have been
"Go Away Little Girl"
------------------------------
Date: Tue, 4 Aug 1998 01:49:33 GMT
From: <iznik@rocketmail.com>
Subject: how to write a script using perl to configure a CISCO router
Message-Id: <Ex562A.4uu@sap-ag.de>
Hello friends,
I am trying to write a script using perl that would do the following:
1. take a standard text file with a standard cisco configuration.
2. search for certain words in this text file as I only have to
configure a few fields.
3. prompt the user to end the fields: i.e. IP address of WAN, IP address
of Ethernet, calling ISDN number, CHAP user and password etc.
4. save the file
5. upload it via TFTP into a cisco router.
Can anyone who is familiar with the perl language help??
Thanks and regards,
Vernon
------------------------------
Date: Mon, 03 Aug 1998 22:41:13 -0400
From: "Matthew O. Persico" <mpersico@erols.com>
To: George Kuetemeyer <george.kuetemeyer@mail.tju.edu>
Subject: Re: Passing Large Numbers of Parameters to Subroutines
Message-Id: <35C674C9.2D014BD0@erols.com>
George Kuetemeyer wrote:
>
> Thanks for the advice.
[snip]
> Thanks to the other responders. I want to check out some of their
> suggestions (Abigail's tied hash, MethodMaker, etc.).
>
I use MethodMaker extensively and I really think it is a winner.
However, I have two caveats:
1) You should not use MethodMaker until you've put in the pain of
rolling a class by hand. You have obviously done that, but MethodMaker
is not something I would spring on a Perl newbie until they ask, "Jeez,
isn't there a better way?"
2) MethodMaker has an anomally whereby if you are defining a hash as one
of the class members, apparently, you cannot use undef as a value, as
you would in a placeholder situation. I got bit by that today.
--
Matthew O. Persico
mpersico@erols.com
Bill should be just as scared of Perl/Tk
as he should be of Linux!
------------------------------
Date: Tue, 04 Aug 1998 01:14:10 GMT
From: gburnore@databasix.com (Gary L. Burnore)
Subject: Re: Perl "system" command and Informix
Message-Id: <35c65f96.241314950@nntpd.databasix.com>
On Mon, 3 Aug 1998 17:44:29 -0700, in article <35c659bb.0@blushng.jps.net>,
"Edward Villalovoz" <edwardv@jps.net> wrote:
>Can anyone tell my what i'm doing wrong? The following procedure works if i
>hard code the $hh in as say, "12", but it won't work if i try to have it
>read from the list. I keep getting the error,
>
>1262: Non-numeric character in datetime or interval.
>Error in line 3
>Near character position 44
>
> 201: A syntax error has occurred.
>Error in line 1
>Near character position 4
>
>
>Please tell me what i'm doing wrong. Thanks in advance.
>============================================
>#!/usr/local/bin/perl
>
>@half_hours = ("12","13","14");
>
>foreach $hh (@half_hours) {
>
> $ENV{INFORMIXSERVER} = "n36_shm";
> system q{
> dbaccess << 'eof'
> database pmsys@n36;
> SELECT *
> FROM ama0_980714
> WHERE EXTEND (ostime, HOUR to HOUR) = "$hh";
> eof
> };
>
> print "got half hour $hh\n";
> #other code....
>
>}
Try:
system q{
dbacess pmsys@n36 << - eof
SELECT *
FROM ...
eof
Make sure there's nothing between the beginning of the line and the eof in the
second instance of it. DBACCESS is painfully picky.
--
I DO NOT WISH TO RECEIVE EMAIL IN REGARD TO USENET POSTS
---------------------------------------------------------------------------
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
Special Sig for perl groups. | Official Proof of Purchase
===========================================================================
------------------------------
Date: Tue, 04 Aug 1998 02:29:50 GMT
From: gburnore@databasix.com (Gary L. Burnore)
Subject: Re: Perl "system" command and Informix
Message-Id: <35c97145.121449569@nntpd.databasix.com>
On Tue, 04 Aug 1998 01:14:10 GMT, in article
<35c65f96.241314950@nntpd.databasix.com>, gburnore@databasix.com (Gary L.
Burnore) wrote:
>On Mon, 3 Aug 1998 17:44:29 -0700, in article <35c659bb.0@blushng.jps.net>,
>"Edward Villalovoz" <edwardv@jps.net> wrote:
>
>>Can anyone tell my what i'm doing wrong? The following procedure works if i
>>hard code the $hh in as say, "12", but it won't work if i try to have it
>>read from the list. I keep getting the error,
>>
>>1262: Non-numeric character in datetime or interval.
>>Error in line 3
>>Near character position 44
>>
>> 201: A syntax error has occurred.
>>Error in line 1
>>Near character position 4
>>
>>
>>Please tell me what i'm doing wrong. Thanks in advance.
>>============================================
>>#!/usr/local/bin/perl
>>
>>@half_hours = ("12","13","14");
>>
>>foreach $hh (@half_hours) {
>>
>> $ENV{INFORMIXSERVER} = "n36_shm";
>> system q{
>> dbaccess << 'eof'
>> database pmsys@n36;
>> SELECT *
>> FROM ama0_980714
>> WHERE EXTEND (ostime, HOUR to HOUR) = "$hh";
>> eof
>> };
>>
>> print "got half hour $hh\n";
>> #other code....
>>
>>}
>
>
>Try:
>system q{
>dbacess pmsys@n36 << - eof
>SELECT *
>FROM ...
>
>eof
And I still got it wrong.
dbaccess pmsys@n36 - - <<eof
select * from ... ;
eof
again nothing between the beginning of the line and the last eof.
>
>Make sure there's nothing between the beginning of the line and the eof in the
>second instance of it. DBACCESS is painfully picky.
As I said, it's picky. The - - after database name means read from stdin.
--
I DO NOT WISH TO RECEIVE EMAIL IN REGARD TO USENET POSTS
---------------------------------------------------------------------------
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
Special Sig for perl groups. | Official Proof of Purchase
===========================================================================
------------------------------
Date: Mon, 3 Aug 1998 21:32:59 -0400
From: "Donald W. McArthur" <donatla@ix.netcom.com>
Subject: Re: Perl Counter
Message-Id: <6q5oeq$iu9@dfw-ixnews5.ix.netcom.com>
Well, you can approximate it by using Cookies, Hidden Fields or the other
usual HTML/CGI trickery. near enough for most uses.
divakarpc@my-dejanews.com wrote in message
<6q3qg2$8rf$1@nnrp1.dejanews.com>...
>Hi there,
>
> Is it possible to make a perl counter not to increment on refresh of the
>page.
>
------------------------------
Date: Mon, 03 Aug 1998 22:51:38 -0400
From: linberg@literacy.upenn.edu (Steve Linberg)
Subject: Re: Perl recipes
Message-Id: <linberg-0308982251380001@pri03-056.oldcity.dca.net>
In article <35C6444E.4DC5@oreilly.com>, lisam@oreilly.com wrote:
> The Perl Cookbook, by Tom Christiansen & Nathan
> Torkington, is a collection of problems, solutions,
> and examples for anyone programming in Perl. It contains
> hundreds of Perl "recipes," including recipes for parsing
> strings, doing matrix multiplication, working witharrays
> and hashes, and performing complex regular expressions.
> Over the next three weeks, O'Reilly will provide two new
> recipes a day free on the web site:
> http://perl.oreilly.com/cookbook/
This is very nice! Is the book out yet?
> Tom will be at the Perl Conference. We're looking forward
> to seeing many of you there. If you haven't yet, you've
> got exactly two weeks to choose your tutorials and sign
> up for the conference in San Jose August 17-20. Not to mention
> you'll be there in person to hear what Larry Wall has been up
> to in his State of the Onion talk.
> http://conference.perl.com/pace/conf
> Or...call toll free 877-633-8467
I just want to be at least one lone voice whispering in O'Reilly's ear
(there has been some discussion in clp.moderated) that many people who
would *love* to come, including yours truly, just can't afford it. It's
really extremely expensive; attending the five days with tutorials,
airfare and even a cheapo hotel (or sleeping on the beach!) would put the
cost at nearly US$3,000. ($1800 for the conference and tutorials, $500ish
for lodging, and about $700 for a RT flight from the east coast.) Maybe
by shopping around we could get it down to $2500. Still an awful lot.
Really, really too bad. I would so love to go. I hope O'Reilly makes
good money from it, but it sure would be nice to see some kind of sliding
scale in the future so we non-profit folk could figure out a way to
attend. Maybe I'll make it to next year's if I start saving now! :)
Please at least write things up for us afterwards?
_______________________________________________________________________
Steve Linberg National Center on Adult Literacy
Systems Programmer &c University of Pennsylvania
linberg@literacy.upenn.edu http://www.literacyonline.org
------------------------------
Date: 02 Aug 1998 11:29:17 +0200
From: Alessandro Forghieri <alf@orion.it>
Subject: Re: Problem with variables in simple script...
Message-Id: <m3zpdnu3yq.fsf@aldebaran.orion.it>
Greetings.
My suggestions about your problems:
i) use CGI;
ii) use Mail::Internet (or somesuch, I do not remember the actual name)
iii) Do not type stuff straight from a book :-)
iv) Other problem areas:
1) start looking at what's in the $message variable: if it really
is empty,(as I think they are) then the problems are in the
library routines, in which case I urge you to resort to (i).
2) On many systems, sendmail is not in /usr/sbin. Sendmail
does not allow the use of the -f switch, unless you are a
'trusted' user. (See point (ii))
3) From a cursory look to the library routines and to the way
you use the values to construct what essentially
is a shell command line,
you are in for BIG TROUBLE if somebody starts playing trick
with their address and set it to something like
"foo@bar;<some smartass command in here>"
HTH,
Alessandro
--
One standard to rule them all, one standard to find them,
One standard to bring them all, and in darkness bind them.
In the land of Microsoft, where the Shadow lie.
Alessandro Forghieri http://www.orion.it/~alf
------------------------------
Date: Tue, 04 Aug 1998 01:21:20 GMT
From: Dave Mckeown <dmckeown@istar.ca>
Subject: Re: Win95 Server and Perl CGI Scripts
Message-Id: <35C66315.AA19D5C1@istar.ca>
DMOtto2 wrote:
> [......]
It is easier if you post the code but I think you need to put a space or
something in between a mime type and the perl code, I'm just a begginer
though....
--
Icq# 14056739
mailto:dmckeown@istar.ca
------------------------------
Date: Mon, 03 Aug 1998 21:29:10 -0500
From: Dan Baker <dtbaker_@flash.net>
Subject: Re: Win95 Server and Perl CGI Scripts
Message-Id: <35C671F6.472C@flash.net>
DMOtto2 wrote:
>
> I have a project to do for an apprenticeship I am in and it involves a Perl
> Script located on a server running a program called "WebSite" by O'Reilley's.
> I just can't get the script to work. I am assuming it has something to do with
> configuring the server. The page I am looking for help with is at this URL:
>
> http://eoss.navsses.navy.mil/eoss/search.htm
>
> Type in anything and click on search and you should get this error:
> 500 Server Error
>
> The server encountered an internal error or misconfiguration and was
> unable to complete your request.
>
> Message: CGI output from C:/WebSite/perl/search.pl contained no blank
> line separating header and data
-------------
I'm totally guessing since you didn't include a copy of the source...
but the server may be configured correctly, and you have made a basic
error in sending data to the browser. I'd have to guess that you forgot
to print a line like:
print "Content-type: text/plain\n\n";
before sending any "real" output to the browser. You HAVE to send a
content type line, and you have to be sure to follow with a blank line,
hence the \n\n.
Dan
------------------------------
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 3335
**************************************
