[19454] in Perl-Users-Digest
Perl-Users Digest, Issue: 1649 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Aug 29 14:10:26 2001
Date: Wed, 29 Aug 2001 11:10:12 -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: <999108611-v10-i1649@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Wed, 29 Aug 2001 Volume: 10 Number: 1649
Today's topics:
Re: Performance : Shell X Perl (Abigail)
Re: perl "study" function in java? (crypto_boy)
perl & ldap & userpw <henry.havemann@uni-oldenburg.de>
Re: PerlFS again? (Abigail)
Re: pipe, fork and Gtk+ <jens@irs-net.com>
Re: pipe, fork and Gtk+ (Anno Siegel)
Re: pipe, fork and Gtk+ <jens@irs-net.com>
Re: pipe, fork and Gtk+ <jens@irs-net.com>
POE 0.16 Released (Rocco Caputo)
Re: Questions about MakeMaker <ilya@martynov.org>
R: Parse::RecDescent <marco.baringer@convey.it>
Re: RegEx? <frederick_lia@yahoo.com>
Re: Self-Searchable Perl documention - Extremely Useful (John Holdsworth)
Re: Spliting on [ ?? (Bernard El-Hagin)
Re: Spliting on [ ?? <tinamue@zedat.fu-berlin.de>
system call <dbohl@sgi.com>
Re: system call <Doug.King@abh.siemens.com>
Re: use() versus import() changing semantics? <soren@doesntwantspam.nowhere.non>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 29 Aug 2001 16:03:47 GMT
From: abigail@foad.org (Abigail)
Subject: Re: Performance : Shell X Perl
Message-Id: <slrn9oq4j6.t86.abigail@alexandra.xs4all.nl>
Knob (andrew.savige@ir.com) wrote on MMCMXX September MCMXCIII in
<URL:news:3I0j7.10$De6.3375@news0.optus.net.au>:
<>
<> The problem gets harder when you write large Perl systems that must run
<> on a wide variety of customer boxes over which you have little control.
<> My current approach is to bundle Perl v5.6.1,say, (along with extra modules)
<> with our product and have the installation sh script unpack this
<> distribution.
<> That done, all Perl scripts that run with our product can be safely written
<> to a given Perl version. If you are writing a lot of Perl, the extra effort
<> of installing your own custom Perl distribution seems worth it to me.
<> This approach works around two other product reliability issues:
<> 1) A maverick customer has deleted or mangled the Perl
<> distribution that came with his machine.
<> 2) An incompetent system administrator has mis-installed Perl
<> on the target machine.
<> On the other hand, it is perhaps untidy to have multiple versions
<> of Perl installed on a given machine. Opinions welcome.
Whould you also bundle all programs you call from your shell program
with your product? What about C libraries?
I mean, if you don't trust your customers not to mangle software that
came with the machine, there's a lot that's called from a shell program
that could have been mangled.
Why don't you just say "Prerequisite: perl 5.X.Y". Just as you might have
a requirement of a minimum amount of diskspace or physical memory. You
don't ship disks or RAM with your product either, do you?
Abigail
--
echo "==== ======= ==== ======"|perl -pes/=/J/|perl -pes/==/us/|perl -pes/=/t/\
|perl -pes/=/A/|perl -pes/=/n/|perl -pes/=/o/|perl -pes/==/th/|perl -pes/=/e/\
|perl -pes/=/r/|perl -pes/=/P/|perl -pes/=/e/|perl -pes/==/rl/|perl -pes/=/H/\
|perl -pes/=/a/|perl -pes/=/c/|perl -pes/=/k/|perl -pes/==/er/|perl -pes/=/./;
------------------------------
Date: 29 Aug 2001 09:24:21 -0700
From: crypto-boy@llnl.gov (crypto_boy)
Subject: Re: perl "study" function in java?
Message-Id: <646ea35e.0108290824.5ed060dd@posting.google.com>
abigail@foad.org (Abigail) wrote in message news:<slrn9ons99.rpa.abigail@alexandra.xs4all.nl>...
> crypto_boy (crypto-boy@llnl.gov) wrote on MMCMXVIII September MCMXCIII in
> <URL:news:646ea35e.0108271446.56ba5d98@posting.google.com>:
> $$ Problem:
> $$ -----------------
> $$ I need to see if a one of many regexes match a fixed string in java.
>
> That's a Java problem, not a Perl one.
>
> $$ What I miss from perl is the "study" function.
>
> So? Then program in Perl, not in Java if you want a study function.
> The fact it's not there doens't hold any relevance in this Perl group.
>
> Please take your discussion out of the Perl group.
>
> Abigail
This question is posed to those who have experience in both java *AND*
perl. Since there is no perl/java group, I posted to both
comp.lang.java.programmer and comp.lang.perl.misc.
If anyone has any *HELPFUL* advice, please post.
Thanks.
------------------------------
Date: Wed, 29 Aug 2001 15:05:16 +0200
From: "Henry Havemann" <henry.havemann@uni-oldenburg.de>
Subject: perl & ldap & userpw
Message-Id: <9mipf1$v5j$1@newssrv2.hrz.uni-oldenburg.de>
Hi,
please look at this snippet (platform: W2K AD, LDAP namespace):
$adsUser = $adsDomain->Create("user", "cn=".$fullname);
$adsUser->{samAccountName} = $username;
$adsUser->{userPrincipalName} = $principal;
$adsUser->SetInfo();
# refresh the cache
$adsUser->GetInfo();
# Adding somewhat more
$adsUser->{Description} = $Description;
...
...
$adsUser->{HomeDirectory} = $HomeDirectory;
$adsUser->{HomeDrive} = $HomeDrive;
$adsUser->{SetPassword} = $SetPassword;
$adsUser->SetInfo();
The user has been created and all attributes are ok, except the
SetPassword-Attribute. If I try to login as that user it works not with the
given password but with an empty password it does.
Where ist the mistake? Any idea?
Thanks
Henry
------------------------------
Date: 29 Aug 2001 16:09:50 GMT
From: abigail@foad.org (Abigail)
Subject: Re: PerlFS again?
Message-Id: <slrn9oq4uh.t86.abigail@alexandra.xs4all.nl>
Brian Wallis (brian.nospam.wallis@ot.com.au) wrote on MMCMXX September
MCMXCIII in <URL:news:999047230.496386@emissary>:
##
## There was a question posted here a week or so ago about what happened to
## perlfs. I never saw an answer to that.
I better answer this question, or else Brian will keep asking this
question every week.
## So, what has happened to it. The web site doesn't work and the email
## address loops and bounces.
##
## Anyone know what happened. Looked like a great idea but I never got the
## chance to look :-(
PerlFS was a nice idea, but it wasn't patented. Applesoft saw
the potential and quickly filed for a patent. After they got it,
they succesfully sued the original developers and closed down the
website. Which also explains the looping mail.
It might be in the next version of a commercial OS.
Abigail
--
perl -e '$_ = q *4a75737420616e6f74686572205065726c204861636b65720a*;
for ($*=******;$**=******;$**=******) {$**=*******s*..*qq}
print chr 0x$& and q
qq}*excess********}'
------------------------------
Date: Wed, 29 Aug 2001 17:57:14 +0200
From: "Jens Luedicke" <jens@irs-net.com>
Subject: Re: pipe, fork and Gtk+
Message-Id: <pan.2001.08.29.17.57.10.208.22508@irs-net.com>
hi ...
The following won't work:
pipe(READER, WRITER);
WRITER->autoflush(1);
print "Parent: $$\n";
if ($pid = fork) {
$SIG{PIPE} = 'IGNORE';
close WRITER;
while(<READER>) {
chomp($step = $_);
}
close READER;
waitpid($pid,0);
} else {
die "cannot fork: $!" unless defined $pid;
print "Child: $$\n";
close READER;
# bla bla bla ...
close WRITER;
exit;
}
Even when I set SIGPIPE to IGNORE the parent will crash as well ...
jens
In article <9mia79$7uv$2@mamenchi.zrz.TU-Berlin.DE>, "Anno Siegel"
<anno4000@lublin.zrz.tu-berlin.de> wrote:
> According to Jens Luedicke <jens@irs-net.com>:
>> hi ...
>>
>> Is there a safe way of exiting a child process that has been created by
>> an Perl/Gtk+ based parent process?
>>
>> I used the 'pipe2' example from the Cookbook and when I try to exit the
>> child process the parent will exit/die.
>
> Ignore SIGPIPE.
>
> Anno
------------------------------
Date: 29 Aug 2001 16:28:02 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: pipe, fork and Gtk+
Message-Id: <9mj56i$68t$1@mamenchi.zrz.TU-Berlin.DE>
According to Jens Luedicke <jens@irs-net.com>:
Please place your reply after the quoted material.
[rearranged and snipped]
> In article <9mia79$7uv$2@mamenchi.zrz.TU-Berlin.DE>, "Anno Siegel"
> <anno4000@lublin.zrz.tu-berlin.de> wrote:
> > Ignore SIGPIPE.
> >
> > Anno
>
> hi ...
>
> The following won't work:
>
> pipe(READER, WRITER);
> WRITER->autoflush(1);
>
> print "Parent: $$\n";
> if ($pid = fork) {
> $SIG{PIPE} = 'IGNORE';
> close WRITER;
>
> while(<READER>) {
> chomp($step = $_);
> }
>
> close READER;
> waitpid($pid,0);
> } else {
> die "cannot fork: $!" unless defined $pid;
> print "Child: $$\n";
> close READER;
> # bla bla bla ...
> close WRITER;
> exit;
> }
>
> Even when I set SIGPIPE to IGNORE the parent will crash as well ...
Works for me, with SIGPIPE and without. What error do you get?
You should probably use strict and make your variables lexical, but that
doesn't fix it.
Anno
------------------------------
Date: Wed, 29 Aug 2001 18:48:37 +0200
From: "Jens Luedicke" <jens@irs-net.com>
Subject: Re: pipe, fork and Gtk+
Message-Id: <pan.2001.08.29.18.48.36.853.22612@irs-net.com>
In article <9mj56i$68t$1@mamenchi.zrz.TU-Berlin.DE>, "Anno Siegel"
<anno4000@lublin.zrz.tu-berlin.de> wrote:
>
> Works for me, with SIGPIPE and without. What error do you get?
>
> You should probably use strict and make your variables lexical, but that
> doesn't fix it.
The actual parent/child code seems to work now but a trace has
shown that the program dies with a SIGPIPE
after the last called function. This is where the program
enters the Gtk main loop again.
jens
------------------------------
Date: Wed, 29 Aug 2001 18:51:45 +0200
From: "Jens Luedicke" <jens@irs-net.com>
Subject: Re: pipe, fork and Gtk+
Message-Id: <pan.2001.08.29.18.51.40.567.22612@irs-net.com>
hi ...
trace says:
write(3, "F\0\5\0y\0\200\1\v\0\200\1\0\0\0\0\366\0\1\0F\0\5\0y\0"..., 2044) = -1 EPIPE (Broken pipe)
--- SIGPIPE (Broken pipe) ---
write(2, "Gdk-ERROR **: X connection to :0"..., 78Gdk-ERROR **: X connection to :0.0 broken (explicit kill or server shutdown).
) = 78
munmap(0x40016000, 4096) = 0
_exit(1) = ?
jens
------------------------------
Date: 29 Aug 2001 14:46:57 GMT
From: troc@netrus.net (Rocco Caputo)
Subject: POE 0.16 Released
Message-Id: <toq1a4g9tb9mf5@corp.supernews.com>
Good morning. It's my pleasure to announce that POE 0.16 has been
uploaded to the PAUSE. It will arrive at your favorite CPAN mirror
after the customary propagation delay.
POE is an application kernel that uses events and state machines to
implement cooperative threads. It includes a high-level I/O library
that hides most of the usual client/server tediosity. It has been
developed and used in mission-critical systems since August 1998.
POE is available from two web sites right now, if you'd rather not
wait for it to reach the CPAN site of your choice:
POE's main web site: http://poe.perl.org/
SourceForge : http://sf.net/projects/poe/
(Actually, poe.perl.org seems to be having troubles right now.)
It's been about a month (and two four development releases) since
0.15. Thanks to everyone who sent in feedback and patches.
If you would like to receive announcements of POE's development
releases, please send a message to <poe-help@perl.org>. You will
receive instructions for subscribing to POE's mailing list.
This is mainly a maintenance release. Very few new features have been
added. Highlights since 0.15:
* Fixed timers when using Event, Gtk, or Tk event loops. POE's select
loop didn't need fixing.
* Filter::HTTPD was overhauled. It no longer dies on error, for
example.
* Added a LOT of workarounds for features that are broken or missing
on various flavors of Windows. More are needed, however.
* Fixed ReadLine and Curses wheels when using Event.
* Fixed a long-standing race condition when changing filters at
runtime.
When perl.org comes back, you can read more about this, historical,
and future releases on the web:
The full CHANGES file: http://poe.perl.org/poedown/CHANGES
The full README file : http://poe.perl.org/poedown/README
The full TODO file : http://poe.perl.org/poedown/TODO
POE's SourceForge project also has the README and an excerpt of the
CHANGES file.
Thanks for reading!
-- Rocco Caputo / troc@netrus.net / poe.perl.org / poe.sourceforge.net
------------------------------
Date: 29 Aug 2001 18:37:59 +0400
From: Ilya Martynov <ilya@martynov.org>
Subject: Re: Questions about MakeMaker
Message-Id: <877kvnnd88.fsf@abra.ru>
>>>>> On Mon, 27 Aug 2001 11:02:28 +0200, Alexis Roda <alexis.roda@si.urv.es> said:
AR> Hi,
AR> I'm learning MakeMaker, so excuse me if those are estupid questions. I'm
AR> using perl 5.005 under linux (debian potato).
AR> My script needs some datafiles installed under /usr/share. I think that
AR> the simplest way is to add a new dependency to the install target (btw.
AR> install_usr_share) and add a rule install_usr_share in the postamble of
AR> MakeMaker:
AR> [..skip..]
Not sure if it is right way but anyway my $0.02. You can use sub
MY::postamble to write additional target 'pure_install'. Target
'install' depends on it.
Bare bones sample:
use ExtUtils::MakeMaker;
WriteMakefile( .... );
sub MY::postamble {
return <<TEXT;
pure_install ::
-\@\$(CP) SOURCE DEST
TEXT
}
You can check Makefile.PL of HTTP::WebTest for real life example.
--
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
| Ilya Martynov (http://martynov.org/) |
| GnuPG 1024D/323BDEE6 D7F7 561E 4C1D 8A15 8E80 E4AE BE1A 53EB 323B DEE6 |
| AGAVA Software Company (http://www.agava.com/) |
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
------------------------------
Date: Wed, 29 Aug 2001 19:55:04 +0200
From: "Marco Baringer" <marco.baringer@convey.it>
Subject: R: Parse::RecDescent
Message-Id: <9mjah7$36u0$1@stargate1.inet.it>
not sure if you're supposed to post code like this or not, at worst someone
will just kill me.
here's my grammar:
q{
config : section(s) /\s*\n/ | <error>
section : "[" section_label "]" / *\n/ parameter(s) | <error>
section_label : /A-Z/ | <error>
parameter : key "=" value | <error>
key : /[A-Z0-9 ]+/ | <error>
value : /.*$/m | <error>
}
and here's a small test config file:
[SECTION]
key number one=value number one
key2=87
i get this error: Invalid Section: Was expecting / *\n/ but found
"key number one=value number one " instead.
is my problem obvious or do i just need to bang my head with it a bit more?
--
- Marco
------------------------------
Date: Wed, 29 Aug 2001 10:15:46 -0500
From: "freds usenet" <frederick_lia@yahoo.com>
Subject: Re: RegEx?
Message-Id: <3b8d08bd_3@Usenet.com>
Why the ( ) simple. It takes whatever is held in those brackets and stores
it in a variable starting with $1, $2, $3...
so for a tab delenated file you can.
(.*?)\t(.*?)\t(.*?)
which will store the first field in $1 and so on. :-)
Have fun..
Frederick
sabin@cornhusker.net
Jason Baker <baker@Akira.cyborgworkshop.com> wrote in message
news:tonoorhavi5f36@news.supernews.com...
> OK.. Now I'm going to beg for wisdom again. Let me see if I understand
this correctly.
>
> my ($from) = $row->[1] =~ /^([^<]*) </;
>
> I'm doing the () around $from because otherwise I return a one or a zero,
matchs or not.. But why?
> For the Regex
> /^ -> Start of the line
> ([^<]*) -> I have no idea
> </l -> end the match
>
> OK... could someone explain the middle part and why the ()'s? And for
that matter, what if I wanted to get the second half, the email address.
This wouldnt work would it?
>
> David Wall <darkon@one.net> wrote:
> > Samneric <samneric@tigerriverOMIT-THIS.com> wrote on 27 Aug 2001:
>
Posted Via Usenet.com Premium Usenet Newsgroup Services
----------------------------------------------------------
** SPEED ** RETENTION ** COMPLETION ** ANONYMITY **
----------------------------------------------------------
http://www.usenet.com
------------------------------
Date: 29 Aug 2001 09:32:35 -0700
From: coldwave@bigfoot.com (John Holdsworth)
Subject: Re: Self-Searchable Perl documention - Extremely Useful!
Message-Id: <2a46b11e.0108290832.b1b99d2@posting.google.com>
There is a new version of this script (which
patches the ActiveState Perl documentation
to make it searchable locally), minus a couple
of glitches (thanks Yves) at:
http://www.openpsp.org/source/util/perltoc3.pl
(runs a page as a web server using "PerlScript")
While this version works fine it is going
in for a bit of an overhaul now. Anybody
interested in contributing ideas please email
them to johnh@thunder.it and demerphq@hotmail.com
Thanks
john
http://www.openpsp.org
print "just another perl web server";
------------------------------
Date: Wed, 29 Aug 2001 13:21:56 +0000 (UTC)
From: bernard.el-hagin@lido-tech.net (Bernard El-Hagin)
Subject: Re: Spliting on [ ??
Message-Id: <slrn9opql6.oa.bernard.el-hagin@gdndev25.lido-tech>
On 29 Aug 2001 05:53:04 -0700, Lynto <tlynch@riverdelta.com> wrote:
>Greetings:
>
>I have the line:
>
>input [31:0] foo;
>
>I'm using:
>
>@x = $_;
>@x = split(/[\s\[\]:;]+/);
>
>I'm getting:
>
>/[/: unmatched [] in regexp at /asic_tools/perl/vports line 61
>
>Why? I'm escaping the [ character? What am I doing wrong?
Works for me.
Cheers,
Bernard
--
perl -l54e's yyw q q tvmrx "h\ywx ersxliv zivp legoiv"qiy;y #a-zA-Z#d-gu-z#
chefghijklmnopqrstuvwxyzcJab-def-uPwxyzc;s j j s u u s t t s r r s
ppevalpereeteueje'
------------------------------
Date: 29 Aug 2001 14:14:50 GMT
From: Tina Mueller <tinamue@zedat.fu-berlin.de>
Subject: Re: Spliting on [ ??
Message-Id: <9mitcq$2cq3i$1@fu-berlin.de>
Lynto <tlynch@riverdelta.com> wrote:
> input [31:0] foo;
> I'm using:
> @x = $_;
> @x = split(/[\s\[\]:;]+/);
> I'm getting:
> /[/: unmatched [] in regexp at /asic_tools/perl/vports line 61
> Why? I'm escaping the [ character? What am I doing wrong?
it works for me.
> I'm running on a Solaris box and my perl version is:
> This is perl, v5.6.0 built for sun4-solaris
This is perl, version 5.005_03 built for sun4-solaris
This is perl, v5.6.0 built for sun4-solaris
This is perl, version 5.004 (IRIX64 6.4)
regards,
tina
--
http://www.tinita.de \ enter__| |__the___ _ _ ___
tina's moviedatabase \ / _` / _ \/ _ \ '_(_-< of
search & add comments \ \ _,_\ __/\ __/_| /__/ perception
--- Warning: content of homepage hopelessly out-dated ---
------------------------------
Date: Wed, 29 Aug 2001 11:25:51 -0500
From: Dale Bohl <dbohl@sgi.com>
Subject: system call
Message-Id: <3B8D178F.BAFE9868@sgi.com>
I'm developing a perl program that does a rsh to a list
of Unix clients and returns the size of /etc/passwd.
How do I get the following to work with a system call
from Perl?
$command = "ls -la /etc/passwd | awk '{print $5}'";
After this I do a system ("rsh $host $command");
I can't figure out how to get the | awk '{print $5}'
part working.
--
Thanks,
Dale
Dale Bohl
SGI Information Services
dbohl@sgi.com
(715)-726-8406
http://wwwcf.americas.sgi.com/~dbohl/
------------------------------
Date: Wed, 29 Aug 2001 13:42:15 -0400
From: Doug King <Doug.King@abh.siemens.com>
Subject: Re: system call
Message-Id: <3B8D2977.E0DFF299@abh.siemens.com>
Don't do the | awk '{print $5}' in your rsh command, and just parse the
output of the ls command in perl.
It will also be more portable/robust that way -- you don't rely on awk
being present for your script to work.
Also, you can't get the output of the command if you use system -- try
using either backticks or open.
Dale Bohl wrote:
> I'm developing a perl program that does a rsh to a list
> of Unix clients and returns the size of /etc/passwd.
>
> How do I get the following to work with a system call
> from Perl?
>
> $command = "ls -la /etc/passwd | awk '{print $5}'";
>
> After this I do a system ("rsh $host $command");
>
> I can't figure out how to get the | awk '{print $5}'
> part working.
>
> --
>
> Thanks,
> Dale
>
> Dale Bohl
> SGI Information Services
> dbohl@sgi.com
> (715)-726-8406
> http://wwwcf.americas.sgi.com/~dbohl/
------------------------------
Date: 29 Aug 2001 15:56:34 GMT
From: "Soren A." <soren@doesntwantspam.nowhere.non>
Subject: Re: use() versus import() changing semantics?
Message-Id: <Xns910C797CF5E64sorenngroupswonder@198.99.146.10>
Tassilo von Parseval <Tassilo.Parseval@post.rwth-aachen.de> wrote in news:3B8B9B06.7060706@post.rwth-aachen.de on 28 Aug
2001:
> Tina Mueller wrote:
>
>> well, the author says, that find_uris() is deprecated, so you
>> shouldn't use it at all. maybe you can do the same using
>> find() and other methods, but i haven't looked into the docs too
>> much...
>
> Uaah, great! I just checked my version, it was 0.04...subsequently there
> was no mentioning of deprecation. A quick glance into the docs of the
> current version tells me that find() should be able to do the same as
> find_uris. And moreover: it is find(\$string) now. :-)
>
> But now that I fixed it with the old one I'll stick with it. For I might
> not be the only one having an old URI::Find.
Tassilo,
As you know (because we've been corresponding on this) I am aware of what you've tried up to now. I wondered how common it is to
use prototyping in a subroutine definition in a module like this "URI::Find." I have looked at the code of a lot of modules and I cannot
recall having seen it before. Now, Schwern (the module's author) is the Perl Kwality Kontrol pumpking, so I dare not suggest that he
doesn't know what he's doing (or more to the point, *why*), but I wondered if anyone on this ng can shed some light on why anyone
would complicate things this way to begin with ;-)? I'm not sure it seems worth it, going by (what little) I know.
Soren Andersen
--
{{ please note munged e-mail addy, apologies to those who find it a moral atrocity ..
I can be reached at "soren.newsgroups" AT "wonderstorm" DOT "com" }}
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
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.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 V10 Issue 1649
***************************************
