[11996] in Perl-Users-Digest
Perl-Users Digest, Issue: 5596 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri May 7 14:07:23 1999
Date: Fri, 7 May 99 11:01:33 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Fri, 7 May 1999 Volume: 8 Number: 5596
Today's topics:
Re: Reg Expression (Randal L. Schwartz)
Re: Reg Expression <gellyfish@gellyfish.com>
Re: Running perl script via browser (Steve Linberg)
Re: simple way for several if ( eq ||) ? <gellyfish@gellyfish.com>
Re: simple way for several if ( eq ||) ? (Greg Bacon)
Re: simple way for several if ( eq ||) ? (Bart Lateur)
Re: simple way for several if ( eq ||) ? <emschwar@rmi.net>
Re: Slice [N..end] of unnamed array? <aqumsieh@matrox.com>
Re: Slice [N..end] of unnamed array? <uri@sysarch.com>
SMTP howto attach files <gury@wolve.com>
Re: SMTP howto attach files <design@raincloud-studios.com>
Re: strict pragma and G::Image::newFromGif(FILEHANDLE) (M.J.T. Guy)
Re: Stupid FAQ question of the (day? month? year?) <aqumsieh@matrox.com>
test <sspringett@cwe2.com>
Re: testing expressions in the IF statement (Bart Lateur)
Re: UNIX comands and switches in perl <gellyfish@gellyfish.com>
Re: UNIX comands and switches in perl (I R A Aggie)
Re: UNIX comands and switches in perl <emschwar@rmi.net>
Re: URGENT perldoc Sybase::* does nothing (Steve Linberg)
Re: Using LWP: getting the code for a website? <gellyfish@gellyfish.com>
Why my? <grichard@uci.edu>
Re: Why my? <uri@sysarch.com>
Re: Why my? <khowe@performance-net.com>
Win32::ODBC Insert Error On Access Table jeff_fritsche@my-dejanews.com
Re: Win32::ODBC Insert Error On Access Table jeff_fritsche@my-dejanews.com
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 07 May 1999 09:07:35 -0700
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: Reg Expression
Message-Id: <m1hfpozwvs.fsf@halfdome.holdit.com>
>>>>> "Larry" == Larry Rosler <lr@hpl.hp.com> writes:
Larry> Gosh, Randal must be so pleased. All three who responded put in the
Larry> conditional before using $1. :-)
I am occasionally amused at how many people erroneously mistake my
little tirades with "The man has SPOKEN! Worship the TEXT!". :)
Oh well. Off to start work on a few more canons... :)
print "Just another Perl whacker,"
--
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@teleport.com)
Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me
------------------------------
Date: 7 May 1999 17:14:25 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Reg Expression
Message-Id: <37331161@newsread3.dircon.co.uk>
Randal L. Schwartz <merlyn@stonehenge.com> wrote:
>
> Oh well. Off to start work on a few more canons... :)
>
>
Why ? who are you going to lay seige to this weekend ;-}
/J\
--
Jonathan Stowe <jns@gellyfish.com>
------------------------------
Date: Fri, 07 May 1999 12:32:30 -0400
From: linberg@literacy.upenn.edu (Steve Linberg)
Subject: Re: Running perl script via browser
Message-Id: <linberg-0705991232300001@ltl1.literacy.upenn.edu>
In article <37330866.93FB7FE2@freemail.nl>, peter <godzila@freemail.nl> wrote:
> I was wondering if someone can help me with the following:
> I have perl script test.pl, and want to run it via my web browser using
> CGI or so.
Browsers don't run CGI scripts. Servers do. Browsers just show the results.
> Can one of you tell me how to make this script web enable or provide me
> some URL were to find how to do this.
>
> The script is running on a Apache web server.
>
> test.pl
> #!/usr/contrib/bin/perl
> print "This is a test\n";
-------------------------------------
#!/usr/contrib/bin/perl -w
use strict;
use CGI;
my $q = new CGI; # not strictly necessary, in fact
print $q->header;
print $q->start_html("test");
print "This is a test";
print $q->end_hml;
-------------------------------------
Of course, you'll have to configure Apache to run your scripts, but you
should take those questions to comp.infosystems.www.servers.unix or some
such group.
--
Steve Linberg, Systems Programmer &c.
National Center on Adult Literacy, University of Pennsylvania
email: <linberg@literacy.upenn.edu>
WWW: <http://www.literacyonline.org>
------------------------------
Date: 7 May 1999 16:57:55 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: simple way for several if ( eq ||) ?
Message-Id: <37330d83@newsread3.dircon.co.uk>
sam@godzilla.wvn.wvnet.edu wrote:
> Hi All Is there a simpler way to do the following:
>
> if ($name eq "BOB" || $name eq "SAM" || $name eq "CHRIS" || $name eq "DAVE"){}
>
You could do it the other way round as it were:
#!/usr/local/bin/perl5 -w
use strict;
my $name = shift;
my @names = qw(BOB DAVE BERT JOHN);
if(grep /$name/i,@names)
{
print $name,"\n";
}
But I dont think its any more efficient.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
------------------------------
Date: 7 May 1999 16:04:08 GMT
From: gbacon@itsc.uah.edu (Greg Bacon)
Subject: Re: simple way for several if ( eq ||) ?
Message-Id: <7gv2to$aop$1@info2.uah.edu>
In article <7gv19b$d2c$1@nnrp1.deja.com>,
sam@godzilla.wvn.wvnet.edu writes:
: Hi All Is there a simpler way to do the following:
:
: if ($name eq "BOB" || $name eq "SAM" || $name eq "CHRIS" || $name eq "DAVE"){}
Use a regular expression:
if ($name =~ /^(BOB|SAM|CHRIS|DAVE)$/) {
...;
}
Greg
--
A wise man speaks because he has something to say, a fool because he has to
say something.
-- Plato
------------------------------
Date: Fri, 07 May 1999 16:54:56 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: simple way for several if ( eq ||) ?
Message-Id: <37331a85.459612@news.skynet.be>
sam@godzilla.wvn.wvnet.edu wrote:
>Hi All Is there a simpler way to do the following:
>
>if ($name eq "BOB" || $name eq "SAM" || $name eq "CHRIS" || $name eq "DAVE"){}
Hashes?
%accept = map { $_ => 1 } qw(BOB SAM CHRIS DAVE);
if($accept{$name}) { ... }
Bart.
------------------------------
Date: 07 May 1999 11:03:24 -0600
From: Eric The Read <emschwar@rmi.net>
Subject: Re: simple way for several if ( eq ||) ?
Message-Id: <xkf90b0lsmb.fsf@valdemar.col.hp.com>
gbacon@itsc.uah.edu (Greg Bacon) writes:
> Use a regular expression:
>
> if ($name =~ /^(BOB|SAM|CHRIS|DAVE)$/) {
> ...;
> }
Jonathan Stowe <gellyfish@gellyfish.com> writes:
> You could do it the other way round as it were:
>
> #!/usr/local/bin/perl5 -w
>
> use strict;
>
> my $name = shift;
> my @names = qw(BOB DAVE BERT JOHN);
>
> if(grep /$name/i,@names)
> {
> print $name,"\n";
> }
Well, I just whipped up a quickie benchmark:
#!/usr/bin/perl -w
use strict;
use Benchmark;
my $name = 'JOHN';
my $notName = 'BILBO';
my @names = qw(BOB DAVE BERT JOHN);
my $regex = join '|',@names;
timethese( 65536, {
Grep => sub { grep /$name/io, @names },
Regex => sub { $name =~ /$regex/io },
NoGrep => sub { grep /$notName/io, @names },
NoRegex => sub { $notName =~ /$regex/io },
} );
And found:
Benchmark: timing 65536 iterations of Grep, NoGrep, NoRegex, Regex...
Grep: 11 secs ( 9.71 usr 0.04 sys = 9.75 cpu)
NoGrep: 10 secs (10.00 usr 0.04 sys = 10.04 cpu)
NoRegex: 6 secs ( 6.44 usr 0.02 sys = 6.46 cpu)
Regex: 3 secs ( 3.21 usr 0.01 sys = 3.22 cpu)
The interesting case here for me was that the grep approach wasn't
terribly more expensive for the case where it didn't match, whereas the
regex was over twice as slow for the case in which it didn't match.
My question is, is this generalizable? That is, can I assume that grep
isn't ever going to take (significantly) longer to fail than to succeed,
or is it just the data I've chosen here? I doubt I can generalize much
from the regex, since relative times to succeed or fail will most likely
depend heavily on the expression in question.
-=Eric
------------------------------
Date: Fri, 7 May 1999 11:05:26 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: Slice [N..end] of unnamed array?
Message-Id: <x3ylnf0yl6y.fsf@tigre.matrox.com>
mcafee@waits.facilities.med.umich.edu (Sean McAfee) writes:
> I've never found a nice way to do this without using a temporary array.
> One of the messier ways is to use a pair of reverses:
>
> @list = reverse((reverse split ':')[0..$N-1]);
>
> Since you're using split, though, there's yet another way to do it:
>
> @list = split ':', (split ':', $_, $N)[-1];
I think I have a faster way without using any temp arrays. How about
something like:
@list = (split /:/)[$N .. tr/:/:/];
Anyone sees any problems with that?
Ala
------------------------------
Date: 07 May 1999 13:48:51 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: Slice [N..end] of unnamed array?
Message-Id: <x7u2tou5x8.fsf@home.sysarch.com>
>>>>> "AQ" == Ala Qumsieh <aqumsieh@matrox.com> writes:
AQ> mcafee@waits.facilities.med.umich.edu (Sean McAfee) writes:
>> I've never found a nice way to do this without using a temporary array.
>> One of the messier ways is to use a pair of reverses:
>>
>> @list = reverse((reverse split ':')[0..$N-1]);
>>
>> Since you're using split, though, there's yet another way to do it:
>>
>> @list = split ':', (split ':', $_, $N)[-1];
AQ> I think I have a faster way without using any temp arrays. How about
AQ> something like:
AQ> @list = (split /:/)[$N .. tr/:/:/];
that only works for a split on a single char. but otherwise it is
cute. there may be a boundary condition if the string begins/ends in :
but i haven't checked that out carefully.
and of course, if the list generation is not from a split on a single
char, you are out of luck. there still is no general way to get the last
N list elements when you don't know the size of the list.
uri
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
uri@sysarch.com --------------------------- Perl, Internet, UNIX Consulting
Have Perl, Will Travel ----------------------------- http://www.sysarch.com
The Best Search Engine on the Net ------------- http://www.northernlight.com
------------------------------
Date: Fri, 7 May 1999 12:00:13 -0500
From: "john gury" <gury@wolve.com>
Subject: SMTP howto attach files
Message-Id: <7gv66t$1rl$1@hirame.wwa.com>
Anyone know if its possible to send an attached file using
the NET::SMTP package in Win32?
------------------------------
Date: Fri, 07 May 1999 17:49:51 GMT
From: "Charles R. Thompson" <design@raincloud-studios.com>
Subject: Re: SMTP howto attach files
Message-Id: <3JFY2.87$vP2.159@news.rdc1.tn.home.com>
john gury wrote in message <7gv66t$1rl$1@hirame.wwa.com>...
>Anyone know if its possible to send an attached file using
>the NET::SMTP package in Win32?
Oh... Win32. Mmm.. I know Mail::Sender does attachments. Unsure if it's
platform independant though. You may take a look at it to see.
CT
------------------------------
Date: 7 May 1999 17:25:15 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: strict pragma and G::Image::newFromGif(FILEHANDLE)
Message-Id: <7gv7lr$60v$1@pegasus.csx.cam.ac.uk>
Bradley W. Langhorst <bwlang@nospam.genome.wi.mit.edu> wrote:
>this returns an compiler error complaining about how
>FILEHANDLE is a bare word and this is not allowed under
>use strict. Turning off use strict produces a functioning program
>but makes me unhappy :(
>
>Any suggestions for how i can tell perl that FILEHANDLE is really not
>a bare word, but a filehandle?
Write *FILEHANDLE instead of FILEHANDLE.
Mike Guy
------------------------------
Date: Fri, 7 May 1999 12:34:46 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: Stupid FAQ question of the (day? month? year?)
Message-Id: <x3yhfpoyh21.fsf@tigre.matrox.com>
sowmaster@juicepigs.com (Bob Trieger) writes:
> Just translate the FAQS into text files and then you can use any text
> reader, editor or web browser to view them. To find a specific entry
> open the file in your reader/editor/browser and do a search on the
> entry.
/me scratches his head harshly.
Aren't the FAQs already text files??
------------------------------
Date: Fri, 07 May 1999 16:09:47 GMT
From: "Steve Springett" <sspringett@cwe2.com>
Subject: test
Message-Id: <ffEY2.766$zj.97452041@dca1-nnrp1.news.digex.net>
Just testing.
------------------------------
Date: Fri, 07 May 1999 16:01:51 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: testing expressions in the IF statement
Message-Id: <373b0e12.2248299@news.skynet.be>
Larry Rosler wrote:
>> foreach $x (3, 4, 32, 43, 12345) {
>> print "$x is less than 5 and greater than 2\n" if($x =~ /^3|4/);
>> }
>
>On the other hand,
>
> foreach $x (qw( +3 0+3 )) {
> print "$x is less than 5 and greater than 2\n" if($x =~ /^3|4/);
> }
>
>String tests for numerical values are futile.
What other hand? ;-)
Also, this is a nice one:
foreach $x ("2.5") {
print "$x is less than 5 and greater than 2\n" if($x =~ /^3|4/);
}
which doesn't print.
Bart.
------------------------------
Date: 7 May 1999 17:06:27 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: UNIX comands and switches in perl
Message-Id: <37330f83@newsread3.dircon.co.uk>
Jerry Raynor @yahoo.com> <jerryr001<NO-SPAM> wrote:
> I'm not familiar with doing that. I have no problem figuring it out for
> myself but where can I get perlop manpages? (sorry if this sounds stuppid
> but I haven't had to search for detailed info until now). Thanks for your
> help!
>
The documentation for Perl is on your computer or rather should be.
try:
man perlop
or
perldoc perlop
or if all else fails go to:
<http://language.perl.com/CPAN/doc/manual/html/pod/index.html>
and look at the various and excellent documents
/J\
--
Jonathan Stowe <jns@gellyfish.com>
------------------------------
Date: 7 May 1999 16:23:10 GMT
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: UNIX comands and switches in perl
Message-Id: <slrn7j6509.qq3.fl_aggie@stat.fsu.edu>
On Fri, 7 May 1999 11:51:31 -0400, Jerry Raynor <jerryr001<NO-SPAM>, in
<926092168.915.100@news.remarQ.com> wrote:
+ I'm not familiar with doing that. I have no problem figuring it out for
+ myself but where can I get perlop manpages? (sorry if this sounds stuppid
+ but I haven't had to search for detailed info until now). Thanks for your
+ help!
Well, 'man perlop' might work, as might 'perldoc perlop'.
James
------------------------------
Date: 07 May 1999 10:44:27 -0600
From: Eric The Read <emschwar@rmi.net>
Subject: Re: UNIX comands and switches in perl
Message-Id: <xkfbtfwlthw.fsf@valdemar.col.hp.com>
"Jerry Raynor" <jerryr001<NO-SPAM>@yahoo.com> writes:
> I'm not familiar with doing that. I have no problem figuring it out for
> myself but where can I get perlop manpages? (sorry if this sounds stuppid
> but I haven't had to search for detailed info until now). Thanks for your
> help!
perldoc perlop
-=Eric
------------------------------
Date: Fri, 07 May 1999 12:27:09 -0400
From: linberg@literacy.upenn.edu (Steve Linberg)
Subject: Re: URGENT perldoc Sybase::* does nothing
Message-Id: <linberg-0705991227090001@ltl1.literacy.upenn.edu>
In article <7guon0$e8$1@news.x-echo.com>, Laurent de Lasteyrie
<lasteyrie@iname.com> wrote:
> I have nothing when i use "perldoc Sybase::Sybperl". I should have a doc
> umentation
> but the only one that works is "perldoc Sybase::BCP". Does anybody got a
> ny information
> about the content of this documentation, or at least where i can find so
> me informations
> and example about Sybperl.
I would guess that the reason you don't have documentation is that the
modules you want aren't installed, or aren't installed properly.
Run, don't walk, to http://www.perl.com and dig into the CPAN archives.
--
Steve Linberg, Systems Programmer &c.
National Center on Adult Literacy, University of Pennsylvania
email: <linberg@literacy.upenn.edu>
WWW: <http://www.literacyonline.org>
------------------------------
Date: 7 May 1999 16:48:26 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Using LWP: getting the code for a website?
Message-Id: <37330b4a@newsread3.dircon.co.uk>
Joseph4829 <joseph4829@aol.com> wrote:
> Is there a faster way using sockets? Please reply by email too :).
LWP uses sockets. The overhead of the extra module layer is as nothing
compared with the network lag.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
------------------------------
Date: Fri, 7 May 1999 10:24:37 -0700
From: "Gabriel Richards" <grichard@uci.edu>
Subject: Why my?
Message-Id: <7gv7au$bs9@news.service.uci.edu>
I've noticed that many of you use the "my" function regularly when declaring
new variables. I've also seen it suggested that this is good programming
practice. I don't quite understand why. Why and under what circumstances
should I use "my" when declaring a new variable? According to my book using
"my" would make the variable only exist within the innermost enclosing
block. Why do I want to do this? To ensure I don't run into problems by
accidentally using the same variable name elsewhere for something different?
Gabe
------------------------------
Date: 07 May 1999 13:50:43 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: Why my?
Message-Id: <x7r9osu5u4.fsf@home.sysarch.com>
>>>>> "GR" == Gabriel Richards <grichard@uci.edu> writes:
GR> I've noticed that many of you use the "my" function regularly when
GR> declaring new variables. I've also seen it suggested that this is
GR> good programming practice. I don't quite understand why. Why and
GR> under what circumstances should I use "my" when declaring a new
GR> variable? According to my book using "my" would make the variable
GR> only exist within the innermost enclosing block. Why do I want to
GR> do this? To ensure I don't run into problems by accidentally using
GR> the same variable name elsewhere for something different?
yes.
uri
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
uri@sysarch.com --------------------------- Perl, Internet, UNIX Consulting
Have Perl, Will Travel ----------------------------- http://www.sysarch.com
The Best Search Engine on the Net ------------- http://www.northernlight.com
------------------------------
Date: Fri, 7 May 1999 14:55:27 -0300
From: "Kevin Howe" <khowe@performance-net.com>
Subject: Re: Why my?
Message-Id: <OLFY2.27764$134.325397@tor-nn1.netcom.ca>
Yes, that's exactly why. When you have a large program, it is easy to use
the same name twice (this is called a CONFLICT), and this can cause you
massive headaches, trust me.
Also, my saves memory. When you declare a variable with my, that variable is
cleared from memory when the subroutine finishes, rather than remaining and
taking up memory space you could be using elsewhere.
Regards,
KH
Gabriel Richards wrote in message <7gv7au$bs9@news.service.uci.edu>...
>I've noticed that many of you use the "my" function regularly when
declaring
>new variables. I've also seen it suggested that this is good programming
>practice. I don't quite understand why. Why and under what circumstances
>should I use "my" when declaring a new variable? According to my book using
>"my" would make the variable only exist within the innermost enclosing
>block. Why do I want to do this? To ensure I don't run into problems by
>accidentally using the same variable name elsewhere for something
different?
>
>Gabe
>
>
------------------------------
Date: Fri, 07 May 1999 16:15:53 GMT
From: jeff_fritsche@my-dejanews.com
Subject: Win32::ODBC Insert Error On Access Table
Message-Id: <7gv3jk$f99$1@nnrp1.deja.com>
I have an Access DB that has two tables: OrderHeader and LineItems.
There is a relationship defined in Access that relates the order# in the
OrderHeader table with the order# in the LineItems table. This is a one-to-n
join from OrderHeader to LineItems with referential integrity enforced.
My Perl program attempts to do an INSERT on the OrderHeader table followed by
several INSERTS (same order #) on the LineItems table. On the INSERT for the
LineItems table it get the error:
---------- Error Report: ---------- Errors for "2" on connection 1:
Connection Number: 1 Error number: -1613 Error message: "[Microsoft][ODBC
Microsoft Access Driver] You cannot add or chan ge a record because a related
record is required in table 'OrderHeader'."
The INSERT on the OrderHeader table does not generate an error message, but
after exiting the program and opening the Access table, I don't see any
records in the OrderHeader table!
Any ideas ??????
Jeff.
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Fri, 07 May 1999 16:28:24 GMT
From: jeff_fritsche@my-dejanews.com
Subject: Re: Win32::ODBC Insert Error On Access Table
Message-Id: <7gv4b2$fsa$1@nnrp1.deja.com>
Never mind! Sometimes you get so close to your own code you can't see what's
going on--sorry!
Thanks,
Jeff.
In article <7gv3jk$f99$1@nnrp1.deja.com>,
jeff_fritsche@my-dejanews.com wrote:
> I have an Access DB that has two tables: OrderHeader and LineItems.
> There is a relationship defined in Access that relates the order# in the
> OrderHeader table with the order# in the LineItems table. This is a one-to-n
> join from OrderHeader to LineItems with referential integrity enforced.
>
> My Perl program attempts to do an INSERT on the OrderHeader table followed by
> several INSERTS (same order #) on the LineItems table. On the INSERT for the
> LineItems table it get the error:
>
> ---------- Error Report: ---------- Errors for "2" on connection 1:
> Connection Number: 1 Error number: -1613 Error message: "[Microsoft][ODBC
> Microsoft Access Driver] You cannot add or chan ge a record because a related
> record is required in table 'OrderHeader'."
>
> The INSERT on the OrderHeader table does not generate an error message, but
> after exiting the program and opening the Access table, I don't see any
> records in the OrderHeader table!
>
> Any ideas ??????
> Jeff.
>
> -----------== Posted via Deja News, The Discussion Network ==----------
> http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
>
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
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 5596
**************************************
