[8276] in Perl-Users-Digest
Perl-Users Digest, Issue: 1893 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Feb 13 19:08:19 1998
Date: Fri, 13 Feb 98 16:00:22 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Fri, 13 Feb 1998 Volume: 8 Number: 1893
Today's topics:
[OT] Re: Killfile Triage (Thorsten Fenk)
Re: auto responder script <shimpei+this+address+is+NOT+munged+.mil+.gov@socrates.caltech.edu>
converting SGML special characters to HTML <mdelagra@eb.com>
Re: converting SGML special characters to HTML (Earl Hood)
Re: Creating Arrays from a file of names <tmccoy@cadence.com>
Re: how to get back Filename from FILEHANDLE ?! <jhi@alpha.hut.fi>
Re: Learning Perl (Amy Williams)
Re: Learning Perl (Jonathan Feinberg)
Re: Learning Perl (Martin Vorlaender)
Re: Location: returns empty document? <schmitzp@no.spam.wxs.nl>
Re: Location: returns empty document? (Nathan V. Patwardhan)
Re: Moderated ng [Was: Re: So what about last summer's <*@qz.to>
Re: MS Visual Perl (A Satire!) (Martin Vorlaender)
Re: on reading FAQs and gurus answering questions (Ronald L. Parker)
Re: on reading FAQs and gurus answering questions <doug@weboneinc.com>
Re: pattern Search problem (Hunter Johnson)
Printing $query->param in a here-doc? (Mark666769)
reference in string <hans.leichtl@digital.com>
Re: sorting an array (Hunter Johnson)
Re: The Young Man and the Beach (Nem W Schlecht)
The Young Man and the Beach: a solution to his problem? <Rosie@dozyrosy.demon.co.uk>
Re: Tom wins flamer of the year award! <doug@weboneinc.com>
Re: what does "deprecate" mean? <jhi@alpha.hut.fi>
Where to start. <brad@liquid-web.com>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 13 Feb 1998 21:27:04 GMT
From: t.fenk@gmx.net (Thorsten Fenk)
Subject: [OT] Re: Killfile Triage
Message-Id: <slrn6e9el8.q8.t.fenk@ripley.westfalen.de>
In <eyhk9aztp2o.fsf@liddell.cstr.ed.ac.uk> Richard Caley wrote:
>>(...)
>So, people who put requests not to be spammed in their headers should
>be killed but people like me who have applied some spamproofing should
>not. I'm not clear on the logic here.
A "nospam|DELETE|Rot 13" is easier to catch than
"Replace foo with bar|Remove the bird from the Adress".
Q: Is there an english Version of the "Munged E-Mail Adresses FAQ" ?
The one I know is in german
http://home.pages.de/~gerlo/falsche-email-adressen.html
regards
Thorsten
------------------------------
Date: 13 Feb 1998 23:43:24 GMT
From: Shimpei Yamashita <shimpei+this+address+is+NOT+munged+.mil+.gov@socrates.caltech.edu>
Subject: Re: auto responder script
Message-Id: <6c2lqs$8gc@gap.cco.caltech.edu>
Benji Spencer <spunge@ripco.com> writes:
>
>I am looking for a auto responder script. I knwo this wouldn't be all
>that hard to do, but I am sure someone out there has already written
>one, probably better then I could. I however, wasn't too sure where to
>start looking for something like this.
>
>what I need to be able to do, is email somethign like info@domain.com,
>and have the auto responder send info back (via aliases). Nothgin real
>hard.
>
>if anyone has ideas, please let me know. it would also help if you
>cc'ed me in the email, as tis group tends to be a bit busy. Thanks
man procmail
man procmailex
It could be done with a perl script, but don't bother reinventing the
wheel.
--
Shimpei Yamashita <http://www.patnet.caltech.edu/%7Eshimpei/>
The address I have listed in the headers is a working address. It just
looks like it's an invalid address in order to fool spammers collecting
addresses from newsgroups.
------------------------------
Date: Fri, 13 Feb 1998 13:57:45 -0600
From: Morgan Delagrange <mdelagra@eb.com>
Subject: converting SGML special characters to HTML
Message-Id: <34E4A5B9.1284E60C@eb.com>
Hi Perl gurus,
There are a lot of perl programs out there that convert SGML documents
to HTML documents, but I'm looking for something a little different. I
want something that will look at an SGML string, determine if its
special characters are within the HTML standard, and, if not, convert
the SGML characters to an HTML equivalent appropriate for display.
For example, if I had the SGML characer 'ā' I would like it
converted to '<u>a</u>'. Does anyone know of a perl program to do this?
Thanks in advance,
- Morgan
PS. Please send responses via email as well, if you have the
capability.
------------------------------
Date: 13 Feb 1998 23:07:53 GMT
From: ehood@medusa.acs.uci.edu (Earl Hood)
Subject: Re: converting SGML special characters to HTML
Message-Id: <6c2jo9$prn@news.service.uci.edu>
In article <34E4A5B9.1284E60C@eb.com>,
Morgan Delagrange <mdelagra@eb.com> wrote:
>There are a lot of perl programs out there that convert SGML documents
>to HTML documents, but I'm looking for something a little different. I
>want something that will look at an SGML string, determine if its
>special characters are within the HTML standard, and, if not, convert
>the SGML characters to an HTML equivalent appropriate for display.
>
>For example, if I had the SGML characer 'ā' I would like it
>converted to '<u>a</u>'. Does anyone know of a perl program to do this?
You did not state if the SGML "string" was just regular pcdata or
can contain tags.
If just a pcdata/rcdata string, you can do a simple search and
replace on the string with the replacement using a hash that maps
SGML entity references to the appropriate HTML text. Example:
$str =~ s/\&([\w\.\-]+);?/$map{$1}/g;
Here, %map is our mapping indexed by entity name.
If dealing with full SGML markup, a trick is to create variant ISO
character entity files where the values of the special character
entities is their HTML equivalents. Hence, the SGML parser hands you
the appropriate output text during translation.
--ewh
--
Earl Hood | University of California: Irvine
ehood@medusa.acs.uci.edu | Electronic Loiterer
http://www.oac.uci.edu/indiv/ehood/ | Dabbler of SGML/WWW/Perl/MIME
------------------------------
Date: Fri, 13 Feb 1998 15:20:04 -0800
From: Timothy McCoy <tmccoy@cadence.com>
Subject: Re: Creating Arrays from a file of names
Message-Id: <34E4D523.B9380ECB@cadence.com>
Here's one way to do it:
#!/usr/local/bin/perl
while ($file = shift)
{
print "$file:\n";
$open = open(FIL, "<$file") || warn "Can't find that file '$file'\n";
if ($open)
{
@data = (<FIL>); # slurp the whole thing in
map {$j++; print "$_ "; print "\n" if (($j % 10) == 0) } split(/\s+/,
"@data");
close(FIL);
print "\n"; print "\n" if (($j % 10) == 0)
}
}
example:
script.pl list.hppa list.sun4
list.hppa:
rb715a rb715a2 rb715a3 rb715a4 rb715a5 rb715a6 rb715a9 rb715aa rb715b
rb715b3
rb715b4 rb715b6 rb715b8 rb715b9 rb715bb rb715c rb715c2 rb715c3 rb715c4
rb715c5
rb715c6 rb715c7 rb715c8 rb715c9 rb715d rb715d2 rb715d3 rb715d4 rb715d5
rb715d6
rb715d7 rb715d8 rb715d9 rb715e rb715e2 rb715e3 rb715e4 rb715ee rb715f
rb715ff
rb715g rb715gg rb715h rb715hh rb715j rb715kk rb715m rb715n rb715nn rb715o
rb715p rb715q rb715qq rb715r rb715rr rb715s rb715t rb715tt rb715uu rb715v
rb715vv rb715w rb715x rb715y rb715yy rb715z rb715zz rb730a rb730c rb730d
rb730e rb730f rb730g rb750a rb750b rb750c rb750d rb750e rb750f rb750g
rb750h rb750j rb750k rb750m rb750n rb750o rb750t rb750u rbadmin rbc100a
rbc110a rbc110b rbc110c rbc110d rbc110e rbc110f rbc110g rbc110h rbc110j
rbc110k
rbc110m rbc110n rbj200a rbj200b rbj200c rbj200d rbj200e rbj200f rbj200g
rbj200h
rbj200j rbj200k rbj200m rbj200n rbj210a rbj210b rbj210c rbj210d rbj210e
rbj210f
rbj210g rbj210h rbj210j rbj210k rbj210m rbj210n rbj210p rbj210q rbj210r
rbj280a
rbpo
list.sun4:
rbsun10a rbsun10b rbsun20a rbsun20b rbsun20c rbsun20d rbsun20e rbsun20f
rbsun20g
rbsun20h rbsun20j rbsun20k rbsun20m rbsun20n rbsun20o rbsun20p rbsun20q
rbsun20r rbsun20s
rbsun20u rbsun20x rbsun20y rbsun5a rbsun5b rbsun5c rbsun5d rbsun5f rbsuna2
rbsund
rbsune rbsung rbsunj rbsunk rbsunx rbsunz rbult1b rbult1c rbult1d rbult1e
rbult1f rbult1g rbult1h rbult1j rbult1k rbult1m rbult1n rbult1p rbult1q
rbult1r
rbult1s rbult1t rbult1u rbult1v rbult1w rbult1x rbult1y rbult1z rbult1a1
rbult1a2
rbult1a3 rbult1a4 rbult1a5 rbult1a6 rbult1a7 rbult1a8 rbult2a rbult2b
rbult1b1 rbult1b2
rbultra1
%
> Hello,
>
> I have a file containing machine names. The file can be put into either
> of two forms; one form has
> the names each to a line, all 1100 of them; the other form has the names
> occupying one long line
> with the names separated by spaces. I need to know how do I produced a
> file with lines containing
> 10 hostnames per row with the names separated by spaces.
>
> In pictures:
> from this: x or this: x x x x x x x x x x x x
> x x x x x x x x x x x x x x x x x x x x x x
> x
> x
> x
>
> to this: x x x x x x x x x x
> x x x x x x x x x x
> x x x x x x x x x x
> x x x x x x x x x x
>
> Thank You,
> J. Roundtree
--
I speak for myself whether this is business or otherwise.
------------------------------------------------------------
Tim McCoy, Senior Member Technical Staff
Cadence Design Systems email: tmccoy@cadence.com
15151 Innovation Drive voice: 619 618 2945
San Diego, CA 92128 fax: 619 618 1454
------------------------------------------------------------
"Faith like light should always be simple and unbending;
while love, like warmth, should beam forth on every side,
and bend to every necessity of our brethren." Martin Luther
[And let us not be weary in well doing . . . Galatians 6:9]
------------------------------
Date: 14 Feb 1998 01:12:19 +0200
From: Jarkko Hietaniemi <jhi@alpha.hut.fi>
Subject: Re: how to get back Filename from FILEHANDLE ?!
Message-Id: <oee4t23yu98.fsf@alpha.hut.fi>
Claus van de Vlierd <vlierd@uni-oldenburg.de> writes:
> If i am doing something like
> $FH="FH00";
> open($FH,"/tmp/xxx");
> --- how can I , later on , from the sheer knowledge of
> the Filehandle FH00 regain the name of my File ("/tmp/xxx")
> to which it is referring after the "open" ?!?
You don't.
You don't, anymore than you can in C from a stdio FILE * or in UNIX C
from an int fd. If you want to keep track of such things...well, you
need to keep track of such things.
--
$jhi++; # http://www.iki.fi/~jhi/
# There is this special biologist word we use for 'stable'.
# It is 'dead'. -- Jack Cohen
------------------------------
Date: Tue, 10 Feb 1998 23:37:47 GMT
From: epic@aros.net (Amy Williams)
Subject: Re: Learning Perl
Message-Id: <34e0e476.6191136@news.aros.net>
On Tue, 10 Feb 1998 22:02:08 GMT, cowboy@cnnw.net (James L. Taylor)
wrote:
>I'm reading Programming Perl at the moment and I am understanding some
>but not all of it, I do the excercises in the book and they eventually
>work when I figure out what I have done wrong, but the symbols, codes,
>syntax's whatever they are called, I don't understand what they mean
>or how they are used, some of it is explained and what they mean, but
>this old dog isn't grasping alot of it...is this the book I need to
>BEGIN with or am I to far ahead of myself??
Programming Perl is more of a reference guide, don't start with that.
I'd recommend starting with Learning Perl.
--
Amy Williams | Amy Williams Web Page Design
epic@aros.net | and CGI Scripting
http://www.aros.net/~epic/ | http://www.aros.net/~epic/html.html
------------------------------
Date: Fri, 13 Feb 1998 18:27:20 -0500
From: jdf@pobox.com (Jonathan Feinberg)
Subject: Re: Learning Perl
Message-Id: <MPG.f4ea0df6fe13ed69896c2@news.concentric.net>
jason@primal.ucdavis.edu said...
> On 13 Feb 1998, Eric D. Friedman wrote:
>
> > open WORDLIST, "<wordlist" || die "Can't open wordlist: $!";
> ^
> (1) ^-- Why this? Isn't it implied?
That idiom is used in the spirit of "programs are for people to read."
It makes your intentions explicit to whoever maintains your code.
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
------------------------------
Date: Fri, 13 Feb 1998 22:34:49 +0100
From: martin@RADIOGAGA.HARZ.DE (Martin Vorlaender)
Subject: Re: Learning Perl
Message-Id: <34e4bc79.524144494f47414741@radiogaga.harz.de>
Eric D. Friedman (friedman@uci.edu) wrote:
: James L. Taylor <cowboy@cnnw.net> wrote:
: <open(WORDSLIST, "wordslist.pl"); # I have this named wordslist &
: does "Learning Perl" really have an open() without the
: accompanying check for an error?
: You should always write open() this way:
: open WORDLIST, "<wordlist" || die "Can't open wordlist: $!";
Nice try, but no cigar. The precedence of operators dictates that this is
equivalent to
open WORDLIST, ("<wordlist" || die "Can't open wordlist: $!");
which is a funny file name for a wordlist. So,
You should always write open() this way:
open (WORDLIST, "<wordlist") || die "Can't open wordlist: $!";
or that way:
open WORDLIST, "<wordlist" or die "Can't open wordlist: $!";
The use of '<' is optional. But it makes a nice visual appearance.
cu,
Martin
--
| Martin Vorlaender | VMS & WNT programmer
Ceterum censeo | work: mv@pdv-systeme.de
Redmondem delendam esse. | http://www.pdv-systeme.de/users/martinv/
| home: martin@radiogaga.harz.de
------------------------------
Date: Fri, 13 Feb 1998 13:52:18 -0800
From: "P. Schmitz" <schmitzp@no.spam.wxs.nl>
Subject: Re: Location: returns empty document?
Message-Id: <34E4C092.338E2CB6@no.spam.wxs.nl>
Hi everyone,
In regards to my previous post on this subject:
I just discovered that if I change the perl script to this:
print "HTTP/1.0 302 Object moved\r\nLocation: http://www.yahoo.com\r\n\r\n";
it does work! That is, my browser executes the redirect instead of
complaining that the 'Document contains no data'.
Now I guess my question is: why is this necessary in a perl script, and not
in a C script? The web server is an NT 4.0 Server box with IIS 3.0 and perl
5.
Thanks,
Pepijn
--
Remove the 'no.spam.' from my email adress if you want
to reply!
------------------------------
Date: 13 Feb 1998 21:58:52 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: Location: returns empty document?
Message-Id: <6c2fms$k47@fridge.shore.net>
P. Schmitz (schmitzp@wxs.nl) wrote:
: Now I guess my question is: why is this necessary in a perl script, and not
: in a C script? The web server is an NT 4.0 Server box with IIS 3.0 and perl
: 5.
What's a C script?
--
Nathan V. Patwardhan
------------------------------
Date: 13 Feb 1998 22:09:20 GMT
From: Eli the Bearded <*@qz.to>
Subject: Re: Moderated ng [Was: Re: So what about last summer's RFD? Let's go moderated.]
Message-Id: <qz$9802131655@qz.little-neck.ny.us>
Malcolm Hoar <malch@malch.com> wrote:
> fl_aggie@thepentagon.com (I R A Aggie) wrote:
> >Ummm...create "comp.lang.perl.wizards", make it moderated and all posts,
> >including xposts, go into /dev/null.
> Ummmm, "comp.lang.perl.moderated" sounds better to me.
>
> It's a more accurate description and doesn't smack of elitism!!!
You missed the point completely. The idea is that *no one* will use
comp.lang.perl.wizards for real discussion. It will only be for people
who naively think their post is "wizard material" and thus try to post
it there. The group will then throw away that post and lots of noise
in comp.lang.perl.* goes away.
A nice suggestion, but not one to be taken seriously, IMHO.
> OK, maybe we need a "comp.lang.perl.elite" group too ..... yuk!
YM "P5P" HTH.
Elijah
------
owner, alt.dev.null
------------------------------
Date: Fri, 13 Feb 1998 22:53:29 +0100
From: martin@RADIOGAGA.HARZ.DE (Martin Vorlaender)
Subject: Re: MS Visual Perl (A Satire!)
Message-Id: <34e4c0d9.524144494f47414741@radiogaga.harz.de>
Stuart Bullock (stuart_bullock@bigfoot.com) wrote:
: Microstuff Announce MS Visual Perl 2.0 - A Satire
: =================================================
And again, fiction has been obsoleted by reality:
ActiveState Visual Perl
January 7, 1998 -- ActiveState Visual Perl is an Integrated Development
Environment (IDE) for Perl. It is currently under development and the
first beta is expected for release in February.
[from the ActiveState home page, http://www.activestate.com/]
cu,
Martin
(who wonders whether M$ has a copy-rite on 'Visual',
like they tried to have one on 'Windows')
--
| Martin Vorlaender | VMS & WNT programmer
Ceterum censeo | work: mv@pdv-systeme.de
Redmondem delendam esse. | http://www.pdv-systeme.de/users/martinv/
| home: martin@radiogaga.harz.de
------------------------------
Date: Fri, 13 Feb 1998 21:57:57 GMT
From: ron@farmworks.com (Ronald L. Parker)
Subject: Re: on reading FAQs and gurus answering questions
Message-Id: <34e4c13e.32500543@10.0.2.33>
On Fri, 13 Feb 1998 09:07:37 -0500, fl_aggie@thepentagon.com (I R A
Aggie) wrote:
>In article <6bvta0$9g1@fridge.shore.net>, nvp@shore.net (Nathan V.
>Patwardhan) wrote:
>
>+ Again, I'll ask you, when's the last time that you've seen Larry
>+ around these parts?
>
>Ummm...Never? I don't think clp.misc existed when I last saw a live
>posting from Larry.
What's that we always say? Oh, right. "Check Dejanews!"
Here's Larry's most recent posting in this group. Interestingly, it's
not a "I'm fed up and I'm not coming back" post.
Subject: Re: [Q] while (($k,$v)=each %FOO) trauma
From: lwall@netlabs.com (Larry Wall)
Date: 1996/04/03
Message-ID: <1996Apr3.012516.17064@netlabs.com>
Newsgroups: comp.lang.perl.misc
------------------------------
Date: Fri, 13 Feb 1998 17:28:25 -0500
From: Douglas Clifton <doug@weboneinc.com>
Subject: Re: on reading FAQs and gurus answering questions
Message-Id: <34E4C909.969C6A53@weboneinc.com>
Since _so_ many of the posts are about CGI and Perl
has got to be the number 1 language of choice for
CGI programmers, why not:
comp.lang.perl.cgi
as a group specifically targeted at Perl/CGI programmers?
I am aware of (and read) c.i.w.a.cgi which is also bloated
with questions about Perl rather than strictly CGI
Also, is anyone periodically posting the Perl FAQ?
Just my $.02,
~d
------------------------------
Date: 13 Feb 1998 23:10:08 GMT
From: jhunterj@lexis-nexis.com (Hunter Johnson)
Subject: Re: pattern Search problem
Message-Id: <6c2jsg$4ee@mailgate.lexis-nexis.com>
In article <34E46415.8569FEE@cisco.com>,
Bob Maillet <bmaillet@cisco.com> wrote:
> After I enter this pattern search and replace: $_=~s/\.\ \;
> [^.]/\.\ \; [^A-Z]/g;
> The output prints This is a test. [A-Z]his is only a test. [A-Z]o
> not attempt to adjust your television.
> How can I get the case to change here? My output is printing [A-Z]
> instead of the letter I would like change case on.
Well, we don't know what you're input is (other than guessing based on
the output). But [^A-Z] isn't magic in the replacement string.
How about:
$_ =~ s/\. (.)/". \u$1"/eg;
Hunter
--
J. Hunter Johnson | "A little consistent wholesome modeling and
jhunterj@lexis-nexis.com | costly servanthood are worth millions of
(937) 865-6800 x5385 | true words harshly spoken."
Lexis-Nexis, Dayton, OH | -- Ron Sider
------------------------------
Date: 13 Feb 1998 22:35:49 GMT
From: mark666769@aol.com (Mark666769)
Subject: Printing $query->param in a here-doc?
Message-Id: <19980213223500.RAA05828@ladder02.news.aol.com>
Hi,
Is it possible to print the results of a CGI.pm
function call in a here-doc, as follows:
use CGI;
$query = new CGI;
print <<ZZZ;
help me $query->param("WHO") please
ZZZ
without getting:
help me CGI=HASH(0xc70858)->param("WHO") please
I also tried this:
print <<ZZZ;
help me ${query->param("WHO")} please
ZZZ
But that gets me the compile time error:
Can't find string terminator "-" anywhere before EOF
Say what?
So... can it be done? Or do I have to extract the values into
plain old scalars before I print them in a here-doc? I have
about 2 dozen fields on this form, with all the HTML in a here
doc.
Thanks,
Mark
------------------------------
Date: Fri, 13 Feb 1998 17:09:45 -0500
From: "Hans Leichtl" <hans.leichtl@digital.com>
Subject: reference in string
Message-Id: <6c2gc8$99n$1@mrnews.mro.dec.com>
Hi,
i'd like to construct a 'permanent' reference in a string and have not
succeded in doing so.
basically i would like to do the following without the eval.
#!/usr/bin/perl
# ref test
$subst = "_a test_";
$str = " this is \$subst";
$t = $str;
eval "\$t = \"$t\"";
print "\n$t\n";
$subst = "_not a tree_";
$t = $str;
eval "\$t = \"$t\"";
print "\n$t\n";
is there a way to make perl keep the reference inside a string?
or should sprintf be used to construct the string each time (or eval, as
above)?
i've tried " .. ${\"varname\"} ..", but it only does it once.
i went through the perlref pages, but haven't found enlightenment yet.
thanks for any ideas/inputs.
hans
------------------------------
Date: 13 Feb 1998 22:16:01 GMT
From: jhunterj@lexis-nexis.com (Hunter Johnson)
Subject: Re: sorting an array
Message-Id: <6c2gn1$sfu@mailgate.lexis-nexis.com>
In article <34E45108.84D2E0F5@scom.ub.es>, MR <marga@scom.ub.es> wrote:
> Hello,
> I have an array of keys with this patern: xxxxYYYY where xxxx is a
> fixed char and YYYY are numbers. I want to sort the array by numeric
> valor of YYYY. There is a simple method???
> Something like:
> sub bynumber { "ubppp".$a <=> "ubppp".$b; }
> @sort_keys = sort bynumber @keys;
How about
sub bynumber { unpack("x5a*",$a) <=> unpack("x5a*",$b)}
@sort_keys = sort bynumber @keys;
You'll have to vary the number after the 'x' in the unpack template
depending on the length of your fixed char string.
Hunter
--
J. Hunter Johnson | "A little consistent wholesome modeling and
jhunterj@lexis-nexis.com | costly servanthood are worth millions of
(937) 865-6800 x5385 | true words harshly spoken."
Lexis-Nexis, Dayton, OH | -- Ron Sider
------------------------------
Date: 13 Feb 1998 16:28:10 -0600
From: nem@abattoir.cc.ndsu.nodak.edu (Nem W Schlecht)
Subject: Re: The Young Man and the Beach
Message-Id: <6c2hdq$347@abattoir.cc.ndsu.nodak.edu>
In comp.lang.perl.misc, Graham Barr <gbarr@ti.com> wrote:
>Mark Kramer wrote:
><ungrateful gibberish deleted>
>
>It is posts like these that are likely to alienate the people on
>this list who soul purpose for being here is to help. Sure
>we might get a little short with people at times but believe
>me this newsgroup would be almost useless if all these
>"good samaritans" left to help others who appreciated their
>input.
Unfortunately, many of us have left.
I now only read the articles that my killfile selects as somewhat valid.
Actually, I don't even really do that. I'll sometimes glance at some of
the articles.
Keep up the good work, Tom. You know you still have a lot of grateful
people behind you.
--
Nem W Schlecht nem@plains.nodak.edu
NDUS UNIX SysAdmin http://www.nodak.edu/~nem/
"Perl did the magic. I just waved the wand."
------------------------------
Date: Fri, 13 Feb 1998 23:08:12 +0000
From: Rosemary I H Powell <Rosie@dozyrosy.demon.co.uk>
Subject: The Young Man and the Beach: a solution to his problem?
Message-Id: <i+$YLGAcJN50EwW$@dozyrosy.demon.co.uk>
In article <6bvgf3$rfp$1@csnews.cs.colorado.edu>, Tom Christiansen
<tchrist@mox.perl.com> writes
>Once upon a time, a sharp young man opens the window from his cottage and
>contemplates a morning stroll. The day is clear and crisp, and the sea
>air comes wafting up to town
...
>The young man is disturbed now, perhaps even depressed. It's beginning
>to sound as though no tenable solution exists to these otiose beggars
>taking over his idyllic beach
One way to solve it:
In the beginning was the system, and the system's name was called UNIX,
and Gurus saw the system and knew that it was good. And so new systems
were created, each in their own image and in their own language. But the
King of all systems was UNIX and in its Crown they placed a Great PERL.
And it came to pass that the Gurus came together to meet at a great
Tower, and the name of the Tower was Babel. And each spoke in his own
language and in his own tongue. And then they saw that each could speak
only unto himself and no other, and they rent their clothes and cried
out in their confusion, and there was ignorance in the land.
Now there arose a New Prophet in the mountains and his name was called
Tim Berners-Lee. And he came to the Tower whose name was Babel, bearing
a great gift. And the name of this gift was Hypertext. And as he offered
this gift up at the Tower whose name was Babel, he called forth "Guru
shall speak unto Guru and computer shall speak to computer throughout
the earth", and as he spoke there descended upon the earth a Great
Shining Web. And at this time the Gurus each spoke in their own language
and their own tongue, and cried out "Hallelujah, we speak each in our
own language and in our own tongue, and we speak each to ourselves AND
unto all others!" And the name of Berners_Lee was blessed in the land.
And it came to pass that there arose a False Profit in the west, and he
saw that the Web was money; and he opened up the PERLy Gates, saying "I
shall sell PCs by the million and bring their benfits to every Newbie in
the land, and the profits therefrom into mine own purse." And thus it
was that the greatness of the Web was known throughout the land of the
Newbies.
And in the course of time the name of PERL was known also unto them all
around the earth, and it was told to them that it was easier for a Camel
to pass through the Common Gateway Interface than it was for him to pass
through the eye of a needle. And so it was that the Newbies came to the
wise Oracle CLPM to learn of the great PERL of UNIX. But they
understood not how to consult the Oracle and cried out in their
ignorance: "HELP HELP I'M A NEWBIE - I WANT A KEWL CGI SCRIPT!" And the
Oracle answered them not. And the Gurus sitting at the feet of the
Oracle CLPM beat their breasts and said each to another: "Things are
looking Black, we have no Wall to keep these Newbies out." And in their
fear and ignorance the Newbies cast stones and shouted out insults.
But in the fullness of time the Oracle blew forth flames and brimstone
and called out in a Great Voice: "FAQ...POD...MAN PAGES...CGI != Perl"
And the Newbies heard and were confused, calling out each in his own
ignorance: "HELP HELP I'M A NEWBIE - WINDOWS...MICRO$OFT...DOS !"
And again came forth flames and a Great Voice crying out: "FAQ... MAN
PAGES...POD...blue Camel...flock...cron...chmod...Perl != CGI..."
And the Newbies were sore afraid and again cried out in their ignorance:
"HELP HELP I'M JUST A NEWBIE...WIN95...NT... MICRO$OFT...BILL GATES"
And for the third time, belching forth fire and flames, a Great Voice
called unto them: "FAQ...POD...MAN PAGES...chmod...cron...blue Camel
...flock...Perl != CGI...; rm *;"
And so it came to pass that with this last utterence, the Web was
removed from the face of the earth and with it all the Newbies, and
peace reigned once more in CLPM...
Rosemary
-------------------------------------------------------------------
| Rosemary I.H.Powell EMail: Home: rosie@dozyrosy.demon.co.uk |
| Work: r.i.h.powell@rl.ac.uk |
| http://www.netlink.co.uk/users/dozyrosy/ |
| http://www.dozyrosy.demon.co.uk/ |
| http://www.CavalierKingCharles.com/ |
-------------------------------------------------------------------
------------------------------
Date: Fri, 13 Feb 1998 17:18:02 -0500
From: Douglas Clifton <doug@weboneinc.com>
Subject: Re: Tom wins flamer of the year award!
Message-Id: <34E4C69A.18968D5@weboneinc.com>
Will Morse wrote:
>
> In article <34E225E5.BCDBE91@weboneinc.com>,
> Douglas Clifton <doug@weboneinc.com> wrote:
> >;-)
>
> Well, maybe so, BUT ...
>
> For those people who can manage to
> - check the manual, man pages, FAQ, etc. and
> - are able to format a reasonable question in a reasonable way that shows
> - they have at least pondered the question for thirty seconds before posting,
> Tom is very, VERY knowledgeable and and very, VERY helpful.
I agree, just trying to inject some humor into this group.
Later,
~d
------------------------------
Date: 14 Feb 1998 01:09:15 +0200
From: Jarkko Hietaniemi <jhi@alpha.hut.fi>
Subject: Re: what does "deprecate" mean?
Message-Id: <oee67mjyuec.fsf@alpha.hut.fi>
kcohen@julius.ling.ohio-state.edu (Kevin B Cohen) writes:
>
> okay, i *know* what it means to "deprecate" in english, but what does
> it mean in perlish? here are some examples of usage (hope i'm not
> violating any laws of copyright...):
What is so hard? The meaning is exactly the same.
Just replace it with "frowned upon" if that feels clearer.
--
$jhi++; # http://www.iki.fi/~jhi/
# There is this special biologist word we use for 'stable'.
# It is 'dead'. -- Jack Cohen
------------------------------
Date: Fri, 13 Feb 1998 18:11:33 -0500
From: Brad Atkins <brad@liquid-web.com>
Subject: Where to start.
Message-Id: <34E4D324.C03C4C7D@liquid-web.com>
Hi,
I want to try and learn Perl programming, CGI whatever you want to call
it. Anyone have any good online tutorials, or have seen some?!
Thanks a lot,
Brad
------------------------------
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 1893
**************************************
