[16295] in Perl-Users-Digest
Perl-Users Digest, Issue: 3707 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Jul 18 09:17:48 2000
Date: Tue, 18 Jul 2000 06:17:34 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <963926254-v9-i3707@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Tue, 18 Jul 2000 Volume: 9 Number: 3707
Today's topics:
Re: An unquoted string error (Tad McClellan)
ANNOUNCE: Bit::Vector 5.8 release candidate (Steffen Beyer)
Another newbie seeks help and assistance... (Paul Linehan)
ARRAY PROBLEM (-EViL-DOC-)
ARRAY PROBLEM (-EViL-DOC-)
Re: ARRAY PROBLEM (Bob Walton)
Attatchments from client ()
Re: Attatchments from client (Mark W. Schumann)
Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!! (PerLover)
Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!! (Drew Simonis)
Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!! (Craig Berry)
Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!! (Nnickee)
Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!! (Philip Lees)
Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!! (Cal Henderson)
Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!! (Randal L. Schwartz)
Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!! (Russ Jones)
Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!! (Cal Henderson)
Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!! (Drew Simonis)
Re: ATTENTION PERL MEATHEADS (Thorbjørn Ravn Andersen)
autoflushing not as good as closing? (Bob Niederman)
B::Lint usage (David)
B::Lint usage (David)
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 12 Jul 2000 05:30:01 GMT
From: tadmc@metronet.com.bbs@openbazaar.net (Tad McClellan)
Subject: Re: An unquoted string error
Message-Id: <3bN5SP$Wjt@openbazaar.net>
On 11 Jul 2000 21:37:49 -0700, Mike <tcsh@holly.colostate.edu> wrote:
>I fail to understand why perl has trouble with the following :
>
>#!/usr/local/bin/perl -w
>use strict;
>
>package cdssffffffff;
>package main;
>my $j = cdssffffffff->n();
>
>Yet, if I change cdssffffffff to cdssffffffff1, the following error message is
^^^^^
It is not an error message.
It is a warning (that's what "W" means in perldiag).
>not longer produced :
>Unquoted string "cdssffffffff" may clash with future reserved word at ./jjjj
>line 9
>
>perldiag says:
>
> Unquoted string """"%s"""" may clash with future reserved word (W) You
>used a bareword that might someday be claimed as a reserved word. It's best to
>put such a word in quotes, or capitalize it somehow, or insert an underbar into
>it. You might also declare it as a subroutine.
>
>But, I can't really see cdssffffffff being a reserved word.. so what's the
>deal?
It is the _form_ of the word, not that particular word.
The p5p cannot know all of the keywords that they may need
in the future, so they just agree to make them match /^[a-z]+$/
To avoid future conflicts then, you should *avoid* using
ones that match that pattern.
If you had chosen
package our;
as your package name instead, then your program would stop working
when you get around to upgrading to perl 5.6 for instance.
(because "our" is a new keyword in 5.6)
The warning is not generated with version 5.6 either.
>why would doing this cause the afformentioned
>error?
It is not an error.
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: 14 Jul 2000 22:50:01 GMT
From: sb@muccpu1.muc.sdm.de.bbs@openbazaar.net (Steffen Beyer)
Subject: ANNOUNCE: Bit::Vector 5.8 release candidate
Message-Id: <3bPBWP$WSP@openbazaar.net>
=====================================
Package "Bit::Vector" Version 5.8
=====================================
- RELEASE CANDIDATE -
This package is available for download from my web site at
http://www.engelschall.com/u/sb/download/
Prerequisites:
--------------
Perl version 5.000 or higher, and an ANSI C compiler (!)
^^^^^^
What's new in version 5.8:
--------------------------
+ Changed "na" to "PL_na" in Vector.xs in order to make the module
ready for Perl 5.6.0.
+ Removed the error messages which appeared at global destruction
time with Perl 5.6.0.
+ Changed the corresponding test script (t/02____destroy.t) accordingly.
+ Optimized the "strEQ" away from the typemap section in Vector.xs.
+ Fixed the misspelled word "whether" in the documentation.
+ Added method "Power()".
+ Added overloaded operator "**" (for exponentiation).
+ Changed method "Copy()"; the two vectors do not need to have the same
size anymore. The method will copy as much as will fit or fill up
with 0's or 1's (depending on the sign of the source) if necessary.
+ Changed the corresponding test script (t/09_parameters.t) accordingly.
Abstract:
---------
Bit::Vector is an efficient C library which allows you to handle
bit vectors, sets (of integers), "big integer arithmetic" and
boolean matrices, all of arbitrary sizes.
The library is efficient (in terms of algorithmical complexity)
and therefore fast (in terms of execution speed) for instance
through the widespread use of divide-and-conquer algorithms.
The package also includes an object-oriented Perl module for
accessing the C library from Perl, and features overloaded
operators for maximum ease of use.
The C library can nevertheless be used stand-alone, without Perl.
Legal issues:
-------------
This package with all its parts is
Copyright (c) 1995 - 2000 by Steffen Beyer.
All rights reserved.
This package is free software; you can use, modify and redistribute
it under the same terms as Perl itself, i.e., under the terms of
the "Artistic License" or the "GNU General Public License".
The C library at the core of this Perl module can additionally
be used, modified and redistributed under the terms of the
"GNU Library General Public License".
Please refer to the files "Artistic.txt", "GNU_GPL.txt" and
"GNU_LGPL.txt" in this distribution, respectively, for details!
Author's note:
--------------
This is a release candidate.
Please report any bugs or ugly things you find!
Suggestions are welcome!
I hope you will find this new version beneficial!
Yours sincerely,
--
Steffen Beyer <sb@engelschall.com>
http://www.engelschall.com/u/sb/whoami/ (Who am I)
http://www.engelschall.com/u/sb/gallery/ (Fotos Brasil, USA, ...)
http://www.engelschall.com/u/sb/download/ (Free Perl and C Software)
------------------------------
Date: 14 Jul 2000 10:30:03 GMT
From: paul.linehan@datalex.ie.bbs@openbazaar.net (Paul Linehan)
Subject: Another newbie seeks help and assistance...
Message-Id: <3bOeJR$Yu2@openbazaar.net>
Hello all,
the title explains my situation - I've just started a new job (was a
Delphi programmer - may get back there some day after it goes to
Linux/FreeBSD) and we have a few Unix boxes lying around here and
I want to use some perl on them.
Since universities these days don't teach Unix anymore (I am
appalled at the number of so-called computer science "graduates"
who don't know what "ls" or "pwd" are...aw well...)
I have basically *_nobody_* to ask + plus I'm doing this off my own
bat so to speak - I do have the Learning Perl book, but I feel that I
need to have my hand held at the very beginning at least.
Anyway, I want to write some perl scripts to automate some tasks which
we have to do on a HP UX ver. 11 box (it's easy at first, but bear
with me, it gets a wee bit trickier later on)
open a terminal window - this could be done manually, but hey, if perl
can be used so much the better...
from directory
/opt/vnc // we run vnc so that we can access the machine using a
windows
(boo) box.
cd .. // up a level
cd Ho*r // This changes to /opt/HostAccessServer - the * is a HP thing
to resolve
// unambigious names AFAIK.
cd lookup // down another level
../web.sh& // start this process
../rmidaemon & // start another... 8-)
cd .. // ups a daisy.
// this is where it gets tricky.
../runhas > runhas.log // start "has" and feed output to runhas.log
Then this terminal window is minimised and a new one is opened, again
we
are in /opt/vnc
cd ..
cd Ho*r
tail -f runhas.log // Leave this window open - basically we want to
perform
// different tasks with "has" and look at
the output and return
// data, as we are performing the tasks
Then open another window,
cd ..
cd J*0 (JavaWebServer2.0)
cd bin
../startup // and leave this window open as well.
And that's it. The tail -f runhas.log window is the most important and
can be started after the JavaWebServer if necessary for keeping it on
top of the other window.
Any help/ideas/questions/donations gratefully appreciated.
Paul...
------------------------------
Date: 17 Jul 2000 23:20:02 GMT
From: -EViL-DOC-@BLUR.COM.bbs@openbazaar.net (-EViL-DOC-)
Subject: ARRAY PROBLEM
Message-Id: <3bRSk4$SaH@openbazaar.net>
Hi,
I am reading 2 files into separate arrays
@array1 contains many lines of the following format.
$array1[0] contains integer1,integer2,integer3,integer4,integer5,integer6
@array2 contains many lines of the following format.
$array2[0] contains integer1,integer2,integer3,integer4
My question is how can i add the say third element from
$array1[1] (EG. integer1,integer2,integer3,integer4)
^^ This one
to the 2nd element of $array1[3] (EG. integer1,integer2,integer3,integer4
^^ This one
Thanks in advance !
------------------------------
Date: 17 Jul 2000 23:20:02 GMT
From: -EViL-DOC-@BLUR.COM.bbs@openbazaar.net (-EViL-DOC-)
Subject: ARRAY PROBLEM
Message-Id: <3bRSk5$SeG@openbazaar.net>
Hi,
I am reading 2 files into separate arrays
@array1 contains many lines of the following format.
$array1[0] contains integer1,integer2,integer3,integer4,integer5,integer6
@array2 contains many lines of the following format.
$array2[0] contains integer1,integer2,integer3,integer4
My question is how can i add the say third element from
$array1[1] (EG. integer1,integer2,integer3,integer4)
^^ This one
to the 2nd element of $array1[3] (EG. integer1,integer2,integer3,integer4
^^ This one
Thanks in advance !
------------------------------
Date: 18 Jul 2000 01:20:02 GMT
From: bwalton@rochester.rr.com.bbs@openbazaar.net (Bob Walton)
Subject: Re: ARRAY PROBLEM
Message-Id: <3bRW42$TPY@openbazaar.net>
-EViL-DOC- wrote:
...
> I am reading 2 files into separate arrays
> @array1 contains many lines of the following format.
> $array1[0] contains integer1,integer2,integer3,integer4,integer5,integer6
>
> @array2 contains many lines of the following format.
> $array2[0] contains integer1,integer2,integer3,integer4
>
> My question is how can i add the say third element from
> $array1[1] (EG. integer1,integer2,integer3,integer4)
> ^^ This one
>
> to the 2nd element of $array1[3] (EG. integer1,integer2,integer3,integer4
>
> ^^ This one
> Thanks in advance !
By "add to", I assume you mean "take the sum of the two numbers and
replace the second number with that sum". I also assume that the array
elements of @array1 contain references to anonymous arrays. If so:
$array1[3][1]+=$array1[1][2];
is one way. Why did you mention $array2 in your intro when you didn't
use it in your question?
--
Bob Walton
------------------------------
Date: 17 Jul 2000 18:30:07 GMT
From: cpoole@muskegon.k12.mi.us.bbs@openbazaar.net ()
Subject: Attatchments from client
Message-Id: <3bRLJW$V4T@openbazaar.net>
Hi,
I have installed Mail::Sender by JENDA and it works well for
attatchments that reside on the server; however, what if I want to send
an attatchment from my client workstation? Does anyone know of the
command I would use to to send a attatchment from my client workstation
(i.e. like a MS word file from my PC) or is there another module out
there which would be better for me to use.
I would appreciate any advice anyone can give me. Thank You.
Regards,
Charles W. Poole, Jr.
Internet System Administrator
Muskegon Public Schools
------------------------------
Date: 18 Jul 2000 06:00:04 GMT
From: catfood@apk.net.bbs@openbazaar.net (Mark W. Schumann)
Subject: Re: Attatchments from client
Message-Id: <3bRdI6$VuA@openbazaar.net>
In article <39734FA5.D5D19471@muskegon.k12.mi.us>,
<cpoole@muskegon.k12.mi.us> wrote:
>I have installed Mail::Sender by JENDA and it works well for
>attatchments that reside on the server; however, what if I want to send
>an attatchment from my client workstation? Does anyone know of the
>command I would use to to send a attatchment from my client workstation
>(i.e. like a MS word file from my PC) or is there another module out
>there which would be better for me to use.
It depends. If the Perl program is running on the "server" then your
"client" probably isn't even visible to it. Is this a CGI question
in disguise?
>I would appreciate any advice anyone can give me. Thank You.
First refine the question. What happens when you try to send a file
from your client PC?
------------------------------
Date: 11 Jul 2000 19:50:07 GMT
From: PerLover@PerLove.com.bbs@openbazaar.net (PerLover)
Subject: Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!!
Message-Id: <3bMcNV$YK5@openbazaar.net>
In article <8kfs35$2eq$1@nnrp1.deja.com>, p3rlc0dr@my-deja.com wrote:
# Ive been reading this board for awhile and Im very disaponted with the
# atitudes and acts of many of the so-called "PERL elites".
I've been reading Usenet for a long time, and I am very disappointed in
the lack of proper language skill from the so-called "clueless."
# When a
# person comes to this board and asks for help do they get it NO!!!!!!!!
Um, is that a question?
# Y NOT?!?!
If they have your language skills, I think the answer is self-evident.
One cannot easily give help in a written medium to someone who lacks
sufficient skill in said medium.
# Maybe its the ATITUDE and ARROGENSE of the ppl on this board who think
# that PERL being liked as a language to write webpages in gives them the
# right to make fun of and slight novice users who seek help on this
# board.
No, living in a free country gives people the right to make fun of
others. No other justification for that right is necessary. No one
thinks anything about Perl gives them a right to make fun of you.
# DO YOU "PERL ELITES" OWN THIS BOARD, NO!
Yes. As much as anyone can, of course. The concept of "ownership" on
Usenet is an interesting and nebulus one.
# Does a person whoes
# writing a question to another board like FreeBSD or Linux or Java or
# Python get the same treatment, NO!
Yes, of course.
# Then why with PERL? What gives YOU
# "PERL ELITES" the right to treat nice people badly when they ask a
# simple question here?
As noted above, living in a free country provides that right.
# PERL is so good and useful but this so-called comunity is mean and
# unfriendly. WHY MUST YOU BE THAT WAY? Please change and B GOOD!
Please change and use proper English.
# THANK YOU.
#
# --
# Ganesha, p3rlc0dr and WEB MISTRESS
"Web Mistress" is perhaps the lamest thing one could call oneself. "Web
Master" was bad enough. No one here gives a damn if you are female or
not, and a "web master/mistress" who is worthy of running any web site
would NEVER EVER tell people to use Matt's Scripts.
# Guestbooks, hit counters, shopping carts: Get Matt's Script Archive
This is the reason people like you get made fun of: the scripts on
Matt's Scripts Archive are shit. They are insecure, and if you have
them on your site, expect to get hacked. They are horribly written and
virtually impossible to fix. If you run them, you are clueless.
# "There is no such thing as being a stupid woman."
I beg to differ. I submit this post as evidence.
--
PerLover
PerLover@PerLove.com
Better Sex Through Coding
------------------------------
Date: 11 Jul 2000 19:50:06 GMT
From: care227@attglobal.net.bbs@openbazaar.net (Drew Simonis)
Subject: Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!!
Message-Id: <3bMcNU$YG6@openbazaar.net>
p3rlc0dr@my-deja.com wrote:
>
> Ive been reading this board for awhile and Im very disaponted with the
^^^^^
What board? Oh... you mean web board? I should stop reading
now, but I can't resist the chance to make fun of you.
> atitudes and acts of many of the so-called "PERL elites". When a
> person comes to this board and asks for help do they get it NO!!!!!!!!
You obviously are in an altered state. Almost everyone who comes
and posts here gets an answer. Almost all of those answers are
correct and accurate. Just because folks don't distribute free
software like pixie dust doesn't mean they aren't being helpfull.
>
> Y NOT?!?!
>
> Maybe its the ATITUDE and ARROGENSE of the ppl on this board who think
:No entry found for "ATITUDE" in the dictionary.
:No entry found for "ARROGENSE" in the dictionary.
board (bôrd, brd)
n. Abbr. bd. A long, flat slab of sawed lumber; a plank.
> that PERL being liked as a language to write webpages in gives them the
^^^^
http://www.perl.com/pub/doc/manual/html/pod/perlfaq1.html
heading: What's the difference between "perl" and "Perl"?
> right to make fun of and slight novice users who seek help on this
> board. DO YOU "PERL ELITES" OWN THIS BOARD, NO!
board (bôrd, brd)
n. Abbr. bd. A long, flat slab of sawed lumber; a plank.
If you have something to contribute, I'm sure you'd post it.
I bet from now on you are going to post lots of helpfull answers
to every question. Man, you rock!
> Does a person whoes <-- whoes? what is whoes?
> writing a question to another board like FreeBSD or Linux or Java or
board (bôrd, brd)
n. Abbr. bd. A long, flat slab of sawed lumber; a plank.
> Python get the same treatment, NO! Then why with PERL? What gives YOU
> "PERL ELITES" the right to treat nice people badly when they ask a
> simple question here?
Many simple questions have been asked and aswered, either via the
copius Perl documentation or in the archive of this NG. Asking
and answering them again and again isn't fun or productive. This
is a discussion forum, not a helpdesk. People like you who expect
people to drop everything and rish to your post are like gnats.
> PERL is so good and useful but this so-called comunity is mean and
http://www.perl.com/pub/doc/manual/html/pod/perlfaq1.html
heading: What's the difference between "perl" and "Perl"?
> unfriendly. WHY MUST YOU BE THAT WAY? Please change and B GOOD!
^^^^^^
Word up
------------------------------
Date: 11 Jul 2000 22:20:11 GMT
From: cberry@cinenet.net.bbs@openbazaar.net (Craig Berry)
Subject: Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!!
Message-Id: <3bMgJD$Wz_@openbazaar.net>
p3rlc0dr@my-deja.com wrote:
: Ive been reading this board
Use of the proper terminology will help you to persuade people. This is a
'newsgroup'. Also, your odd lack of punctuation, grammar and spelling
problems, and use of IRC-ish abbreviations will cause people to tune you
out. Note this is *not* a "grammar flame", but rather an attempt to help
you better convey your message.
: for awhile and Im very disaponted with the
: atitudes and acts of many of the so-called "PERL elites".
I'm not sure who calls us/them that. Most highly experienced Perlers are
rather charmingly self-deprecating (with a few very notable exceptions).
: When a
: person comes to this board and asks for help do they get it NO!!!!!!!!
Yes, they do, if they show that they have made a reasonable effort to help
themselves first. Doing just the minimum groundwork required by the rules
of good netiquette -- for example, reading the Perl FAQ, and at least a
few days' worth of newsgroup postings -- will almost guarantee that a
newcomer gets a warm welcome.
: Y NOT?!?!
Because so few do that.
: Maybe its the ATITUDE and ARROGENSE of the ppl on this board who think
: that PERL being liked as a language to write webpages in
Minor point of clarification: A good deal of the Perl code we all write
has nothing whatsoever to do with the web, although it is quite popular in
web-related work.
: gives them the right to make fun of and slight novice users who seek
: help on this board.
We don't slight novices. We slight rude people, novice or otherwise.
There's a big difference.
[snip]
: What gives YOU "PERL ELITES" the right to treat nice people badly when
: they ask a simple question here?
If that simple question is answered in the FAQ, or was answered in another
thread earlier that day, the poster in question is not "nice". Rather, he
or she is an arrogant, boorish oaf who thinks nothing of wasting the
(volunteered!) time of thousands of other people with redundant questions.
: PERL is so good and useful but this so-called comunity is mean and
: unfriendly. WHY MUST YOU BE THAT WAY? Please change and B GOOD!
If I am holding a party, and you arrive, listen to ongoing conversations,
then join one and engage in a polite discussion with the other guests, I
will be glad that you came. If you barge in screaming "Where are the
drinks?!" at the top of your lungs, ignoring people who try to point out
the bar to you, I will ask you to leave -- and not politely, either.
: "There is no such thing as being a stupid woman."
Would that it were so...alas, they seem to run about the same rate men do.
--
| Craig Berry - http://www.cinenet.net/users/cberry/home.html
--*-- "Beauty and strength, leaping laughter and delicious
| languor, force and fire, are of us." - Liber AL II:20
------------------------------
Date: 14 Jul 2000 07:50:03 GMT
From: nnickee@nnickee.com.bbs@openbazaar.net (Nnickee)
Subject: Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!!
Message-Id: <3bOaBR$Xa7@openbazaar.net>
On Fri, 14 Jul 2000 07:01:15 GMT, someone claiming to be
pjlees@ics.forthcomingevents.gr (Philip Lees) said:
>On 13 Jul 2000 18:31:02 GMT, dha@panix.com (David H. Adler) wrote:
>>Unfortunately, many, if not most, people who have this difficulty
>>appear to show up and not point that out. They merely ask the same
>>question that is answered in the docs instead of saying "I've read the
>>docs and don't understand [insert specific point of misunderstanding
>>here]".
>Even if you do that, it doesn't help. I posted a (beginner's) question
>recently. I had read the relevant docs and said so in my post.
>However, it appeared that many of the regular posters here hadn't read
>the post carefully enough to notice that and just responded with the
>kneejerk RTFM response. When I got pissed off by that I got killfiled.
RTFM responses are GOOD responses for a couple of reasons. Number
one, they teach the beginner where they can find their own answers to
their questions, without having to wait for someone to respond to
their post. Number two, they conserve bandwidth. (Picking a faq at
random here: Compare a one line response of "perlfaq4: why am I
getting long decimals instead of the numbers I should be getting" to
the 6 paragraph answer to that question in the faq. How many times is
that question asked every day? Saving bandwidth is a GOOD thing.)
I posted a barely-beyond-beginner's question just a few hours ago.
Granted only a couple of people have answered me so far (multiple
answers from each), but not a single answer contained "see [faq | func
| whatever ]". The answers that I've gotten so far have contained
multiple examples as well as explanations of why my code was doing
what it was doing. Why did I get good answers? I believe it has
something to do with the fact that I stated which faqs / man pages I'd
read, posted multiple snippets that I'd tried, and indicated that I
had no problem whatsoever going back and re-reading the same docs /
different docs that were referred to me.
Was the post of yours that you referred to above the "strange behavior
in upper case conversion" question? I seem to remember a *lot* of
good answers to that one.
>I'm struggling on with Perl, but I don't expect to get any help from
>this newsgroup.
And you won't, if you say stuff like that. You'll get back from this
group what you put into it. If you follow the conventions and
"standards", you'll be rewarded with all the help you need.
I don't think you (and many others, not just picking on you here)
realize what a terrific resource this newsgroup is. Some of the very
best Perl coders in the world - *in the world*! - spend their valuable
free time reading this group and answering the same questions over and
over again. These folks don't have to do this. They do it to give
back to the Perl community. They don't ask for a single solitary
penny for this (and they're worth far more than that, I assure you!).
The very least that we, the beginners, the askers, can do is to follow
the Guru's "rules" since we're asking them to give us for free what
they could very well charge us for (answers, advice, code snippets,
etc.).
Just my $0.10 (yes, I do think my opinion is worth more than 2 cents
:)
Nnickee
------------------------------
Date: 17 Jul 2000 13:10:01 GMT
From: pjlees@ics.forthcomingevents.gr.bbs@openbazaar.net (Philip Lees)
Subject: Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!!
Message-Id: <3bRD3Q$U0G@openbazaar.net>
On Fri, 14 Jul 2000 02:57:40 -0500, Nnickee <nnickee@nnickee.com>
wrote:
>RTFM responses are GOOD responses for a couple of reasons.
I agree that referring newbies to the documentation is a good idea in
general, for the reasons you give. In fact, some of the responders to
my question pointed me at a doc I hadn't read, and that was very
helpful, as I acknowledged at the time.
However, if the newbie in question has already read the relevant
section of the docs, and says so explicitly, then referring him/her
back to the same place with no extra comment is unlikely to be very
helpful.
>Was the post of yours that you referred to above the "strange behavior
>in upper case conversion" question? I seem to remember a *lot* of
>good answers to that one.
Yes it was, and yes I got some helpful answers. I wasn't trying to
suggest that everybody responds in the same way. The specific response
I objected to was as follows:
>Errr, you know that this is equivalent to:
>
>$name =~ tr/a-z/A-Z/;
>
>right? Because you read the documentation in the perlop page of the
>manual for the bind operator, tr///, and s///, right?
>
><Snipped the evidence that you have *not* read the proper documentation,
>but would rather have someone else read it for you, and regurgitate.>
>
>Whoops...
>
>> I'm sure this will seem quite simple to you gurus.
>
>It's quite simple for anyone who RTFM.
Given that I had read the relevant sections of perlop and said so,
what is the point in posting offensive, supercilious crap like this?
Talk about wasting bandwidth.
>>I'm struggling on with Perl, but I don't expect to get any help from
>>this newsgroup.
>
>And you won't, if you say stuff like that. You'll get back from this
>group what you put into it. If you follow the conventions and
>"standards", you'll be rewarded with all the help you need.
Yeah, OK. Maybe that was too much 'attitude'.
>I don't think you (and many others, not just picking on you here)
>realize what a terrific resource this newsgroup is.
<snip>
>The very least that we, the beginners, the askers, can do is to follow
>the Guru's "rules" since we're asking them to give us for free what
>they could very well charge us for (answers, advice, code snippets,
>etc.).
I _always_ follow the rules (lurk, etc.) and this time was no
exception.
Phil
--
Philip Lees
ICS-FORTH, Heraklion, Crete, Greece
Ignore coming events if you wish to send me e-mail
'The aim of high technology should be to simplify, not complicate' - Hans Christian von Baeyer
------------------------------
Date: 17 Jul 2000 14:30:01 GMT
From: cal@iamcal.com.bbs@openbazaar.net (Cal Henderson)
Subject: Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!!
Message-Id: <3bRF7R$TLZ@openbazaar.net>
"Drew Simonis" <care227@attglobal.net> wrote:
: I got excited when Kibo sent me email. But I was far more excitable
: then.
You got mail form kibo? wow.
--
Cal Henderson
sub a{my$a=reverse shift;$a=~y/b-z/a-y/;unshift@a,$a;}sub b{$c.=reverse
shift; while(length($c)>=$b[0]){a(substr($c,0,$b[0]));$c=substr($c,$b[0]);
shift@b;}}@b=(6,3,5,4,10,6,4,4,2,1);$a="l?jouipv"."ezvmxpbuxih";$a.=
",jofoqqibmzamsfsfxfjtuiIg";while($a ne ""){b(substr($a,0,2));$a=
substr($a,2);}print join(" ",@a);
------------------------------
Date: 17 Jul 2000 13:30:02 GMT
From: merlyn@stonehenge.com.bbs@openbazaar.net (Randal L. Schwartz)
Subject: Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!!
Message-Id: <3bRDSP$VKF@openbazaar.net>
>>>>> "Philip" == Philip Lees <pjlees@ics.forthcomingevents.gr> writes:
Philip> I agree that referring newbies to the documentation is a good idea in
Philip> general, for the reasons you give. In fact, some of the responders to
Philip> my question pointed me at a doc I hadn't read, and that was very
Philip> helpful, as I acknowledged at the time.
Philip> However, if the newbie in question has already read the relevant
Philip> section of the docs, and says so explicitly, then referring him/her
Philip> back to the same place with no extra comment is unlikely to be very
Philip> helpful.
I think you'll find that experts generally do pick up on the
questioner having said "I've read X Y Z, and here's what I don't get
about that". First, that's pretty rare, and second, it would be even
rarer to get a flat "RTFM" once that has happened. :) I challenge
you to pick out the 1% of the cases that are like that against the
normal 99% of the cases. Go ahead. Deja.com is your friend. :)
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: 17 Jul 2000 15:10:02 GMT
From: russ_jones@rac.ray.com.bbs@openbazaar.net (Russ Jones)
Subject: Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!!
Message-Id: <3bRG9R$UaR@openbazaar.net>
Cal Henderson wrote:
>
> "Drew Simonis" <care227@attglobal.net> wrote:
>
> : I got excited when Kibo sent me email. But I was far more excitable
> : then.
>
> You got mail form kibo? wow.
>
I bet it wasn't the One True Kibo.
I got email from Fred Phelps once.
--
Russ Jones - HP OpenView IT/Operatons support
Raytheon Aircraft Company, Wichita KS
russ_jones@rac.ray.com 316-676-0747
Quae narravi, nullo modo negabo. - Catullus
------------------------------
Date: 17 Jul 2000 16:00:02 GMT
From: cal@iamcal.com.bbs@openbazaar.net (Cal Henderson)
Subject: Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!!
Message-Id: <3bRHO3$U8M@openbazaar.net>
"Russ Jones" <russ_jones@rac.ray.com> wrote...
:
: I bet it wasn't the One True Kibo.
:
: I got email from Fred Phelps once.
:
pah, Kibo rules
--
cal
www.iamcal.com
------------------------------
Date: 17 Jul 2000 20:40:03 GMT
From: care227@attglobal.net.bbs@openbazaar.net (Drew Simonis)
Subject: Re: ATTENTION PERL MACHOES!!!!!!!!!!!!!!!!!!!
Message-Id: <3bROc3$VyL@openbazaar.net>
Russ Jones wrote:
>
> Cal Henderson wrote:
> >
> > "Drew Simonis" <care227@attglobal.net> wrote:
> >
> > : I got excited when Kibo sent me email. But I was far more excitable
> > : then.
> >
> > You got mail form kibo? wow.
> >
>
> I bet it wasn't the One True Kibo.
>
Oh, it was. I don't recall why, but he sent me a new text for
my sig file. Something to the effect of "I got mail from Kibo"
Odd, even then.
------------------------------
Date: 16 Jul 2000 22:20:02 GMT
From: thunderbear@bigfoot.com.bbs@openbazaar.net (Thorbjørn Ravn Andersen)
Subject: Re: ATTENTION PERL MEATHEADS
Message-Id: <3bQbh3$UuG@openbazaar.net>
"Godzilla!" wrote:
> Perhaps you have encountered one of my guestbook
> scripts out on the net. Mine are those guestbooks
> which crash your system when you try to crash one
> of my guestbooks. I am sure you personally have
> experienced this oddity.
I am afraid I have to disappoint you there. I have not yet
met such a guestbook, but I would be happy to try one which
you promise to crash my system.
Could I have an URL please?
--
Thorbjørn Ravn Andersen "...plus...Tubular Bells!"
http://bigfoot.com/~thunderbear
------------------------------
Date: 13 Jul 2000 02:40:03 GMT
From: bob@bob-n.com.bbs@openbazaar.net (Bob Niederman)
Subject: autoflushing not as good as closing?
Message-Id: <3bNcW3$Ua1@openbazaar.net>
I got tired of nslookup not having readline support. (I first looked at
the source code for nslookup to see if I could hack this. I have NO
idea what is going on when they read a command. It appear purposefully
obfuscated to me, but then I'm not much of a c programmer.
So I fugred, OK, IPC::Open3 + Term::ReadLine should do it.
Here's what I wrote:
#!/usr/bin/perl -w
use strict;
use IPC::Open3;
use FileHandle;
use Term::ReadLine;
my $term = new Term::ReadLine 'readline support';
STDERR->autoflush(1);
STDOUT->autoflush(1);
my($WTR, $RDR) = (FileHandle->new, FileHandle->new);
my $pid = open3($WTR, $RDR, $RDR, "$ARGV[0]");
die "open3 failed" unless $pid;
autoflush $WTR 1;
my ($rout, $rin, $prompt) = ('', '', '');
vec($rin,fileno($RDR),1) = 1;
$SIG{ALRM} = sub {
my $nfound = select($rout=$rin, undef, undef, 0);
if ( $nfound ) {
my ( $nread, $read_stuff);
$nread = sysread $RDR, $read_stuff, 2048;
if ( defined $nread and $nread ) {
print $read_stuff;
}
}
alarm(1);
return;
};
alarm(1);
while ( defined ( my $input = $term->readline($prompt) ) ) {
$input .= "\n";
syswrite $WTR, $input;
# close $WTR;
}
close $WTR;
close $RDR;
# END
this is a file called rl.pl, so its use is:
rl.pl nslookup
except it doesn't work. The initial output of nslookup starting up
appears, but nothing happens after inputting a command. If the 'close
$WTR' is uncommneted inside the while loop, however, then the output of
the first command IS returned as expected. Of course, all subsequent
commands fail due to writing on a closed filehandle.
The program works as written if used with cat (rl.pl cat).
I don't get it. Why isn't autoflushing $WTR (I've tried this with print
or using syswrite, which also does no buffering) as good as closing the
file?
Almost forgot:
# perl -v
This is perl, version 5.005_03 built for i386-linux
on redhat linux 6.0
--
- Bob Niederman http://bob-n.com
Fight UCITA! http://www.4cite.org, http://bob-n.com/ucita
------------------------------
Date: 17 Jul 2000 19:20:03 GMT
From: dlwhite@csua.berkeley.edu.bbs@openbazaar.net (David)
Subject: B::Lint usage
Message-Id: <3bRMY5$U1i@openbazaar.net>
I am attempting to use the B::Lint module to check my perl code. I am
having difficulty with the -u option, and checking packages other than
main. The file I am checking is 'myfile.pl'.
If myfile.pl uses a single-word package name like 'Foo', and puts
'package Foo;' at the top, everything works ok:
Running "perl -MO=Lint,-uFoo,all myfile.pl" produces the warnings that I
expect.
However, if the package name contains several words separated by '::',
it does not work as I expect. If myfile.pl is changed to use a package
name like 'Foo::Bar', and put 'package Foo::Bar' at the top, running
"perl -MO=Lint,-uFoo::Bar,all myfile.pl" produces none of the warnings
that were present before. Since no changes were made other than the
package name, I am assuming this means it had trouble finding the
correct package to check.
What do I need to do to make it check myfile.pl correctly with a package
name like 'Foo::Bar'?
David
------------------------------
Date: 17 Jul 2000 19:40:04 GMT
From: david@uclink.berkeley.edu.bbs@openbazaar.net (David)
Subject: B::Lint usage
Message-Id: <3bRNB9$W43@openbazaar.net>
I am attempting to use the B::Lint module to check my perl code. I am
having difficulty with the -u option, and checking packages other than
main. The file I am checking is 'myfile.pl'.
If myfile.pl uses a single-word package name like 'Foo', and puts
'package Foo;' at the top, everything works ok:
Running "perl -MO=Lint,-uFoo,all myfile.pl" produces the warnings that I
expect.
However, if the package name contains several words separated by '::',
it does not work as I expect. If myfile.pl is changed to use a package
name like 'Foo::Bar', and put 'package Foo::Bar' at the top, running
"perl -MO=Lint,-uFoo::Bar,all myfile.pl" produces none of the warnings
that were present before. Since no changes were made other than the
package name, I am assuming this means it had trouble finding the
correct package to check.
What do I need to do to make it check myfile.pl correctly with a package
name like 'Foo::Bar'?
David
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
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.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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.
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 V9 Issue 3707
**************************************
