[24437] in Perl-Users-Digest
Perl-Users Digest, Issue: 6621 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri May 28 14:05:58 2004
Date: Fri, 28 May 2004 11: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 Fri, 28 May 2004 Volume: 10 Number: 6621
Today's topics:
"Commutative" regexps? <jkrugman345@yahbitoo.com>
"perl-ish" [was: Re: filter in perl] <bik.mido@tiscalinet.it>
2 naive questions: Perl 6; Perl vs. shell scripts <jkrugman345@yahbitoo.com>
Re: 2 naive questions: Perl 6; Perl vs. shell scripts <usenet@morrow.me.uk>
Re: 2 naive questions: Perl 6; Perl vs. shell scripts <postmaster@castleamber.com>
Re: Am I a programmer or a scripter? (Steve The Geek)
Compiling Perl GD on AIX 4.3.3 <FirstName.LastName@PWGSC.GC.CA>
Extracting a data from a string <no_spam@hotmail.com>
Re: Extracting a data from a string <noreply@gunnar.cc>
Re: Extracting a data from a string (Walter Roberson)
Re: Extracting a data from a string <no_spam@hotmail.com>
Re: Extracting a data from a string <jgibson@mail.arc.nasa.gov>
Re: Listing files sorted by creation time <jgibson@mail.arc.nasa.gov>
Re: Login to MS Exchange to send e-mail <ywwong_hk@hotmail.com>
Re: Login to MS Exchange to send e-mail <grante@visi.com>
Re: MyPAN? <segraves_f13@mindspring.com>
Re: Obtaining matched (sub)string (Michael T. Davis)
Re: Obtaining matched (sub)string <tadmc@augustmail.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 28 May 2004 17:46:35 +0000 (UTC)
From: J Krugman <jkrugman345@yahbitoo.com>
Subject: "Commutative" regexps?
Message-Id: <c97ttr$nu0$1@reader2.panix.com>
Suppose that I have three different regexps, for example:
my $r1 = qr/foo/;
my $r2 = qr/bar/;
my $r3 = qr/baz/;
(although not necessarily this simple). If I wanted to find all
the documents in an array of documents that matched the three
regexps, I'd just do:
for my $doc (@docs) {
if (/$r1/s && /$r2/s && /$r3/s) {
go_to_town($_);
}
}
But what if I wanted to impose a constraint on how far any two
regexps can be from each other (e.g. for implementing a NEAR query
operator). In that case I'd need expressions
/$r1(.*?)$r2/s
and test for the length of $1. The problem is that now I'd need
6 tests like this like. If instead of 3 regexps we had N, the
number of such tests required would be N*(N-1)/2, i.e. quadratic
growth in N. But this would be a very inefficient solution. After
all, after /($r1|$r2|$r3)/s matched, and say the match was $r2, we
know that we are interested only in the distance between this match
and the next match of /($r1|$r3)/s. And once this matched, say to
$r3, we are only interested in the distance between this match and
the next match to /$r1/s. This approach is linear in N. The
problem is that I can't figure out how to code it in a way that
preserves this linear property. The first obstacle is how to
determine which of the regexps in a disjunction (e.g. /($r1|$r2|$r3)/)
actually matched, without having to perform O(N) tests (which would
put me back in O(N^2) territory for the whole algorithm).
Of course, if there were a way to tell Perl to look for lines that
matched $r1, $r2, and $r3 in *any* order, coding this would be
relatively simple (though the results not necessarily faster). Is
there any way to coax the regexp engine to handle such "commutative
regexps"?
Any suggestions on this would be much appreciated.
jill
--
To s&e^n]d me m~a}i]l r%e*m?o\v[e bit from my a|d)d:r{e:s]s.
------------------------------
Date: Fri, 28 May 2004 17:04:11 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: "perl-ish" [was: Re: filter in perl]
Message-Id: <t6feb0dlocvgdl8nkn7bauahre5sogumsc@4ax.com>
On Mon, 24 May 2004 15:18:05 +0200, Josef Moellers
<josef.moellers@fujitsu-siemens.com> wrote:
>Andrea Spitaleri wrote:
>> Hi everyone,
>> I need to confirm a my doubt.
>> I use to make filter which they work perfectly. I am wondering if the
>> style of these scripts are perl-fashion or not. Ex in.txt:
>
>Why is everybody so hot to write "perl-ish" code?
>
>Putting technical aspects (functionality, performance, stability) aside,
>the best code is the code which you understand best.
>Eg if you get confused by the implicit $_'s (like I do occasionally),
>then don't use them, even if they are extreeeemy "perl-ish".
Well, because as a matter of a fact "perl-ish" code is most likely to
be the kind of code a Perl programmer will understand best. Of course
this requires being somewhat acquainted with some particularities of
Perl's syntax and semantics regarding e.g. some functions like map()
or grep(), some operators like .. or short-circuiting of logical
operators, etc.
I remember a time when I could hardly understand what map() was about
and then I saw an example of Schwartzian transform and the only thing
I could think of it was that it seemed like a random sequence of
chars... but later on I even more or less rediscovered it by myself!
Now it's very natural to me...
I often happen to write scripts that take a bunch of directories as
arguments: these scripts often include lines like:
@ARGV=grep { -d or !warn "`$_': not a directory!\n" } @ARGV;
die <<"EOD" unless @ARGV;
Usage: $0 [options] <dir> [<dirs>]
-i <file> read cached info from <file>
-o <file> write cached info to <file>
EOD
these are very perl-ish IMHO and they are also very readable, still
IMHO, just because I'm used to Perl's syntax/semantics. For sure I
wouldn't have found them just as readable as a newbie. (I still
consider myself to be a newbie FWIW. But somewhat an advanced one!)
Please note that I'm not saying that good Perl programming should be
aimed at extremely concise code or golf(-like) tricks. For example in
the actual script from which I took the lines quoted above I also have
the following code a few lines below:
find { no_chdir => 1,
preprocess => sub {
sort {lc $a cmp lc $b} @_;
},
wanted => sub {
# ...
} }, @ARGV;
of course I may have written the whole thing like
find { no_chdir => 1,
# ...
} }, do {
my @t=grep { -d or !warn "`$_': not a directory!\n" }
@ARGV;
@t ? @t : die <<"EOD" };
...
...
EOD
But then this, however perl-ish may seem, would obscure the logical
flow of the script.
Michele
--
# This prints: Just another Perl hacker,
seek DATA,15,0 and print q... <DATA>;
__END__
------------------------------
Date: Fri, 28 May 2004 17:17:23 +0000 (UTC)
From: J Krugman <jkrugman345@yahbitoo.com>
Subject: 2 naive questions: Perl 6; Perl vs. shell scripts
Message-Id: <c97s73$n9v$1@reader2.panix.com>
Two very naive, and quite unrelated just-out-of-curiosity questions.
Where is Perl 6? Not that I'm impatient or anything (quite the
contrary, actually; I'd like to master Perl 5 and enjoy the benefits
of this mastery for a little while, before going back to square
1). But I thought already months ago that its release was imminent.
Is it because, as a free software project, there just aren't enough
programmers available for the task? Or is the delay unrelated to
manpower issues?
The second question is: given how much more powerful Perl scripting
is compared to (Unix) shell scripting, I'm surprised that there's
so much shell scripting still out there. Is there any hope that
Perl scripts will replace 95% of the shell scripting out there?
Or are all these shell scripts going to be with us forever, just
like COBOL?
jill
--
To s&e^n]d me m~a}i]l r%e*m?o\v[e bit from my a|d)d:r{e:s]s.
------------------------------
Date: Fri, 28 May 2004 17:35:59 +0000 (UTC)
From: Ben Morrow <usenet@morrow.me.uk>
Subject: Re: 2 naive questions: Perl 6; Perl vs. shell scripts
Message-Id: <c97t9v$e96$1@wisteria.csv.warwick.ac.uk>
Quoth J Krugman <jkrugman345@yahbitoo.com>:
>
> Two very naive, and quite unrelated just-out-of-curiosity questions.
>
> Where is Perl 6? Not that I'm impatient or anything (quite the
> contrary, actually; I'd like to master Perl 5 and enjoy the benefits
> of this mastery for a little while, before going back to square
> 1). But I thought already months ago that its release was imminent.
> Is it because, as a free software project, there just aren't enough
> programmers available for the task? Or is the delay unrelated to
> manpower issues?
Not yet designed :). In a recent perl.com column, Allison Randall said
there may be a beta in two years or so, but that is still a guess.
Before it can be written, Larry, Damian et al have to finish thrashing
out the design of the language; I guess parrot (the runtime perl6 will
use) will be finished before that gets done.
You won't have to go back to square one when moving from perl5 to perl6.
Perl6 will still be perl, and the basic concepts and syntax of the
language will be the same. I would imagine that perl5 will continue to
be supported for a long time after perl6 is released, as well.
> The second question is: given how much more powerful Perl scripting
> is compared to (Unix) shell scripting, I'm surprised that there's
> so much shell scripting still out there. Is there any hope that
> Perl scripts will replace 95% of the shell scripting out there?
> Or are all these shell scripts going to be with us forever, just
> like COBOL?
Shell fulfills a slightly different task from perl. If a task primarily
involves invoking external programs it is much easier to code in shell
than in Perl. Also, shell is (under the assumption of Unix-ish) more
portable than perl, so things like system startup scripts and program
configuration scripts *have* to be written in shell, as there is no
guarantee perl is available.
Ben
--
All persons, living or dead, are entirely coincidental.
ben@morrow.me.uk Kurt Vonnegut
------------------------------
Date: Fri, 28 May 2004 12:38:46 -0500
From: John Bokma <postmaster@castleamber.com>
Subject: Re: 2 naive questions: Perl 6; Perl vs. shell scripts
Message-Id: <40b77928$0$199$58c7af7e@news.kabelfoon.nl>
J Krugman wrote:
> Two very naive, and quite unrelated just-out-of-curiosity questions.
>
> Where is Perl 6? Not that I'm impatient or anything (quite the
> contrary, actually; I'd like to master Perl 5 and enjoy the benefits
> of this mastery for a little while, before going back to square
> 1). But I thought already months ago that its release was imminent.
I thought it would take some years.
> Is it because, as a free software project, there just aren't enough
> programmers available for the task? Or is the delay unrelated to
> manpower issues?
I don't have the time to follow all, but I remember all the discussions
eating up a lot of time, as it should. No idea what the status is.
> The second question is: given how much more powerful Perl scripting
> is compared to (Unix) shell scripting, I'm surprised that there's
> so much shell scripting still out there. Is there any hope that
> Perl scripts will replace 95% of the shell scripting out there?
No. Some is done in Python, and maybe even PHP
> Or are all these shell scripts going to be with us forever, just
> like COBOL?
Yes, especially on systems with very limited resources. For example
running Linux of a X MB Flash memory card.
--
John MexIT: http://johnbokma.com/mexit/
personal page: http://johnbokma.com/
Experienced Perl programmer available: http://castleamber.com/
------------------------------
Date: 28 May 2004 09:49:26 -0700
From: slkleine@hotmail.com (Steve The Geek)
Subject: Re: Am I a programmer or a scripter?
Message-Id: <863f122c.0405280849.a62ccff@posting.google.com>
mike blamires <mike@mysurname.co.uk> wrote in message news:<pan.2004.05.26.23.43.45.586892@mysurname.co.uk>...
> On Tue, 25 May 2004 12:09:20 +0000, Mothra scribbled furiously:
>
> > . . . at what stage can you call yourself a Perl programmer?
> Definitely semantic snobbery! Its all computer code at the end of the day...
The difference between a 'scripter' and a 'programmer' is determined
by what happens when you bring up an error to them and ask for a fix:
The Scripter will look at you and think for a moment -- and fix the
code.
The Programmer will look at you as if you've just said, 'Go shove a
weasel up your ass,' and will blame the networking group.
HTH
HAND
Steve the (perl/tk) Geek
------------------------------
Date: Fri, 28 May 2004 09:28:11 -0400
From: "PWGSC/TPSGC" <FirstName.LastName@PWGSC.GC.CA>
Subject: Compiling Perl GD on AIX 4.3.3
Message-Id: <c97esr$auv37@shark.pwgsc.gc.ca>
Has anyone successfully compiled Lincoln Stein's Perl GD module on AIX
4.3.3? I have tried both the IBM C compiler and gcc.
------------------------------
Date: Fri, 28 May 2004 19:38:05 +0400
From: Dan <no_spam@hotmail.com>
Subject: Extracting a data from a string
Message-Id: <85neb0lh7lm39tkeeg2vg3v62q758e0ss6@4ax.com>
Good morning/evening,
Having a string like
<img src="http://mywebsite_address/mypath/-picture.gif"></a><br>
How can I extract "-picture.gif" from this string ?
The name will, for example, always begin by "-"
It will be for example -pic1gif, or -pic8.gif, etc.
Thank you,
Dan
------------------------------
Date: Fri, 28 May 2004 17:41:07 +0200
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: Extracting a data from a string
Message-Id: <2hp52kFfmkfdU1@uni-berlin.de>
Dan wrote:
> Having a string like
>
> <img src="http://mywebsite_address/mypath/-picture.gif"></a><br>
>
> How can I extract "-picture.gif" from this string ?
In Perl, it can be done with a regular expression.
http://www.perldoc.com/perl5.8.4/pod/perlretut.html
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: 28 May 2004 15:48:19 GMT
From: roberson@ibd.nrc-cnrc.gc.ca (Walter Roberson)
Subject: Re: Extracting a data from a string
Message-Id: <c97n03$251$1@canopus.cc.umanitoba.ca>
In article <85neb0lh7lm39tkeeg2vg3v62q758e0ss6@4ax.com>,
Dan <no_spam@hotmail.com> wrote:
:Having a string like
:<img src="http://mywebsite_address/mypath/-picture.gif"></a><br>
:How can I extract "-picture.gif" from this string ?
:The name will, for example, always begin by "-"
:It will be for example -pic1gif, or -pic8.gif, etc.
And will it *always* be on one line? No possibility of it having
been split by printable-quoted into something such as
<img src="http://mywebsite_address/mypath/-pict=
ure.gif"></a><br>
??
And is it certain that there will be the closing double-quote? The
HTML spec does not strictly require that all strings be double-quoted,
only strings that have certain characters in them.
What are the valid characters in the name?
my ($fid) = $string =~ /(-[a-zA-Z0-9.]+)"/
But this wouldn't match names that included imbedded dashes or
underscores or characters such as & or blanks -- you have failed to
give us a specification of what *is* allowed in the filenames.
--
"Infinity is like a stuffed walrus I can hold in the palm of my hand.
Don't do anything with infinity you wouldn't do with a stuffed walrus."
-- Dr. Fletcher, Va. Polytechnic Inst. and St. Univ.
------------------------------
Date: Fri, 28 May 2004 19:57:51 +0400
From: Dan <no_spam@hotmail.com>
Subject: Re: Extracting a data from a string
Message-Id: <16oeb0lctv6padfo7irol0e7fqun33kegi@4ax.com>
On 28 May 2004 15:48:19 GMT, roberson@ibd.nrc-cnrc.gc.ca (Walter
Roberson) wrote:
>In article <85neb0lh7lm39tkeeg2vg3v62q758e0ss6@4ax.com>,
>Dan <no_spam@hotmail.com> wrote:
>:Having a string like
>
>:<img src="http://mywebsite_address/mypath/-picture.gif"></a><br>
>
>:How can I extract "-picture.gif" from this string ?
>
>
>:The name will, for example, always begin by "-"
>:It will be for example -pic1gif, or -pic8.gif, etc.
>
>And will it *always* be on one line? No possibility of it having
>been split by printable-quoted into something such as
>
><img src="http://mywebsite_address/mypath/-pict=
>ure.gif"></a><br>
No, always one line as described above, with the double-quotes
Better even, all before the sign "-" will be always the same. The only
variable is the name of the gif file itself.
The pics will *always* be nammed -picturexxxxx.gif
where xxxx are digits, and only.
Dan
------------------------------
Date: Fri, 28 May 2004 10:07:49 -0700
From: Jim Gibson <jgibson@mail.arc.nasa.gov>
Subject: Re: Extracting a data from a string
Message-Id: <280520041007497469%jgibson@mail.arc.nasa.gov>
In article <16oeb0lctv6padfo7irol0e7fqun33kegi@4ax.com>, Dan
<no_spam@hotmail.com> wrote:
> On 28 May 2004 15:48:19 GMT, roberson@ibd.nrc-cnrc.gc.ca (Walter
> Roberson) wrote:
>
> >In article <85neb0lh7lm39tkeeg2vg3v62q758e0ss6@4ax.com>,
> >Dan <no_spam@hotmail.com> wrote:
> >:Having a string like
> >
> >:<img src="http://mywebsite_address/mypath/-picture.gif"></a><br>
> >
> >:How can I extract "-picture.gif" from this string ?
> >
[ questions about variations in the requirements snipped]
> No, always one line as described above, with the double-quotes
>
> Better even, all before the sign "-" will be always the same. The only
> variable is the name of the gif file itself.
>
> The pics will *always* be nammed -picturexxxxx.gif
> where xxxx are digits, and only.
>
> Dan
Well under those restrictive conditions, the regular expression
/(-picture\d+\.gif)/
will put the file name in the special variable $1, but do be sure and
test if the match succeeds before using the value in $1.
------------------------------
Date: Fri, 28 May 2004 10:20:03 -0700
From: Jim Gibson <jgibson@mail.arc.nasa.gov>
Subject: Re: Listing files sorted by creation time
Message-Id: <280520041020031497%jgibson@mail.arc.nasa.gov>
In article <40B6793D.DDFF2C95@acm.org>, John W. Krahn <krahnj@acm.org>
wrote:
> Jim Gibson wrote:
> >
> > In article <5a373b1d.0405270647.239815a0@posting.google.com>, Yash
> > <yashgt@yahoo.com> wrote:
> > >
> > > I would like to do something with every text file from a directory,
> > > with the latest created file taken first.
> > > What is the best way to do this. I am looking for something like:
> > >
> > > for my $file ( <something> glob("/mydir/*.txt") )
> > > {
> > > #my code
> > > }
> > >
> > > The glob will create an array of filenames. How do I make sure the
> > > list comes in time order , latest fist?
> >
> > On unix, you can do:
> >
> > my @files = `cd /mydir;ls -t *.txt`;
> ^^^^^^^^^
> You are changing the directory in a different process which means that
> the list of file names returned will not be available from the current
> directory and you didn't chomp the list so every file name will have a
> newline at the end.
True, the above just gives you the file names. If you want the full
path name for the files you can do instead:
my @files = `ls -t /mydir/*.txt'
>
> > for my $file ( @files ) {
> > # your code
> > }
>
>
> John
------------------------------
Date: Fri, 28 May 2004 21:48:54 +0800
From: "Y W Wong" <ywwong_hk@hotmail.com>
Subject: Re: Login to MS Exchange to send e-mail
Message-Id: <c97h9q$9cm$1@news.hgc.com.hk>
I just want to act as a simple script type MS Outlook to send text mail.
Anyone know how ?
"Petri" <Petri_member@newsguy.com> ¦b¶l¥ó news:c957mf01dkd@drn.newsguy.com
¤¤¼¶¼g...
> In article <c956nn$23eb$1@news.hgc.com.hk>, Y W Wong says...
> > Anyone know that how can I login to a MS Exchange server using
> > my corporate e-mail account to send a e-mail.
> > I use to do some automatic job and send the result to my
> > colleagues in my corporation.
> > I am using a RH9 Linux box and prefer to use Perl or shell
> > script to do that.
>
> Ask your exchange admin to start the SMTP-, and IMAP- or POP3-connectors
on the
> Exchange Server.
> Then use the usual mail-modules available from CPAN.
>
> If the connectors aren't already active, that is.
> Have you checked if they are?
>
>
> Petri
>
------------------------------
Date: 28 May 2004 14:22:26 GMT
From: Grant Edwards <grante@visi.com>
Subject: Re: Login to MS Exchange to send e-mail
Message-Id: <slrncbeip2.fsp.grante@grante.rivatek.com>
On 2004-05-28, Y W Wong <ywwong_hk@hotmail.com> wrote:
>>> Anyone know that how can I login to a MS Exchange server using
>>> my corporate e-mail account to send a e-mail. I use to do some
>>> automatic job and send the result to my colleagues in my
>>> corporation. I am using a RH9 Linux box and prefer to use Perl
>>> or shell script to do that.
>>
>> Ask your exchange admin to start the SMTP-, and IMAP- or
>> POP3-connectors on the Exchange Server. Then use the usual
>> mail-modules available from CPAN.
>
> I just want to act as a simple script type MS Outlook to send
> text mail. Anyone know how ?
Yes. You've just been told how. What part of the answer
didn't you understand?
--
Grant Edwards grante Yow! Hey, waiter! I want
at a NEW SHIRT and a PONY TAIL
visi.com with lemon sauce!
------------------------------
Date: Fri, 28 May 2004 16:38:11 GMT
From: "Bill Segraves" <segraves_f13@mindspring.com>
Subject: Re: MyPAN?
Message-Id: <TVJtc.2786$Yd3.787@newsread3.news.atl.earthlink.net>
"Vetle Roeim" <vetro@online.no> wrote in message
news:opr8pdzqvo3hk3cf@quickfix.opera.com...
> Hi folks. CPAN is really great. It is in fact so great, that we'd
really
> like to set up our own CPAN-ish server where I work, to make it easier
to
> distribute and install our own modules.
Randal L. Schwartz' articles at www.stonehenge.com may be helpful to you.
http://www.stonehenge.com/merlyn/LinuxMag/col42.html
http://www.stonehenge.com/merlyn/LinuxMag/col43.html
Randal's articles would fall into the "If You Like" category of this
newsgroup's posting guidelines. IMO, you'll save yourself a lot of time "If
You Like" this important resource.
Many thanks, Randal.
--
Bill Segraves
------------------------------
Date: 28 May 2004 13:29:40 GMT
From: DAVISM@er6.eng.ohio-state.edu (Michael T. Davis)
Subject: Re: Obtaining matched (sub)string
Message-Id: <c97es4$of5$1@charm.magnus.acs.ohio-state.edu>
In article <2hncfsFdhbnmU1@uni-berlin.de>, Gunnar Hjalmarsson
<noreply@gunnar.cc> writes:
>Michael T. Davis wrote:
>> When using m//, is it possible to obtain the (sub)string of the
>> target which actually matched the regex? For example, if the
>> target is "Get your viagra here" and the regex is
>> "(cialis|viagra|xanax)", is there a way to indicate that the match
>> was "viagra"?
>
>Err.. Yes. By examining the content of $1.
>
> http://www.perldoc.com/perl5.8.4/pod/perlretut.html
I must have tried that before when there was another error in
my code. It's working fine now.
>
>(Are there any spam crap any longer that spells out "viagra" in
>cleartext?)
Yeah, I still see all sorts of obvious "SPAM words" sent in the
clear.
>
>--
>Gunnar Hjalmarsson
>Email: http://www.gunnar.cc/cgi-bin/contact.pl
>
Thanks,
Mike
--
Michael T. Davis | Systems Specialist: ChE,MSE
E-mail: davism@er6.eng.ohio-state.edu | Departmental Networking/Computing
-or- DAVISM+@osu.edu | The Ohio State University
http://www.er6.eng.ohio-state.edu/~davism/ | 197 Watts, (614) 292-6928
------------------------------
Date: Fri, 28 May 2004 07:48:17 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: Obtaining matched (sub)string
Message-Id: <slrncbed8h.gld.tadmc@magna.augustmail.com>
Gunnar Hjalmarsson <noreply@gunnar.cc> wrote:
> (Are there any spam crap any longer that spells out "viagra" in
> cleartext?)
He may be working on "normalized" words, so his code _may_ be useful.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
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.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
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 6621
***************************************
