[22802] in Perl-Users-Digest
Perl-Users Digest, Issue: 5023 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu May 22 06:05:47 2003
Date: Thu, 22 May 2003 03:05:11 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Thu, 22 May 2003 Volume: 10 Number: 5023
Today's topics:
Re: =?ISO-8859-1?Q?removing_a_word_using_a_regexp_doesn (Leif Wessman)
[ANNOUNCE] wxPerl 0.15 <mbarbon@delete_me.dsi.unive.it>
Re: advice re perl modules <me@privacy.net>
Re: awstats ignores HostAliases if using %virtualname (gooze)
Re: calling an exe file <allanon@hotmail.com>
Re: Code reference from a subclass <ict@eh.org>
Re: Collecting Stats (split/DBI:mysql) (Philip Lees)
DBI - 0 is not being treated as False ? <kasp@epatra.com>
Re: Finding files and moving them in perl (Tad McClellan)
help me with these guts <ericw@nospam.ku.edu>
Re: help me with these guts <tassilo.parseval@rwth-aachen.de>
Re: Hilarious locking bug in 5.8.0 (the_rev_dharma_roadkill)
Re: html2txt <jurgenex@hotmail.com>
Re: html2txt <jurgenex@hotmail.com>
Re: html2txt <REMOVEsdnCAPS@comcast.net>
Re: ppm3 not working on Redhat 9 <simon.andrews@bbsrc.ac.uk>
Re: trying to create spaces <mgjv@tradingpost.com.au>
Re: trying to create spaces <TruthXayer@yahoo.com>
Re: trying to create spaces <mgjv@tradingpost.com.au>
Re: trying to create spaces <jurgenex@hotmail.com>
Re: wierd behaviour in writing out a file <REMOVEsdnCAPS@comcast.net>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 22 May 2003 00:58:52 -0700
From: leifwessman@hotmail.com (Leif Wessman)
Subject: Re: =?ISO-8859-1?Q?removing_a_word_using_a_regexp_doesn't_w_?= =?ISO-8859-1?Q?_ork_with_the_characters_'=E5',_'=E4'_and_'=F6'?=
Message-Id: <64beeaad.0305212358.1e427947@posting.google.com>
$text = "det mandelträdet det nisse det";
$text =~ s/([^\wÅÄÖåäö])det([^\wÅÄÖåäö])/$1$2/ig;
print $text;
$text => "det mandelträdet nisse det";
At least one "det" vanished! :-)
Leif
> Try instead
> $text =~ s/([^\wÄÖÜäöü])det([^\wÄÖÜäöü])/$1$2/ig;
>
> > then $text becomes "mandelträdetnisse det"
> > I was expecting: " mandelträdet nisse ";
> >
> > I must admit that I'm not 100% sure of what I'm doing here. I hope
> > that you can help me again. I'm sure that for an expert (like
> > yourself) could solve this in 2 secs.
------------------------------
Date: Thu, 22 May 2003 07:40:28 GMT
From: Mattia Barbon <mbarbon@delete_me.dsi.unive.it>
Subject: [ANNOUNCE] wxPerl 0.15
Message-Id: <Xns9382C1D79CBB0mbarbondsiuniveit@192.168.9.1>
A new version of wxPerl, the Perl bindings to wxWindows, is out!
wxWindows is a free and cross platform (Windows/Motif/GTK/Mac) C++ GUI
toolkit with native look and feel. (visit http://www.wxwindows.org/
for details).
You can download wxPerl sources from
$CPAN/authors/id/M/MB/MBARBON/Wx-0.15.tar.gz;
Screenshots: http://wxperl.sourceforge.net/sshot01.html
Binary packages for ActivePerl/Win32 6xx and 8xx builds, and Red Hat
Linux are available along with documentation in HTML and MS HTML Help
format from http://wxperl.sourceforge.net/download.html
The project home page is http://wxperl.sourceforge.net/. There is also
a mailing list dedicated to wxPerl users:
wxperl-users@lists.sourceforge.net
Changes since the last version:
- Removed support for wxWindows 2.2.x and 2.3.x.
- Removed support for Perl 5.004.
- Started documentation for the extension api
(see Wx/Api.pod).
- Added wxFrame/wxDialog::SetShape.
Regards
Mattia
------------------------------
Date: Thu, 22 May 2003 21:05:34 +1200
From: "Tintin" <me@privacy.net>
Subject: Re: advice re perl modules
Message-Id: <bai3pn$tcnl7$1@ID-172104.news.dfncis.de>
"Max Waterman" <maxw@sgi.com> wrote in message
news:bae8au$1l2cs8$3@fido.engr.sgi.com...
> Tad McClellan wrote:
> > Max Waterman <maxw@sgi.com> wrote:
> >
> >
> >>Noone seems to want to answer this question.
> >
> >
> >
> > Date: Tue, 20 May 2003 09:26:31 -0700 OP
> > Date: Tue, 20 May 2003 11:07:25 -0700 self followup
> >
> >
> > You have ambitious expectations regarding Usenet.
> >
>
> Indeed, it seems that way, though I posted to another news group and that
> was a day or so ago.
>
> So, yes, you're right, but understand that this isn't the only place I've
> asked.
So that's even worse. You should learn about cross posting instead of multi
posting.
------------------------------
Date: 22 May 2003 01:41:14 -0700
From: g000ze@gmx.net (gooze)
Subject: Re: awstats ignores HostAliases if using %virtualname
Message-Id: <e09c7315.0305220041.1f6cc978@posting.google.com>
> alt.flame, where else?
Well, not everybody can be as good as you are. I hope that you will be
in the situation for needing help and meeting a funny and helpfull
person like you are...
------------------------------
Date: Thu, 22 May 2003 09:43:27 +0100
From: "Allanon" <allanon@hotmail.com>
Subject: Re: calling an exe file
Message-Id: <bai2ji$13jk@newton.cc.rl.ac.uk>
"Thomas Kratz" <ThomasKratz@REMOVEwebCAPS.de> wrote in message
news:3ecbc2ab.0@juno.wiesbaden.netsurf.de...
>
> "Allanon" <allanon@hotmail.com> wrote...
> > "Islaw" <islaw@adexec.com> wrote in message
> > news:bhFya.4663$YS4.3391@newssvr17.news.prodigy.com...
> > [..]
> > > Or if the output is needed to be captured:
> > >
> > > my $out = `c:/test/text.exe 2>&1`
> >
> > That's useful to know :)
> >
> > Can you explain what the "2>&1" bit actually means/does char-by-char.
>
> Unix shells (*and* the cmd shell under win32) treat numbers in connection
with piping or redirection symbols as descriptors for stdin(0), stdout(1)
and stderr(2).
>
> The above means "redirect what's sent to stderr to the same place where
stdout is sent". And by capturing the output with backticks you will get
both stdout and stderr from running test.exe.
I see.. kind-of (goes off to find out what backticks are ;)
Thanks
Allanon
------------------------------
Date: 22 May 2003 12:31:02 +1100
From: Iain Truskett <ict@eh.org>
Subject: Re: Code reference from a subclass
Message-Id: <slrnbcodvv.7uu.ict@gytha.anu.edu.au>
* Juan Francisco Fernandez Carrasco <juanf@lsi.upc.es>:
> I have two classes which are like this: A is B's superclass. I also
> have a method "newAddr" in A which gets the code reference from the
> method "new". I thought this scheme would give me the code reference
> of B's "new" if I would call "newAddr" from a B instance, but this
> is not what happens. It gives me the code reference of A's "new"
> instead.
Well, assuming newAddr is a method, thus has access to the $self
stuff, the can() method is very useful. Returns a reference to a sub
if it's the object can do a method of the given name.
[..]
> Could anybody help me with this? Why I get the to te code reference
> of the superclass (A) instead of that of the subclass (B)? What is
> the way to access the right code reference withou moving "newAddr"
> from A?
See below. I'm thoroughly uncertain why you want a reference
to 'new' though.
[...]
> # gets the address of the method new
> # in order to be called after a dynamical
> # loading of the class
> sub newAddr(){
my $self = shift; # be it object or class name
my $res = $self->can("new");
> return $res;
>
> }#end of newAddr
Later, you can:
my $x = C->newAddr();
my $obj = C->$x( @params );
cheers,
--
Iain.
------------------------------
Date: Thu, 22 May 2003 06:35:34 GMT
From: pjlees@ics.forthcomingevents.gr (Philip Lees)
Subject: Re: Collecting Stats (split/DBI:mysql)
Message-Id: <3ecc6d0c.62257390@news.grnet.gr>
On Thu, 22 May 2003 01:50:07 +1000, "Andrew Rich"
<andrew.rich@bigpond.com> wrote:
>Wonder what would be the best way to do this ?
>I want to split up readings for 24 hours and insert them into a database.
>eg
>
>data,2,3,2,2,3,4,23,2,34,3,2,2,3,4,4,3,2,2,33,55,22,334,332,22
>
>Would I best use split ?
Undoubtedly. Assuming you want to lose the 'data' off the beginning:
my( undef, @data ) = split /,/, $input;
>I know the database bit off by heart.
Maybe, but you really should be doing some error checking, at least on
the connect.
>#!/usr/bin/perl
>use DBI;
use strict;
use warnings;
>exit;
This does nothing.
Phil
--
Ignore coming events if you wish to send me e-mail
------------------------------
Date: Thu, 22 May 2003 15:13:14 +0530
From: "Kasp" <kasp@epatra.com>
Subject: DBI - 0 is not being treated as False ?
Message-Id: <bai6bh$v36$1@newsreader.mailgate.org>
I read recently....
"DBI plays a magic trick so that the value it turns is true even when it is
0."
[source = http://www.perl.com/pub/a/1999/10/DBI.html ]
Can some one please explain how this can be done?
I find this bizarre, because 0 is false in Perl.
Thanks.
--
"Accept that some days you are the pigeon and some days the statue."
"A pat on the back is only a few inches from a kick in the butt." - Dilbert.
------------------------------
Date: Wed, 21 May 2003 23:06:57 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Finding files and moving them in perl
Message-Id: <slrnbcoj71.5b3.tadmc@magna.augustmail.com>
Darren Dunham <ddunham@redwood.taos.com> wrote:
> perhaps something more like...
> my %files;
> while (my $filename = readdir(DIR))
> {
> $files{$filename} = 1;
> }
> closedir DIR;
> if (exists $files{"QF$digits"})
Since you do not care about the hash values, you can load the hash
with much less fuss:
@files{ readdir(DIR) } = ();
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Thu, 22 May 2003 03:28:54 GMT
From: Eric Wilhelm <ericw@nospam.ku.edu>
Subject: help me with these guts
Message-Id: <pan.2003.05.21.22.25.35.162517.5987@nospam.ku.edu>
I'm trying to return a string to a reference from a function built using
swig.
I think I've narrowed it down to sv_setpv and I can't really see what I'm
supposed to do here.
%typemap(perl5,in) char * blob (char * text){
SV* tempsv;
if ( !SvROK($source)) {
croak("expected a reference\n");
}
tempsv = SvRV($source);
text = SvPV(tempsv,na);
$target = text;
}
%typemap(perl5,argout) char * blob {
SV *tempsv;
STRLEN length;
if (SvOK($arg)) {
tempsv = SvRV($arg);
if ($source == NULL) {
sv_setsv(tempsv, &PL_sv_undef);
} else {
printf("typemap got back: %s\n", $source);
sv_setpv(tempsv, $source);
// chokes on line above
}
}
}
int dumbfunc(char *blob){
printf("read %s\n", blob);
sprintf(blob, "output text is really long");
}
This causes a segfault where sv_setpv tries to load the variable, but I
can't seem to get SvGROW to work either.
Anyone have an idea of how to do this?
Thanks,
Eric
------------------------------
Date: 22 May 2003 06:17:42 GMT
From: "Tassilo v. Parseval" <tassilo.parseval@rwth-aachen.de>
Subject: Re: help me with these guts
Message-Id: <bahq26$68p$1@nets3.rz.RWTH-Aachen.DE>
Also sprach Eric Wilhelm:
> I'm trying to return a string to a reference from a function built using
> swig.
>
> I think I've narrowed it down to sv_setpv and I can't really see what I'm
> supposed to do here.
>
> %typemap(perl5,in) char * blob (char * text){
> SV* tempsv;
> if ( !SvROK($source)) {
> croak("expected a reference\n");
> }
> tempsv = SvRV($source);
> text = SvPV(tempsv,na);
> $target = text;
> }
> %typemap(perl5,argout) char * blob {
> SV *tempsv;
> STRLEN length;
> if (SvOK($arg)) {
> tempsv = SvRV($arg);
> if ($source == NULL) {
> sv_setsv(tempsv, &PL_sv_undef);
> } else {
> printf("typemap got back: %s\n", $source);
> sv_setpv(tempsv, $source);
> // chokes on line above
> }
> }
> }
I am not familiar with SWIG at all so I don't quite know how these
%typemap things are supposed to work together (can you be sure that $arg
really is a reference when SvOK($arg) is true?).
Anyway, the above argout-typemap looks as though it would try to copy a
string into an SV that is potentially NULL. What does 'SvOK(tempsv)'
yield in the else-branch that segfaults?
> int dumbfunc(char *blob){
> printf("read %s\n", blob);
> sprintf(blob, "output text is really long");
> }
>
> This causes a segfault where sv_setpv tries to load the variable, but I
> can't seem to get SvGROW to work either.
Tassilo
--
$_=q#",}])!JAPH!qq(tsuJ[{@"tnirp}3..0}_$;//::niam/s~=)]3[))_$-3(rellac(=_$({
pam{rekcahbus})(rekcah{lrePbus})(lreP{rehtonabus})!JAPH!qq(rehtona{tsuJbus#;
$_=reverse,s+(?<=sub).+q#q!'"qq.\t$&."'!#+sexisexiixesixeseg;y~\n~~dddd;eval
------------------------------
Date: 21 May 2003 18:35:28 -0700
From: doug.hendricks@tnzi.com (the_rev_dharma_roadkill)
Subject: Re: Hilarious locking bug in 5.8.0
Message-Id: <fb91dbec.0305211735.708889a5@posting.google.com>
Thanks for that. I've finally bit the bullet and linked perldoc into
/usr/bin, so that my path can see it.
Steve Grazzini <grazz@pobox.com> wrote in message news:<GjTya.24385$4_1.5221662@twister.nyc.rr.com>...
> the_rev_dharma_roadkill <doug.hendricks@tnzi.com> wrote:
> >
> > # this sub ALWAYS grabs the lock, even when it should not!
> > sub lock { *FH = shift;
> > flock FH, (LOCK_EX|LOCK_NB) or print "flock lock1 $!\n"; }
>
> > The answer is that unless you define sub lock before you use it,
> > perl 5.8.0 uses a different silently defined lock() that is
> > silently imported.
>
> Not exactly (but the truth isn't much prettier).
>
> $ perldoc -f lock
> lock THING
> This function places an advisory lock on a shared variable, or
> referenced object contained in THING until the lock goes out of
> scope.
>
> lock() is a "weak keyword" : this means that if you've defined
> a function by this name (before any calls to it), that function
> will be called instead. (However, if you've said "use threads",
> lock() is always a keyword.) See threads.
------------------------------
Date: Thu, 22 May 2003 05:28:56 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: html2txt
Message-Id: <seZya.56070$Ur1.13442@nwrddc03.gnilink.net>
Sten Malmlund wrote:
> I'm trying to make a regular expression tom get rid of all html tags
> to get a plain txt file from all texts beteweeb the tags.
Forget it. Contrary to popular believe parsing HTML is rocket science and
regular expressions are not suitable to do it.
With standard regular expressions it is impossible (because HTML is not a
regular language).
With the enhanced REs from Perl it may be possible, but you really really
don't want to do it unless you have a serious maochistic defect.
The FAQ contains further details and hints what to do instead.
BTW: The HTML::Parser package even comes with an example program that does
exactly what you are looking for.
jue
------------------------------
Date: Thu, 22 May 2003 05:28:56 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: html2txt
Message-Id: <seZya.56071$Ur1.13126@nwrddc03.gnilink.net>
Sten Malmlund wrote:
> I'm trying to make a regular expression tom get rid of all html tags
> to get a plain txt file from all texts beteweeb the tags.
Forget it. Contrary to popular believe parsing HTML is rocket science and
regular expressions are not suitable to do it.
With standard regular expressions it is impossible (because HTML is not a
regular language).
With the enhanced REs from Perl it may be possible, but you really really
don't want to do it unless you have a serious maochistic defect.
The FAQ contains further details and hints what to do instead.
BTW: The HTML::Parser package even comes with an example program that does
exactly what you are looking for.
jue
------------------------------
Date: Thu, 22 May 2003 04:47:29 -0500
From: "Eric J. Roode" <REMOVEsdnCAPS@comcast.net>
Subject: Re: html2txt
Message-Id: <Xns93833B0ED10A9sdn.comcast@216.166.71.239>
-----BEGIN xxx SIGNED MESSAGE-----
Hash: SHA1
"Sten Malmlund" <sten.malmlund@pp.htv.fi> wrote in
news:bah6a9$ehl$1@nyytiset.pp.htv.fi:
> Hello,
>
> This might be an obvious thing, but I'm a beginner in regular
> expressions.
>
> I'm trying to make a regular expression tom get rid of all html tags
> to get a plain txt file from all texts beteweeb the tags.
Have you considered reading the FAQ?
- --
Eric
print scalar reverse sort qw p ekca lre reh
ts uJ p, $/.r, map $_.$", qw e p h tona e;
-----BEGIN xxx SIGNATURE-----
Version: PGPfreeware 7.0.3 for non-commercial use <http://www.pgp.com>
iQA/AwUBPsyc4GPeouIeTNHoEQLKogCfREFOozd+1le8aQdVcZOUKqxDZfAAn2+9
7cnWW9i216Pzv3X3G1HHAAko
=TBk1
-----END PGP SIGNATURE-----
------------------------------
Date: Thu, 22 May 2003 10:31:58 +0100
From: Simon Andrews <simon.andrews@bbsrc.ac.uk>
Subject: Re: ppm3 not working on Redhat 9
Message-Id: <3ECC990E.5@bbsrc.ac.uk>
new2redhat wrote:
> When I type ppm3 at the shell prompt I get:
>
> bash: ppm3: command not found
>
> I installed PERL 5.8 with Redhat 9. Typing 'perl' at the prompt works.
> ppm3 does not. I want to install TK from an Activestate module
> download.
You realise that ppm is not part of the standard perl distribution, but
rather an add on provided as part of ActiveStates own perl distribution
(ActivePerl). You have to have installed ActivePerl to get ppm.
If you have installed ActivePerl then it is possible that the location
you added it to has not been added to your path (the set of directories
your shell will look through to find programs). You can get round this
either by:
1) Calling ppm with a full path
2) Adding the ActivePerl bin directory into your path
3) Adding links to somewhere in your path which point at the activeperl
programs.
Also note that if you have installed ActivePerl, when you type perl at a
command prompt you are probably getting your systems perl responding
rather than ActivePerls.
Hope this helps
Simon.
------------------------------
Date: Thu, 22 May 2003 01:34:05 GMT
From: Martien Verbruggen <mgjv@tradingpost.com.au>
Subject: Re: trying to create spaces
Message-Id: <slrnbcoa8d.h6r.mgjv@verbruggen.comdyn.com.au>
On Thu, 22 May 2003 00:46:03 GMT,
Chris <chris_12003@yahoo.com> wrote:
> nl~~nl will give me a blank line.
No, it won't. Watch:
$ perl -wle 'print "nl~~nl"'
nl~~nl
See? No blank line.
> Is there something that will give me
> extra white space between characters. Right now if I type "a
> b", it gets displayed as "a b".
Put more spaces between the a and the b? Or put newlines there? There
are many, many ways.
$ perl -wle 'print "a b"'
a b
have you considered reading the documentation?
Martien
--
|
Martien Verbruggen | +++ Out of Cheese Error +++ Reinstall
Trading Post Australia | Universe and Reboot +++
|
------------------------------
Date: Wed, 21 May 2003 18:54:33 -0700
From: TruthXayer <TruthXayer@yahoo.com>
Subject: Re: trying to create spaces
Message-Id: <3ECC2DD9.DE80CC70@yahoo.com>
Martien Verbruggen wrote:
>
> On Thu, 22 May 2003 00:46:03 GMT,
> Chris <chris_12003@yahoo.com> wrote:
> > nl~~nl will give me a blank line.
>
> No, it won't. Watch:
>
> $ perl -wle 'print "nl~~nl"'
> nl~~nl
>
> See? No blank line.
>
> > Is there something that will give me
> > extra white space between characters. Right now if I type "a
> > b", it gets displayed as "a b".
>
> Put more spaces between the a and the b? Or put newlines there? There
> are many, many ways.
>
> $ perl -wle 'print "a b"'
> a b
If you don't want to count spaces and type em'
print 'a', ' ' x (1), "b\n";
or if you are using it numerous times:
my $SP = ' ';
print $SP x (133); ## to specify numerous spaces....
__
.....
------------------------------
Date: Thu, 22 May 2003 04:49:02 GMT
From: Martien Verbruggen <mgjv@tradingpost.com.au>
Subject: Re: trying to create spaces
Message-Id: <slrnbcollv.2d7.mgjv@verbruggen.comdyn.com.au>
On Wed, 21 May 2003 18:54:33 -0700,
TruthXayer <TruthXayer@yahoo.com> wrote:
> Martien Verbruggen wrote:
>> $ perl -wle 'print "a b"'
>> a b
>
> If you don't want to count spaces and type em'
>
> print 'a', ' ' x (1), "b\n";
Why the brackets? They're not needed.
Martien
--
|
Martien Verbruggen |
Trading Post Australia | 42.6% of statistics is made up on the spot.
|
------------------------------
Date: Thu, 22 May 2003 05:01:51 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: trying to create spaces
Message-Id: <3RYya.56018$Ur1.23934@nwrddc03.gnilink.net>
Chris wrote:
> nl~~nl will give me a blank line.
Really? Is this an operator or a function or as a string or how do you do
that?
Would be great if you could provide a working code sample that explains how
to use nl~~nl
> Is there something that will give
> me extra white space between characters. Right now if I type "a
> b", it gets displayed as "a b".
Well, yes, like e.g. typing more spaces?
jue
------------------------------
Date: Thu, 22 May 2003 04:42:09 -0500
From: "Eric J. Roode" <REMOVEsdnCAPS@comcast.net>
Subject: Re: wierd behaviour in writing out a file
Message-Id: <Xns93833A280EB47sdn.comcast@216.166.71.239>
-----BEGIN xxx SIGNED MESSAGE-----
Hash: SHA1
TruthXayer <TruthXayer@yahoo.com> wrote in news:3ECC1C92.E67BB860
@yahoo.com:
> o What is the cause of this wierd behaviour?
A bug.
> How can I
> prevent it in the perl script?
Find and fix the bug. The people in this newsgroup aren't going to be a
whole lot of help without seeing the code. Is the section of the program
that writes the file very big? If not, post it.
- --
Eric
print scalar reverse sort qw p ekca lre reh
ts uJ p, $/.r, map $_.$", qw e p h tona e;
-----BEGIN xxx SIGNATURE-----
Version: PGPfreeware 7.0.3 for non-commercial use <http://www.pgp.com>
iQA/AwUBPsyboWPeouIeTNHoEQKzsgCgnRgLkHKd7Ty6MhCDRtwHedLWRfEAniuw
QeI45haQRU8qYzft457HxPSv
=O0bs
-----END PGP SIGNATURE-----
------------------------------
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 5023
***************************************
