[9771] in Perl-Users-Digest
Perl-Users Digest, Issue: 3364 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Aug 5 11:06:54 1998
Date: Wed, 5 Aug 98 08:01:43 -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 Wed, 5 Aug 1998 Volume: 8 Number: 3364
Today's topics:
How to write `diff' in Perl (Mark-Jason Dominus)
Re: Native "vmstat" in Perl ? <jjuan@fun.com>
People just suck (Andy Lester)
Re: Perl Counter sneaker@fccj.org
Perl Docs.. forget the original post <maierc@chesco.com>
Re: Perl Docs.. forget the original post <dgris@rand.dimensional.com>
Reading file into single scalar, what's fastest? <matthies@fsinfo.cs.uni-sb.de>
Re: Reading file into single scalar, what's fastest? (Nathan V. Patwardhan)
Re: Regexp question (Scott Erickson)
Retrieving file from REMOTE_ADDR ... HELP! (Hector Catre)
Re: Retrieving file from REMOTE_ADDR ... HELP! <Tony.Curtis+usenet@vcpc.univie.ac.at>
running an app on nt server from cgi <fcalabro@aisvt.bfg.com>
socket problem <jperkins@wtmail.wtamu.edu>
Re: Suggestion: file handle associated $\ (Tim Gim Yee)
Re: system( ) commands in CGI script (Scott Erickson)
Re: wtf is the obsession with "foo" and "bar" (I R A Aggie)
Re: wtf is the obsession with "foo" and "bar" (Gary L. Burnore)
Re: wtf is the obsession with "foo" and "bar" <joneil@cks.ssd.k12.wa.us>
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 5 Aug 1998 06:35:47 GMT
From: mjd@plover.com (Mark-Jason Dominus)
Subject: How to write `diff' in Perl
Message-Id: <6q8ug3$7bl$1@picasso.op.net>
Keywords: Nair, brassy, matroid, wavenumber
`diff' is a standard Unix utility that prints out the differences
between two files. I have implemented it in Perl for {my,your}
{entertainment,instruction}. The underlying module, Algorithm::LCS,
may turn out to be useful for diff-like tasks such as computing the
optimal way to update the screen.
You can visit it at
<URL:http://www.plover.com/~mjd/perl/diff/>
The name of the module is almost certainly going to change before it
appears on CPAN.
--
mjd@pobox.com Mark-Jason Dominus
mjd@plover.com Plover Systems, Philadelphia, PA
------------------------------
Date: Wed, 5 Aug 1998 09:05:34 -0500
From: "Jon Juan" <jjuan@fun.com>
Subject: Re: Native "vmstat" in Perl ?
Message-Id: <6q9o2a$8de$1@grandprime.binc.net>
>
>Problem: IMHO, the backquoted "vmstat | tail -1" on line 15. This
> forks not one, but two processes .. every $Sleeptime
> seconds. Not good. Running this on an old SPARC 2 shows
> 96% idle .. but perfmeter sings a far different song.
> During the 30 seconds the process runs, CPU averages about
> 20%, and peaks at 30%. Which makes this code a
> "Heisenberg's microscope".
>
>What I Is there a Perl-native "vmstat" module that does not
>want: require a second process to be forked ? That might help.
>
...you may already know this...but the first output line of vmstat is not
the data you want to use. Try a "vmstat 1 2" and grab it's last line. This
may look more like your perfmeter data.
-Jon
------------------------------
Date: 5 Aug 1998 14:19:07 GMT
From: petdance@maxx.mc.net (Andy Lester)
Subject: People just suck
Message-Id: <6q9pkr$olv$1@supernews.com>
Look, we all know that many newbies are lazy, and that many posters here
are bitches/assholes/whatever. Can we just go from there with that
understanding and not have to talk about it? Maybe add it to the FAQ that
nobody reads?
xoxo,
Andy
--
--
Andy Lester: <andy@petdance.com> http://tezcat.com/~andy/
Chicago Shows List: <shows@ChicagoMusic.com> http://ChicagoMusic.com/
------------------------------
Date: Wed, 05 Aug 1998 12:47:13 GMT
From: sneaker@fccj.org
Subject: Re: Perl Counter
Message-Id: <6q9k8i$kbk$1@nnrp1.dejanews.com>
In article <6q8t1k$tn$1@nswpull.telstra.net>,
"Kim Saunders" <kims@tip.net.au> wrote:
> >> Is it possible to make a perl counter not to increment on refresh of the
> >> page.
>
> >With PERL all things are possible - if not very accurate -
> >as in this case :)
> >
> >Problem is - How do you know if someone hit the refresh/reload button?
> >Figure that out and you will know how to prevent it. Good luck!
>
> Don't bother... if you really want to, why not send them a cookie when they
> get it, then not count them when they come back? Or only count each IP
> address once? As the other guy said, not very accurately. You could make it
> so that each person is counted once only, and not recounted the next
> day/reload? Don't bother...
>
> KimS
>
>
The original POSTER was/said:
Hi there,
Is it possible to make a perl counter not to increment on refresh of the
page.
Thanks and regards,
--Divakar--
Note that 'Sneex' doesn't appear anywhere in there,
HTH, :)
Sneex
PS - My computer, as I said via e-mail, doesn't like cookies.
-----== 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 10:52:31 -0400
From: Charles Maier <maierc@chesco.com>
Subject: Perl Docs.. forget the original post
Message-Id: <35C7202F.42110408@chesco.com>
My apollogies.. I sawe this post yesterday but my mailserver was havin a
bad day.. so this is not posted as a reply.. tho intended to be.
Steve Linberg wrote:
>
> In article <35C73703.5B16@nospam.callisto.si.usherb.ca>,
> sysop97@nospam.callisto.si.usherb.ca wrote:
>
> > >You could always try the documentation... the first page of perldoc
> > >perlre will tell you the answer.... In other words RTFM.
> >
> > Not really!
> >
> > And sometimes the FAQs suck or aren't tuned to non-guru users and become
> > long, boring and unreadable. I prefer this forum.
>
> As Russ and Tom will undoubtedly say, patches welcome! Perhaps you could
> list some specific examples to clarify instead of making general, blanket
> complaints.
> _____________________________________________________________________
ABSOLUTELY ;o)
I was wondering when someone would actually echo my thoughts when I
first found the FAQs and, in general, the DOCS for Perl. I've been
programming for 30 years and have learned a "few" languages. Perl's docs
could use some serious "improvment". If you disagree with this... I have
to tell you .. you are wrong! WHY ELSE would we see the SAME QUESTIONS
over and over in this newsgroup??? Maybe some ARE dumb... but I don't
really think so. Dumb questions are the ones you DON'T ask!
Sending <people> to the FAQ is a good idea... if only to inform them of
the resource. BUT... the FAQ is only really useful for "reading
material".. not research. Before I get flamed.. SURE you can search
it... but you gotta "know the question".
Perl seems to be best learned.. (if from the docs) if you have a lot of
"pre-knowledge"... "C" and "Unix" seem to be prerequisites. Outside
written "books" are also MANDITORY.
Personally.. I have kluged-up a set of docs for Perl.. including
gathering information from this group and appended/linked it to various
parts of the docs. Doing this for myself has only enforced the
realization that Perl's docs/FAQs have a lot of room for improvment. It
also showed me how futile it was.. when I upgrade a perl rev..... I may
have to do it all over again.
IMOP.. MINIMALY..the docs would be helped with:
1. A "functionality" section (EVERY other language has one)
2. The addition of MANY MORE <hyper>links to/between the present
content. This doesn't touch on what the docs DO NOT tell you.
3. Adding links to ALL "see also.." sections would help.
4. Adding more "See also" sections
4. Removal and replacement of all "just like the 'c' function.." with
the clear, FULL explaination.
Who (specifically) manages the docs??
Will they allow modification for the express purpose of making them more
usable to most people (those without the answers)??
I hope this doesn't offend anyone. This language has been around for a
while... and sometimes it might help to just get the viewpoint of
someone new (v.s. the old guard) to refresh the docs..... maybe a
comittee??
Watta-ya think??
--
Chuck Maier
CDM Consulting Services
http://www.cdmcon.com
------------------------------
Date: Wed, 05 Aug 1998 14:59:21 GMT
From: Daniel Grisinger <dgris@rand.dimensional.com>
Subject: Re: Perl Docs.. forget the original post
Message-Id: <6q9r8v$42a$1@rand.dimensional.com>
In article <35C7202F.42110408@chesco.com>
maierc@chesco.com wrote:
>I was wondering when someone would actually echo my thoughts when I
>first found the FAQs and, in general, the DOCS for Perl. I've been
>programming for 30 years and have learned a "few" languages. Perl's docs
>could use some serious "improvment".
Patches are, of course, always welcome (and that horrible documentation
you speak of is so complete that it even includes directions on
how to prepare patches :-).
> If you disagree with this... I have
>to tell you .. you are wrong! WHY ELSE would we see the SAME QUESTIONS
>over and over in this newsgroup??? Maybe some ARE dumb... but I don't
>really think so. Dumb questions are the ones you DON'T ask!
We see the dumb questions because perl has, in the minds of many,
become equivalent to `web programming'. Anytime somebody needs
something for their website they decide they should do it in
perl, because they've heard that that is what perl is for.
Then, some non-programmer posts a bunch a faqs because he doesn't
even have enough knowledge to understand how to search the docs.
>Sending <people> to the FAQ is a good idea... if only to inform them of
>the resource. BUT... the FAQ is only really useful for "reading
>material".. not research. Before I get flamed.. SURE you can search
>it... but you gotta "know the question".
$ perldoc -q STRING
That will search the questions in the faq for occurences of
string. It's not like we're trying to make the perl docs
hard.
>Perl seems to be best learned.. (if from the docs) if you have a lot of
>"pre-knowledge"... "C" and "Unix" seem to be prerequisites. Outside
>written "books" are also MANDITORY.
Computer programming requires a lot of `pre-knowledge'. Loops,
scoping, subroutines, and modularization are all things that
any programming language expects you to understand ahead of time.
>Personally.. I have kluged-up a set of docs for Perl.. including
>gathering information from this group and appended/linked it to various
>parts of the docs.
If you'll take a look at patching.pod in the Porting directory
of your perl distribution you'll see guidelines for how to
share this wonderful advancement with the entire community.
> Doing this for myself has only enforced the
>realization that Perl's docs/FAQs have a lot of room for improvment. It
>also showed me how futile it was.. when I upgrade a perl rev..... I may
>have to do it all over again.
I agree that we still have a lot of room for improvement. That doesn't
alter the fact that perl has better documentation than any other
open source package in existence.
>IMOP.. MINIMALY..the docs would be helped with:
>1. A "functionality" section (EVERY other language has one)
Patches welcome (although adding a new mandatory pod section
will require more than a little bit of work).
>2. The addition of MANY MORE <hyper>links to/between the present
>content. This doesn't touch on what the docs DO NOT tell you.
>3. Adding links to ALL "see also.." sections would help.
This is fundamentally hard to do. Try it. I'm serious.
I've been working on solving the HTML link problem for about
3 months now and have made very little progress (although
I can generate many, many more broken links than I could
when I started :-). At this point I am completely out of
tuits and have no idea when the problem may be solved.
If you think you have any ideas for how to do this, I'm open
to suggestion (I'd love to have an easy way to run sophisticated
queries against the docset).
>4. Adding more "See also" sections
Patches are welcome.
>4. Removal and replacement of all "just like the 'c' function.." with
>the clear, FULL explaination.
This won't work. Many of the functions in question are wrappers
around the equivalent function in the system's C library. Where
these implementations differ, so can the behavior of perl.
>
>Who (specifically) manages the docs??
Nobody, although Tom probably has the greatest personal
investment in them (and he is the owner of perlfaq and
perltoot). Otherwise they are taken care of by generally
everybody on p5p.
>Will they allow modification for the express purpose of making them more
>usable to most people (those without the answers)??
I've never had a docpatch rejected. I rather suspect that when
you start submitting them you won't see them rejected either.
>I hope this doesn't offend anyone. This language has been around for a
>while... and sometimes it might help to just get the viewpoint of
>someone new (v.s. the old guard) to refresh the docs..... maybe a
>comittee??
Feel free to start refreshing. That's what open source software
is all about. You don't have to wait for anyone to sanction
what you work on. Just do it, post the patches according to
the guidelines, and move onto your next project.
>Watta-ya think??
I think I've never seen such a detailed list of complaints
from someone who hasn't worked on the docs. Fortunately
it gives a large number of things that you can do to help
the whole perl community :-).
dgris
--
Daniel Grisinger dgris@perrin.dimensional.com
"No kings, no presidents, just a rough consensus and
running code."
Dave Clark
------------------------------
Date: 5 Aug 1998 13:33:18 GMT
From: Niklas Matthies <matthies@fsinfo.cs.uni-sb.de>
Subject: Reading file into single scalar, what's fastest?
Message-Id: <6q9muu$nte$1@hades.rz.uni-sb.de>
Hi,
Is there a better (i.e. faster) way to read a file into a scalar than
the following?
$file = '';
open FILE, "< filename";
$file .= $_ while <FILE>;
close FILE;
I tested with Benchmark::timethis with /vmunix as file ;), which had
realistic distribution of newlines.
A different method, using 'sysread', is slightly but still definitively
slower than the above, pretty regardless of the chosen buffer size:
$file = '';
open FILE, "< filename";
$file .= $_ while (sysread FILE, $_, $buffer_size);
close FILE;
I also tried other methods (such as $file = join '', <FILE>), but all had
lesser performance.
No, I'm not a performance fanatic :), but this is a web application where
response time is somewhat critical, and I'd like to know if I could do
better.
And yes, I need to have the whole file in one scalar at a time because I'm
doing multiple multiple-line substitutions on it (which would become fairly
complicated when having only chunks of it in memory at a time).
Any comments, ideas or suggestions?
-- Niklas
------------------------------
Date: 5 Aug 1998 14:19:05 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: Reading file into single scalar, what's fastest?
Message-Id: <6q9pkp$k8s@fridge.shore.net>
Niklas Matthies (matthies@fsinfo.cs.uni-sb.de) wrote:
: Is there a better (i.e. faster) way to read a file into a scalar than
: the following?
Here's one way (which uses the diamond operator):
$/ = undef;
$file = <>; # contents of file in <>
print $file;
Here's another (which is closer to your original code):
$/ = undef;
$file = '';
$contents = '';
open(FILE, $file) or die("can't open file $file: $!");
$contents = <FILE>;
close(FILE);
print("$contents\n");
I'll leave the benchmarking up to you. :-)
--
Nate Patwardhan|root@localhost
"Fortunately, I prefer to believe that we're all really just trapped in a
P.K. Dick book laced with Lovecraft, and this awful Terror Out of Cambridge
shall by the light of day evaporate, leaving nothing but good intentions in
its stead." Tom Christiansen in <6k02ha$hq6$3@csnews.cs.colorado.edu>
------------------------------
Date: Wed, 05 Aug 1998 14:15:56 GMT
From: Scott.L.Erickson@HealthPartners.com (Scott Erickson)
Subject: Re: Regexp question
Message-Id: <35c86852.1817196700@news.mr.net>
Previously, Tony Galway wrote:
>Given string
> $string = 'hostname/result/data';
>I want to place hostname in a separate variable directly, I can do this
Have you considered using split? Possibly the following would do the
trick for you:
($host, $result, $data) = split '/', $string;
or if you just want the host name:
$host = (split '/', $string)[0];
Scott.
------------------------------
Date: Wed, 05 Aug 1998 17:13:26 GMT
From: hector@followme.com (Hector Catre)
Subject: Retrieving file from REMOTE_ADDR ... HELP!
Message-Id: <6q9ort$1b1$1@nntp3.uunet.ca>
Hello,
I'm trying to figure out how to access the REMOTE_ADDR so that I can download
a file from that system to the server. I can't even figure out how to access
the REMOTE_ADDR's directory structure so that they can choose the file to be
downloaded. HELP!
Hector Catre
hector@followme.com
------------------------------
Date: 05 Aug 1998 16:21:46 +0200
From: Tony Curtis <Tony.Curtis+usenet@vcpc.univie.ac.at>
Subject: Re: Retrieving file from REMOTE_ADDR ... HELP!
Message-Id: <7xyat3tsp1.fsf@fidelio.vcpc.univie.ac.at>
Re: Retrieving file from REMOTE_ADDR ... HELP!, Hector
<hector@followme.com> said:
Hector> Hello, I'm trying to figure out how to access the
Hector> REMOTE_ADDR
It's a builtin method in CGI.pm.
Hector> so that I can download a file from that
Hector> system to the server.
Not possible using the server-side part of CGI.
Hector> access the REMOTE_ADDR's directory structure so that
Hector> they can choose the file to be downloaded.
Not possible using CGI, for these and certainly other
reasons:
1. why should your server have access to a remote
machine's filesystem(s)?
2. you can't know that the machine accessing you is
actually the same as the "user" is on (e.g. firewall,
proxy)
3. you can't know what OS is on the remote machine, nor
what filesystem types it supports.
(2 and 3 are moot in any case).
If you need to get access to a file on the client side then
you can use the file-upload mechanism supported widely(?) in
browsers. There's a simple way of doing it with CGI.pm,
q.v. Then on the server-side you can grab the uploaded
data (not the file, the data within the file, mind you).
$ perldoc CGI
is the place to start.
hth
tony
--
Tony Curtis, Systems Manager, VCPC, | Tel +43 1 310 93 96 - 12; Fax - 13
Liechtensteinstrasse 22, A-1090 Wien, | <URI:http://www.vcpc.univie.ac.at/>
"You see? You see? Your stupid minds! | private email:
Stupid! Stupid!" ~ Eros, Plan9 fOS.| <URI:mailto:tony_curtis32@hotmail.com>
------------------------------
Date: Wed, 05 Aug 1998 09:42:49 -0400
From: Finn Calabro <fcalabro@aisvt.bfg.com>
Subject: running an app on nt server from cgi
Message-Id: <35C86159.A689184D@aisvt.bfg.com>
I'm running a script intended to create a data file (on the server) from
form input and
then run a program (on the server) with this data file. It's sitting on
an NT server
with IIS 4.0. I've got IIS set up with perl and it is running cgi
scripts fine, but I can't seem to get it to execute the command line.
The path is something like: "c:\dir\file.exe c:\datadir\file.dat" I
need to execute this command line on the server, though it doesn't
return any information. Thanks.
------------------------------
Date: Sun, 02 Aug 1998 08:19:28 -0500
From: Justin Perkins <jperkins@wtmail.wtamu.edu>
Subject: socket problem
Message-Id: <35C46760.FA0B9A06@wtmail.wtamu.edu>
I think I set up everything correctly but the error message I keep
getting is: "can't assign requested address" when it tries to connect.
Anybody know what might be going wrong? I'm using Novell's perl5.nlm.
$port = 2345 unless $port;
$AF_INET=2;
$SOCK_STREAM=1;
$SOCK_ADDR= "S n a4 x8";
($name,$aliases,$protocol) = getprotobyname('tcp');
($name,$aliases,$port) = getservbyname($port,'tcp') unless $port
=-/^\d+$/;;
$remote_ip=gethostbyname($server);
$remote_sock = pack($SOCK_ADDR, $AF_INET, $port, $remote_ip);
socket(S, $AF_INET, $SOCK_STREAM, $protocol) || &web_error("can't
make socket:$!\n");
connect(S, $remote_sock) || &web_error("can't connect socket
:$!\n");
# No buffering on the socket.
select(S); $|=1; select(STDOUT);
thanks,
Justin
------------------------------
Date: Wed, 05 Aug 1998 14:37:36 GMT
From: tgy@chocobo.org (Tim Gim Yee)
Subject: Re: Suggestion: file handle associated $\
Message-Id: <35c86a0f.456272275@news.oz.net>
On Wed, 05 Aug 1998 13:26:27 GMT, bart.mediamind@tornado.be (Bart
Lateur) wrote:
>John Porter wrote:
>
>>so I think it would be trivial to simply modify (or derive from)
>>FileHandle, so that objects of that class maintain their own data
>>attributes for RS, ORS, and OFS, rather than using the perl special
>>globals for those purposes.
>
>Interesting approach. Is it possible to subclass the file handles so
>that these overridden values get used instead the global equivalents?
>
>I'm not experienced in OOPerl. Demo code that demonstrates this feature
>would prove to me that OO in Perl is more than just a gimmick.
>
>Any takers?
How about a tied handle? So that reading and printing to the handle
utilizes its own values of RS, ORS, OFS, etc. Anyone interested in
such a module can take it for a test run:
http://www.chocobo.org/~tgy/IO/Handle/Tie.pm
http://www.chocobo.org/~tgy/IO/Handle/Tie.html
--
Tim Gim Yee
http://www.dragonfire.net/~tgy/moogle/
"Kupo! Round and round you go! Moogle!"
------------------------------
Date: Wed, 05 Aug 1998 14:07:56 GMT
From: Scott.L.Erickson@HealthPartners.com (Scott Erickson)
Subject: Re: system( ) commands in CGI script
Message-Id: <35c8651f.1816378173@news.mr.net>
Previously, Brian Day wrote:
>Does anybody know why the following will not return two values that I can compare:
>
> $test = `ls -d $path`; #-d returns dir name not it's contents
> $test2 = `ls -d $path2`; # $path,$path2 are legal UNIX paths
>
> if ($test ne $test2)
> { print "File doesn't exist for both records";
> }
Do they return any values? Possibly on the system you are working on,
CGI scripts are prevented from executing 'ls'. I ran into a similar
problem trying to determine the current working directory from within
a CGI script. Neither `/usr/bin/ls` or Cwd() would return a value from
within a CGI script, but both worked fine in non-CGI scripts. I
suspect it has to do with some security policy, but I have not pursued
the matter, I just gave up on creating a portable script and
hard-coded the directory into my scrip.
>Neither example works. If I use one system() call with one backslash call, it works but the system call returns an integer, and the backlsash call returns a string. The
>comparison works then, but I don't think this is good practice.
Odd.
Scott.
------------------------------
Date: Wed, 05 Aug 1998 09:53:07 -0500
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: wtf is the obsession with "foo" and "bar"
Message-Id: <fl_aggie-0508980953070001@aggie.coaps.fsu.edu>
In article <6q8sgb$dl$1@nswpull.telstra.net>, "Kim Saunders"
<kims@tip.net.au> wrote:
+ Why are "foo" and "bar" ALWAYS used as example names in anything unix
+ related, and partularly perl?
Go see "Saving Private Ryan" when it comes your way. I practically rolled
down the aisles when one of the enlisted men said something like "this
mission is fubar, sir".
"foo" and "bar" are more polite renderings...
James - "fubar? its not in the German dictionary."
------------------------------
Date: Wed, 05 Aug 1998 14:35:44 GMT
From: gburnore@databasix.com (Gary L. Burnore)
Subject: Re: wtf is the obsession with "foo" and "bar"
Message-Id: <35cd6d67.127086046@nntpd.databasix.com>
On Wed, 5 Aug 1998 16:01:45 +1000, in article
<6q8sgb$dl$1@nswpull.telstra.net>, "Kim Saunders" <kims@tip.net.au> wrote:
>Hiya,
>
>Why are "foo" and "bar" ALWAYS used as example names in anything unix
>related, and partularly perl?
They're not _ALWAYS_ in UNIX or Perl. The percentage in Perl does seem higher
though.
> What is the origin? What do they mean? (foo i
>can handle). Why aren't people more imaginative when they do stuff, and use
>their own things?
Because people who read the code understand that foo and bar can be replaced
with what ever you want them too.
>It's rather irritating sometimes.
Gold Bond Medicated Powder.
--
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: Wed, 05 Aug 1998 07:42:50 -0700
From: Jerome O'Neil <joneil@cks.ssd.k12.wa.us>
To: Adam Ipnarski <adam@fastfare.co.uk>
Subject: Re: wtf is the obsession with "foo" and "bar"
Message-Id: <35C86F6A.DE609FDF@cks.ssd.k12.wa.us>
Adam Ipnarski wrote:
> This is what I've heard.
> Legend (over here in England, anyway) seems to suggest that foo and bar
> stem from 'foobar'. This, in turn, is a nicer way of writing fubar,
> which stands for 'F***ed up beyond all Recognition'.
> As for why UNIX programmers use foo and bar, I suppose its because we
> don't want to waste our imagination on unimportant things like temporary
> var names :-)
That, and an uncanny knack for fu$%*# things up beyond all recognition
(or repair, back in the day...)
Jerome "Phoo Bhar" O'Neil
.
------------------------------
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 3364
**************************************
