[11472] in Perl-Users-Digest
Perl-Users Digest, Issue: 5072 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Mar 6 06:07:44 1999
Date: Sat, 6 Mar 99 03:00:16 -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 Sat, 6 Mar 1999 Volume: 8 Number: 5072
Today's topics:
Re: Case of missing cc and re -- a repost asking the co (Ronald J Kimball)
Re: cobol line seq. file - one very long line - (Ronald J Kimball)
FAQ 1.15: How can I convince my sysadmin/supervisor/emp <perlfaq-suggestions@perl.com>
Re: File Question (Newbie) (Ronald J Kimball)
Re: getting 4 digit years (Abigail)
input from file or from buffer (Bart Lateur)
Re: Killing a users connection? (Ronald J Kimball)
Re: listing directory CGI <Tony.Curtis+usenet@vcpc.univie.ac.at>
Re: long lines in data file being cut (Ronald J Kimball)
Re: Perl Memory Bug ? (Ronald J Kimball)
Re: Printing in Perl (Bart Lateur)
Re: Programming a package sub that takes a reference to (Ronald J Kimball)
Re: questions about grep in a void context (Ronald J Kimball)
Re: redirection (Ronald J Kimball)
Re: Regexp: split on ; but not on \; (Abigail)
Re: Seriously confused about subscripts (Ronald J Kimball)
Re: Seriously confused about subscripts (Bart Lateur)
stable is ...? (was Re: COnverting comma separate valu (Ronald J Kimball)
Re: y2k and 4-digit dates (was Re: foreach and while) (Ronald J Kimball)
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 6 Mar 1999 04:31:16 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: Case of missing cc and re -- a repost asking the correct question.
Message-Id: <1do7z2i.1xpgd8w1oq26hwN@bay1-437.quincy.ziplink.net>
Michael Fuerst <m-fuerst@cecer.army.mil> wrote:
> $wordlist = "(?:(?:(?:($word),)+($word))|($word))";
> # The following puts a zero length string in each of
> # $oo[0] and $oo[1], and aa into $oo[2]
> # I had hoped just to see aa in $oo[0]
> @oo = 'aa' =~ m"$wordlist"smg;
You have three sets of capturing parentheses. Thus, if the pattern
match is successful, you get a list of three values -- some of which may
be the null string.
> print @oo[0] . " " . length(@oo[0]) . "\n";
> print @oo[1] . " " . length(@oo[1]) . "\n";
> print @oo[2] . " " . length(@oo[2]) . "\n";
This assumes that @oo has 3 elements. You should do something like this
instead:
for (@oo) {
print $_ . " " . length($_) . "\n";
}
Otherwise, you'll have a hard time telling whether you've actually fixed
the problem.
> @pp = 'aa, bb' =~ m"$wordlist"smg;
^^^
If you have more than one word list in the target string, how do you
tell which one it was part of?
I would suggest matching the entire word list, then splitting it.
Also, I simplified your regex.
$word = '\s*[a-zA-Z_]\w*\s*';
$wordlist = "($word(?:,$word)*)";
@wls = '(aa, bb) [cc, dd]' =~ m"$wordlist"smg;
for (@wls) {
@pp = split /,/;
print "list:\n";
for (@pp) {
print $_ . " " . length($_) . "\n";
}
}
list:
aa 2
bb 3
list:
cc 2
dd 3
First, @wls gets a list of all the word lists in the target string.
Then, each word list is split into the component words (preserving
whitespace, as in the original example).
HTH!
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Sat, 6 Mar 1999 04:31:18 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: cobol line seq. file - one very long line -
Message-Id: <1do7zwl.1tpzppz18zpwo7N@bay1-437.quincy.ziplink.net>
Dale Phillips <dp@lore.org> wrote:
> I have a cobol line sequential file that I need
> to parse up into record length of 57 each....
>
> This has got to be brain dead easy but I
> can not seem to find anything that
> counts x chars from slurped file and add \r start counter over ....
while (read(FH, $buf, 57)) {
print "$buf\r";
}
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: 6 Mar 1999 02:41:12 -0700
From: Tom Christiansen <perlfaq-suggestions@perl.com>
Subject: FAQ 1.15: How can I convince my sysadmin/supervisor/employees to use version (5/5.005/Perl instead of some other language)?
Message-Id: <36e0f838@csnews>
(This excerpt from perlfaq1 - General Questions About Perl
($Revision: 1.21 $, $Date: 1999/01/26 09:55:05 $)
part of the standard set of documentation included with every
valid Perl distribution, like the one on your system.
See also http://language.perl.com/newdocs/pod/perlfaq1.html
if your negligent system adminstrator has been remiss in his duties.)
How can I convince my sysadmin/supervisor/employees to use version (5/5.005/Perl instead of some other language)?
If your manager or employees are wary of unsupported software, or
software which doesn't officially ship with your Operating
System, you might try to appeal to their self-interest. If
programmers can be more productive using and utilizing Perl
constructs, functionality, simplicity, and power, then the
typical manager/supervisor/employee may be persuaded. Regarding
using Perl in general, it's also sometimes helpful to point out
that delivery times may be reduced using Perl, as compared to
other languages.
If you have a project which has a bottleneck, especially in terms
of translation or testing, Perl almost certainly will provide a
viable, and quick solution. In conjunction with any persuasion
effort, you should not fail to point out that Perl is used, quite
extensively, and with extremely reliable and valuable results, at
many large computer software and/or hardware companies throughout
the world. In fact, many Unix vendors now ship Perl by default,
and support is usually just a news-posting away, if you can't
find the answer in the *comprehensive* documentation, including
this FAQ.
See http://www.perl.org/advocacy/ for more information.
If you face reluctance to upgrading from an older version of
perl, then point out that version 4 is utterly unmaintained and
unsupported by the Perl Development Team. Another big sell for
Perl5 is the large number of modules and extensions which greatly
reduce development time for any given task. Also mention that the
difference between version 4 and version 5 of Perl is like the
difference between awk and C++. (Well, ok, maybe not quite that
distinct, but you get the idea.) If you want support and a
reasonable guarantee that what you're developing will continue to
work in the future, then you have to run the supported version.
That probably means running the 5.005 release, although 5.004
isn't that bad. Several important bugs were fixed from the 5.000
through 5.003 versions, though, so try upgrading past them if
possible.
Of particular note is the massive bughunt for buffer overflow
problems that went into the 5.004 release. All releases prior to
that, including perl4, are considered insecure and should be
upgraded as soon as possible.
--
Like Dennis' love note about rk05s, early Berkeley tapes cane with a
suggestion from Bill Joy that "this is a tape of bits," meaning there was no
guarantee of anything, and that complaints should be directed to /dev/null.
--Andy Tannenbaum, "Politics of UNIX," Washington, DC USENIX Conference, 1984
------------------------------
Date: Sat, 6 Mar 1999 04:31:20 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: File Question (Newbie)
Message-Id: <1do80nz.t516x6rkaqa1N@bay1-437.quincy.ziplink.net>
Larry Rosler <lr@hpl.hp.com> wrote:
> It has to do with single-quotes vs. double-quotes. You seem to be
> using them backwards.
I can conceive of using parentheses and braces backwards )like this }or
like this{(. But how the heck does one use quotes backwards?
;-)
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: 6 Mar 1999 09:53:48 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: getting 4 digit years
Message-Id: <7bqtvc$fti$3@client2.news.psi.net>
Jonathan Stowe (gellyfish@btinternet.com) wrote on MMXIII September
MCMXCIII in <URL:news:7bpua2$29s$1@gellyfish.btinternet.com>:
,, On 5 Mar 1999 00:14:54 GMT Abigail wrote:
,, >
,, > sub four_digit_year () {
,, > sleep 901 * 365.2425 * 24 * 3600;
,, > (localtime) [5];
,, > }
,, >
,,
,, It all depends on how long the CPU fan and the disk drive motors hold out
,, really doesnt it ?
Not if you run Solaris. You just suspend the machine, and bring it back
up after a few years.
Abigail
--
perl -wleprint -eqq-@{[ -eqw\\\\- -eJust -eanother -ePerl -eHacker -e\\\\-]}-
------------------------------
Date: Sat, 06 Mar 1999 09:19:08 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: input from file or from buffer
Message-Id: <36e0edd5.2723565@news.skynet.be>
I have a little problem: I need to be able to call a sub with a file, or
a buffer (I think an array of preread lines). The file itself could be
over a hunderd thousand lines long, so reading that file into an array
is not really an option. The buffers themselves are typically only a few
hunderd lines long.
How do I tackle this? I think this could work:
sub processFile {
my(....) = @_; # not sure yet; specify handle or line buffer
local($_);
while(defined($_ = $filehandle?<$filehandle>:shift(@buffer)) {
# process line
...
}
}
But it looks ugly, and I imagine this could be quite a bit slower than
just reading a line from either buffer or file. Besides, I need to read
two lines at a time, so it gets a lot uglier, still.
My guts tell me that a "tied filehandle" could help, but I've never used
anything even remotely like it before, and I don't know how to apply it.
The explanation in perltie looks intimidating. The phrase " This is
partially implemented now" doesn't promise much good. In short:
confirmation that it could indeed work, plus maybe a working example,
would be much appreciated.
Other suggestions are welcome too.
Bart.
------------------------------
Date: Sat, 6 Mar 1999 04:31:21 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: Killing a users connection?
Message-Id: <1do81fb.lo0uqeoe6poxN@bay1-437.quincy.ziplink.net>
Mick <horizon@internetexpress.com.au> wrote:
> The users are allowed unlimited hours, but, the amount of users allowed
> connection at one time is 75, so if another user tries to log on, the
> user currently
> logged on that has been logged on for the greatest amount of time, is
> kicked off.
And then the user who got kicked off logs back on, kicking off the next
user logged on the longest. And that user logs back on, kicking off the
next user...
And then you get a 77th user who wants to log in...
> I want to be able to write this in Perl -
> - Is it possible?
> - if not, what other alternatives are there?
> - If it is, can you please give some information on how to go about it?
Beats me. I don't know if it's the right solution, though.
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: 06 Mar 1999 11:06:07 +0100
From: Tony Curtis <Tony.Curtis+usenet@vcpc.univie.ac.at>
Subject: Re: listing directory CGI
Message-Id: <83aexrvsof.fsf@vcpc.univie.ac.at>
Re: listing directory CGI, Aaron <amwalker@gate.net>
said:
Aaron> This works when I run it from the shell, but
Aaron> why not in netscape?
You can't run perl scripts *in* netscape.
perldoc perlfaq9
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: Sat, 6 Mar 1999 04:31:22 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: long lines in data file being cut
Message-Id: <1do81jm.1sn0qmzyv0pjiN@bay1-437.quincy.ziplink.net>
23_skidoo <23_skidoo@geocities.com> wrote:
> my problem is that the final line, the review of a gig can be any length
> and when they get over 1833 characters, that's all that gets stored, the
> rest is lost somewhere.
It's probably a bug in line 17 of the browser.
Or line 17 of the server.
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Sat, 6 Mar 1999 04:31:23 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: Perl Memory Bug ?
Message-Id: <1do84n7.115gmoz1vza2vnN@bay1-437.quincy.ziplink.net>
Mark Simonetti <marks@webleicester.co.uk> wrote:
> I've noticed that when doing pattern matching within a program, which
> iterates 1000's of times, and the pattern match uses a "$", to specify
> it must be the end of the pattern.. that the memory usage just keeps
> creeping up, until eventually you get an out of memory message.. anyone
> else seen this ? Its fine if I take out the "$", though then I have to
> completely rethink the pattern match.. It only seems to happen with
> that "$" sign..
Perl version and specific examples, please.
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Sat, 06 Mar 1999 09:55:24 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: Printing in Perl
Message-Id: <36e1f420.4119869@news.skynet.be>
Larry Rosler wrote:
>Are there any benefits to Perl formats other than what I have noted
>above?
I've never used them, and I never will.
They are closely linked to the concept of fixed width fonts, a seriously
outdated concept that nevertheless refuses to stay down.
Bart.
------------------------------
Date: Sat, 6 Mar 1999 04:31:24 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: Programming a package sub that takes a reference to a variable.
Message-Id: <1do873a.6xi3a71s1m50tN@bay1-437.quincy.ziplink.net>
<zenin@bawdycaste.org> wrote:
> You probably want something more like this:
>
> sub updateEntryNoTree (\%$*) {
> my %Entry = %{ shift }; ## passed by reference
I think you meant
my %Entry = %{ shift() };
or
my %Entry = %{ +shift };
%{ shift } is the hash named shift.
> my ($dbh, $index) = @_;
> ....code....
> }
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Sat, 6 Mar 1999 04:31:25 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: questions about grep in a void context
Message-Id: <1do87rs.1f75wfz1nak2hnN@bay1-437.quincy.ziplink.net>
Allan M. Due <Allan@due.net> wrote:
> Deprecated was incorrect it seems, but people sure react strongly if you
> use grep in a void context. Below are just a few quotes (taken out of
> context <g>) which I think are representative of the general attitude. I
> always thought the point was functionality but now it seems to be based on
> style. I believe I understand the definition given below "discarding the
> value it returns, and using it only for its side effects" but I would
> appreciate it if someone would explain why it is considered such bad style.
I would say that it's somewhat along the lines of the following:
#!perl
{
my @bozo = (0) x 1000;
}
print "Just another Perl hacker\n";
__END__
Why build up the list @bozo if you don't need it?
> And if this is such bad style, why do we not see the same reaction when
> folks do things like:
>
> foreach (@array) {
> /the word/ ? then_do () : or_dont();
> }
>
> or
>
> $count++ and next if /match/;
>
> Both of which seem to meet the definition.
I'm not sure what you mean by 'the definition'. Neither of those builds
up an unneeded list of return values, which is the main complaint
against using grep or map in a void context.
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Sat, 6 Mar 1999 04:31:27 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: redirection
Message-Id: <1do883u.7rgnjwo2illpN@bay1-437.quincy.ziplink.net>
dan <nospam-seallama@mailcity.com> wrote:
> how do i redirect a script to another page? when i try
> print "Location: $webpage\n\n";
>
> it prints the value of the variable to the page, am i missing something?
The opposite. You're outputting other headers earlier in the script.
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: 6 Mar 1999 10:04:12 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: Regexp: split on ; but not on \;
Message-Id: <7bquis$fti$4@client2.news.psi.net>
Larry Rosler (lr@hpl.hp.com) wrote on MMXIII September MCMXCIII in
<URL:news:MPG.114a2c46ce7b26639896fb@nntp.hpl.hp.com>:
'' In article <7bpsii$mbo$1@nnrp1.dejanews.com> on Sat, 06 Mar 1999
'' 00:23:55 GMT, @l@ <aqumsieh@matrox.com> <@l@ <aqumsieh@matrox.com>>
'' says...
'' > In article <36de60ad.86493891@news.uni-X.net>,
'' > collin@rogowski.de (Collin Rogowski) wrote:
'' > > How can I split a String at ; but not at \;
'' >
'' > % perl -w
'' > $_ = 'this is a line ; with a line \; and another line ; finished';
'' > @a = split /[^\\];/;
'' > for (@a) {
'' > print ">> $_.\n";
'' > }
'' > __END__
'' > >> this is a line.
'' > >> with a line \; and another line.
'' > >> finished.
''
'' Bzzzt. This loses the character before the unescaped semicolon, which
'' in your example is conveniently a space. How about look-behind?
Look behind would work if you only want to split at ';' and not
at '\;'. But what about '\\;'. Split or not?
This would split on ';' not preceeded by an odd number of backwacks:
$_ = "string to split";
@a = reverse map {scalar reverse} split /;(?!\\(?:\\\\)*(?!\\))/ => reverse;
Abigail
--
perl -MLWP::UserAgent -MHTML::TreeBuilder -MHTML::FormatText -wle'print +(
HTML::FormatText -> new -> format (HTML::TreeBuilder -> new -> parse (
LWP::UserAgent -> new -> request (HTTP::Request -> new ("GET",
"http://work.ucsd.edu:5141/cgi-bin/http_webster?isindex=perl")) -> content))
=~ /(.*\))[-\s]+Addition/s) [0]'
------------------------------
Date: Sat, 6 Mar 1999 04:31:28 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: Seriously confused about subscripts
Message-Id: <1do88kz.1vbpyub1oqqqoaN@bay1-437.quincy.ziplink.net>
Arne Jamtgaard <arnej@fc.hp.com> wrote:
> foreach (@docs) {
> $doc = $_->[2]; # extract the file name
> $doc =~ /doc_(..)/; # extract the two digits after the doc_
> $doc_indexes{$1} = $doc; # assign to the hash
> }
If one of the filenames doesn't match that pattern, then you clobber the
value for the key you assigned in the previous iteration.
foreach (@docs) {
$doc = $_->[2]; # extract the file name
if ($doc =~ /doc_(..)/) { # extract the two digits after the doc_
$doc_indexes{$1} = $doc; # assign to the hash
}
}
Just in case you might have some odd filenames in there...
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Sat, 06 Mar 1999 09:55:26 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: Seriously confused about subscripts
Message-Id: <36e2f554.4427229@news.skynet.be>
Arne Jamtgaard wrote:
>see 'substr' for something simulating mid$, but...
>
>John Chris Wren wrote:
>> And I'm under the impression that using s/// requires that the
>> data you want to substitute to be in $/.
That's probably $_ instead.
>You don't want to substitute, you just want to match, right?
>
>foreach (@docs) {
> $doc = $_->[2]; # extract the file name
> $doc =~ /doc_(..)/; # extract the two digits after the doc_
> $doc_indexes{$1} = $doc; # assign to the hash
> }
Somehow, this look to restricted. I can imagine that the "doc" prefix
might eventually be changed (case?), and the number of characters
following the underscore might turn out different from 2, too.
$doc =~ /_(\w+)/;
$doc_indexes{$1} = $doc; # assign to the hash
Besides:
>>I know that { my $doc_indexs; $doc_indexes{$_->[2]} = $_->[2]; } will
>>create an entry in the hash table
This is nonsense. $doc_indexs is a scalar, $doc_indexes{..} is a an
entry in a hash, and one of those looks misspelled, too. But if you my()
the hash, assigning to it won't do any good. I'm stumped.
Bart.
------------------------------
Date: Sat, 6 Mar 1999 04:31:18 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: stable is ...? (was Re: COnverting comma separate values)
Message-Id: <1do809w.15552kfp4u5l5N@bay1-437.quincy.ziplink.net>
Alan Barclay <gorilla@elaine.drink.com> wrote:
> 5.004_04 doesn't have that message, and that's the one you get if you
> download the stable.tar.gz from CPAN, so I'd consider that a current
> release, not old at all.
And yet there's a file in the src/5.0 directory entitled
'stable_is_5.005_02'. Apparently someone forgot to update the
stable.tar.gz link. (stable.zip is correct, though.)
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Sat, 6 Mar 1999 04:31:29 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: y2k and 4-digit dates (was Re: foreach and while)
Message-Id: <1do89o3.1ujsbglz40derN@bay1-437.quincy.ziplink.net>
Tobias Brox <tobias@shark.td.org.uit.no> wrote:
> If you're picky, you can say all data is ambigious. It's, for
> instance, not "obvious" that the ASCII character set should be used
> for text files. And what character set should be used for the eight
> bit characters? Conventions _always_ have to be made of how the data
> is to be interpreted.
This thread became a lot more interesting once I switched to a Japanese
character set. ;-)
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: 12 Dec 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 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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 5072
**************************************
