[29726] in Perl-Users-Digest
Perl-Users Digest, Issue: 970 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Oct 24 06:09:37 2007
Date: Wed, 24 Oct 2007 03:09:04 -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 Wed, 24 Oct 2007 Volume: 11 Number: 970
Today's topics:
Re: cgi_bin and tja <zaxfuuq@invalid.net>
Re: cgi_bin <zaxfuuq@invalid.net>
Re: cgi_bin <zaxfuuq@invalid.net>
Re: control loop for contraction <joe@inwap.com>
Re: create a batch file <zaxfuuq@invalid.net>
HTML::Template <jainankur@gmail.com>
Re: HTML::Template <rkb@i.frys.com>
Re: HTML::Template <jainankur@gmail.com>
Implementation of file input operator <> himanshu.garg@gmail.com
new CPAN modules on Wed Oct 24 2007 (Randal Schwartz)
Re: polymorphic regex -- encoding issue <nospam-abuse@ilyaz.org>
Re: Reading a files's name <hara.acharya@gmail.com>
stuck in a control loop <zaxfuuq@invalid.net>
Re: stuck in a control loop <kkeller-usenet@wombat.san-francisco.ca.us>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 23 Nov 2007 22:34:06 -0800
From: "Wade Ward" <zaxfuuq@invalid.net>
Subject: Re: cgi_bin and tja
Message-Id: <qo-dnVMTDtOhVoPanZ2dnUVZ_sOrnZ2d@comcast.com>
"Uri Guttman" <uri@stemsystems.com> wrote in message
news:x7hckh40ne.fsf@mail.sysarch.com...
>>>>>> "WW" == Wade Ward <zaxfuuq@invalid.net> writes:
>
> WW> Tad's a small man in Iowa, the only resident in my clpm killfile.
>
> wrong state. and i am sure you are residing in many killfiles
> already. if i used them, you would be there. you want to learn perl but
> you keep acting like you know more about perl than you do. obviously
> then you don't need our help.
I disagree. I don't think there's anyone sharper in the room with
scientific languages than OP--I'm OP because I changed the topic. That was
also the opinion of BGSU, berlin, BYU, Minnesota, and CHI. uri, der Iowa
Type hiess mich ein es. Det stimmt nich.
Tad's a small man in every state, and I couldn't give a fetch which one.
Please killfile (familiar, plural, imperative, 2nd person) me, if you're
disposed to. I have work to do. Save the girlish plonks, and please never
talk to me.
> then you don't need our help.
Who's 'our', white man? Typ.
--
wade ward
Westates Companies
1108 W. South Jordan pkwy
435 -838-7760
President
wade@zaxfuuq.net
------------------------------
Date: Fri, 23 Nov 2007 22:24:04 -0800
From: "Wade Ward" <zaxfuuq@invalid.net>
Subject: Re: cgi_bin
Message-Id: <GKOdnSqn9dl8VYPanZ2dnUVZ_oOnnZ2d@comcast.com>
"Uri Guttman" <uri@stemsystems.com> wrote in message
news:x7lk9t40pr.fsf@mail.sysarch.com...
>>>>>> "WW" == Wade Ward <zaxfuuq@invalid.net> writes:
>
> WW> Perl is written in Perl. It uses C as
> WW> a abckend.
>
> you seem to be full of knowledge about perl that is very wrong. perl is
> 100% written in c and there is no perl code inside the perl binary
ISO C can find a printer? a server? its own ass?
> (actually there is a little perl text for wrapping -n and -p loop
> bodies).
>
> please stop making statements like this. you have made a bunch already
> as you keep trying to map perl to your fortran mind.
So, is the pattern-matching of the PPL C or Perl, Mr. Penry? Bear me your
regex testimony in C; I wanna hear that.
I would hope that the spin you can put on my daily, whopping wrongness is
that I lack maturity in the syntax, but not for lack of trying, nor not
reading the camel thing, nor heeding consructive advice in c.l.p.m. .
Gruss,
--
wade ward
Westates Companies
1108 W. South Jordan pkwy
435 -838-7760
President
wade@zaxfuuq.net
------------------------------
Date: Fri, 23 Nov 2007 22:25:02 -0800
From: "Wade Ward" <zaxfuuq@invalid.net>
Subject: Re: cgi_bin
Message-Id: <H5WdnSXyu4yGVIPanZ2dnUVZ_rqlnZ2d@comcast.com>
bitte schön.
gruß,
--
wade ward
Westates Companies
1108 W. South Jordan pkwy
435 -838-7760
President
wade@zaxfuuq.net
"Petr Vileta" <stoupa@practisoft.cz> wrote in message
news:ffjkvq$1f9p$2@ns.felk.cvut.cz...
> Charlton Wilbur wrote:
>>>>>>> "GH" == Gunnar Hjalmarsson <noreply@gunnar.cc> writes:
>>
>> If that's the case, I'd love to ask some questions about roleplaying
>> games here (as rec.games.frp.moderated is nonfunctional) and knitting
>> (as I can't find a knitting-specific newsgroup). By your logic, both
>> of those should be perfectly fine, no?
>>
> If the game is written in Perl, then here is a good place I think :-)
> --
>
> Petr Vileta, Czech republic
> (My server rejects all messages from Yahoo and Hotmail. Send me your mail
> from another non-spammer site please.)
>
>
>
------------------------------
Date: Wed, 24 Oct 2007 00:28:42 -0700
From: Joe Smith <joe@inwap.com>
Subject: Re: control loop for contraction
Message-Id: <xtGdnUVtp_a2aYPanZ2dnUVZ_sKqnZ2d@comcast.com>
Wade Ward wrote:
> my $number14 = 42;
> $number14 = ++ $number14;
Don't attempt to change the value of a variable on both the left and
the right of an equal sign at the same time. Use just one of these three:
$number14 = $number14 + 1;
++$number14;
$number14++;
> # a cup is a twelfth of a quart
No, a pint is half a quart and a cup is half a pint.
A cup is one quarter of a quart.
Why in the heck is there a comment about line 16 of sugar.pl?
Why even bother with anything before "$no10=7.5"? All worthless.
I give up. It appears that you are not serious.
-Joe
------------------------------
Date: Fri, 23 Nov 2007 23:40:31 -0800
From: "Wade Ward" <zaxfuuq@invalid.net>
Subject: Re: create a batch file
Message-Id: <Y5ednQn5YpFQR4PanZ2dnUVZ_uSgnZ2d@comcast.com>
what's all that stuff? (Am minus a leg and a hand; could damage my love
life.)
--
wade ward
Westates Companies
1108 W. South Jordan pkwy
435 -838-7760
President
wade@zaxfuuq.net
"Michele Dondi" <bik.mido@tiscalinet.it> wrote in message
news:hv2sh3l2u2l3n1pcid37iub1je3pn7c2f9@4ax.com...
> On Tue, 23 Oct 2007 12:55:44 -0000, king <hara.acharya@gmail.com>
> wrote:
>
>>print fh "\@echo\n";
>>print fh "\@echo Comparing X16 reg\n";
>>print fh "check $register > test.log\n";
>>print fh "fc /l log test.log > comp.log\n";
>>print fh "find \"no differences encountered\" comp.log\n";
>>print fh "if errorlevel 1 goto fail1\n";
>>print fh "echo fine\n";
>>print fh "del test.log\n";
>
> In addition to the other gotchas mentioned by others, consider using a
> an here doc:
>
> print $fh <<"EOBATCH";
> \@echo
> \@echo Comparing X16 reg
> check $register > test.log
> fc /l log test.log > comp.log
> find "no differences encountered" comp.log
> if errorlevel 1 goto fail1
> echo fine
> del test.log
> EOBATCH
>
>
> Michele
> --
> {$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
> (($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
> .'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
> 256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
How would I achieve the same result?
gruss,
mpj
------------------------------
Date: Tue, 23 Oct 2007 21:50:31 -0700
From: Ankur <jainankur@gmail.com>
Subject: HTML::Template
Message-Id: <1193201431.798596.174290@e9g2000prf.googlegroups.com>
Hi
I am new to perl. I am using HTML::Template module to display tmpl
files on the web server. But I need to use HTML::Template::Expr module
now as well, to display the values of certain expressions in the same
script.
How can I use both HTML::Template and HTML::Template::Expr module in
the same perl and template file.
I mean I need to use both the following things in the script :
<html code>
<TMPL_VAR NAME=var1>
<TMPL_VAR EXPR="10 + 12">
</html code>
Kindly help.
Ankur Jain
http://ankurjain.org
------------------------------
Date: Wed, 24 Oct 2007 06:30:06 -0000
From: Ron Bergin <rkb@i.frys.com>
Subject: Re: HTML::Template
Message-Id: <1193207406.548535.310290@i13g2000prf.googlegroups.com>
On Oct 23, 9:50 pm, Ankur <jainan...@gmail.com> wrote:
> Hi
>
> I am new to perl. I am using HTML::Template module to display tmpl
> files on the web server. But I need to use HTML::Template::Expr module
> now as well, to display the values of certain expressions in the same
> script.
>
> How can I use both HTML::Template and HTML::Template::Expr module in
> the same perl and template file.
>
> I mean I need to use both the following things in the script :
>
> <html code>
>
> <TMPL_VAR NAME=var1>
> <TMPL_VAR EXPR="10 + 12">
Why would you need to want to do that? That type of expression would
be best done in the script instead of the template.
>
> </html code>
>
> Kindly help.
>
> Ankur Jainhttp://ankurjain.org
This is a more appropriate example usage.
#!/usr/bin/perl
use warnings;
use strict;
use HTML::Template::Expr;
print "Content-type: text/html\n\n";
my $template = HTML::Template::Expr->new(filename => 'example.tmpl');
$template->param(var1 => 'this is var1');
$template->param(banana_count => 30);
print $template->output();
==========
<html>
<head>
<title>testing</title>
</head>
<body>
<p><tmpl_var name="var1"></p>
<p><tmpl_if expr="banana_count > (10 + 12)">I have too many bannas</
tmpl_if></p>
</body>
</html>
------------------------------
Date: Wed, 24 Oct 2007 09:36:52 -0000
From: Ankur <jainankur@gmail.com>
Subject: Re: HTML::Template
Message-Id: <1193218612.174603.126850@t8g2000prg.googlegroups.com>
On Oct 24, 11:30 am, Ron Bergin <r...@i.frys.com> wrote:
> On Oct 23, 9:50 pm, Ankur <jainan...@gmail.com> wrote:
>
> > Hi
>
> > I am new to perl. I am using HTML::Template module to display tmpl
> > files on the web server. But I need to use HTML::Template::Expr module
> > now as well, to display the values of certain expressions in the same
> > script.
>
> > How can I use both HTML::Template and HTML::Template::Expr module in
> > the same perl and template file.
>
> > I mean I need to use both the following things in the script :
>
> > <html code>
>
> > <TMPL_VAR NAME=var1>
> > <TMPL_VAR EXPR="10 + 12">
>
> Why would you need to want to do that? That type of expression would
> be best done in the script instead of the template.
>
>
>
> > </html code>
>
> > Kindly help.
>
> > Ankur Jainhttp://ankurjain.org
>
> This is a more appropriate example usage.
>
> #!/usr/bin/perl
>
> use warnings;
> use strict;
> use HTML::Template::Expr;
>
> print "Content-type: text/html\n\n";
>
> my $template = HTML::Template::Expr->new(filename => 'example.tmpl');
> $template->param(var1 => 'this is var1');
> $template->param(banana_count => 30);
>
> print $template->output();
>
> ==========
>
> <html>
> <head>
> <title>testing</title>
> </head>
>
> <body>
> <p><tmpl_var name="var1"></p>
> <p><tmpl_if expr="banana_count > (10 + 12)">I have too many bannas</
> tmpl_if></p>
> </body>
> </html>
Tbanks, it solved my problem.
------------------------------
Date: Wed, 24 Oct 2007 02:39:36 -0700
From: himanshu.garg@gmail.com
Subject: Implementation of file input operator <>
Message-Id: <1193218776.912839.36010@i38g2000prf.googlegroups.com>
Hello,
Could you tell me which file in the perl source distro I should
look at for the implementation of the file input operators <>.
I suspect that one 'call' of <> is leading to two read system
calls.
Thank You,
HG
------------------------------
Date: Wed, 24 Oct 2007 04:42:16 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Wed Oct 24 2007
Message-Id: <JqEFqG.1qED@zorch.sf-bay.org>
The following modules have recently been added to or updated in the
Comprehensive Perl Archive Network (CPAN). You can install them using the
instructions in the 'perlmodinstall' page included with your Perl
distribution.
ASNMTAP-3.000015
http://search.cpan.org/~asnmtap/ASNMTAP-3.000015/
----
Acme-Tiroler-0.01
http://search.cpan.org/~marcel/Acme-Tiroler-0.01/
write code like a tyrolean says it
----
Apache2-S3-0.05
http://search.cpan.org/~iwade/Apache2-S3-0.05/
mod_perl library for proxying requests to amazon S3
----
Authen-HOTP-0.02
http://search.cpan.org/~iwade/Authen-HOTP-0.02/
An HMAC-Based One-Time Password Algorithm
----
Bot-Net-0.1.0
http://search.cpan.org/~hanenkamp/Bot-Net-0.1.0/
run your very own IRC bot net
----
CGI-Application-Server-0.04
http://search.cpan.org/~rjbs/CGI-Application-Server-0.04/
A simple HTTP server for developing with CGI::Application
----
Catalyst-Model-RDBO-0.06
http://search.cpan.org/~karman/Catalyst-Model-RDBO-0.06/
base class for Rose::DB::Object model
----
CatalystX-CRUD-Model-RDBO-0.02
http://search.cpan.org/~karman/CatalystX-CRUD-Model-RDBO-0.02/
Rose::DB::Object CRUD
----
CatalystX-CRUD-Model-RDBO-0.03
http://search.cpan.org/~karman/CatalystX-CRUD-Model-RDBO-0.03/
Rose::DB::Object CRUD
----
Clarion-1.1_2.1
http://search.cpan.org/~ukoloff/Clarion-1.1_2.1/
Perl module for reading CLARION 2.1 data files
----
Class-Accessor-Installer-0.01
http://search.cpan.org/~marcel/Class-Accessor-Installer-0.01/
install an accessor subroutine
----
Config-Model-0.614
http://search.cpan.org/~ddumont/Config-Model-0.614/
Model to create configuration validation tool
----
Config-Model-Xorg-0.504
http://search.cpan.org/~ddumont/Config-Model-Xorg-0.504/
Xorg configuration model for Config::Model
----
Froody-42.041_2
http://search.cpan.org/~fotango/Froody-42.041_2/
Yet another XML web API framework
----
Games-Hack-Patch-i686-0.3
http://search.cpan.org/~pmarek/Games-Hack-Patch-i686-0.3/
How to patch code sequences on i686
----
HTML-FormFu-0.01006
http://search.cpan.org/~cfranks/HTML-FormFu-0.01006/
HTML Form Creation, Rendering and Validation Framework
----
HTML-Tiny-0.904
http://search.cpan.org/~andya/HTML-Tiny-0.904/
Lightweight, dependency free HTML/XML generation
----
LWP-Protocol-https-SocksChain-1.5
http://search.cpan.org/~gosha/LWP-Protocol-https-SocksChain-1.5/
Speak HTTPs through Net::SC
----
LWP-Protocol-https-SocksChain10-1.4
http://search.cpan.org/~gosha/LWP-Protocol-https-SocksChain10-1.4/
Speak HTTPs through Net::SC
----
Lingua-ES-Numeros-0.02
http://search.cpan.org/~jrey/Lingua-ES-Numeros-0.02/
Translates numbers to spanish text
----
Lingua-ES-Numeros-0.03
http://search.cpan.org/~jrey/Lingua-ES-Numeros-0.03/
Translates numbers to spanish text
----
Lingua-ES-Numeros-0.04
http://search.cpan.org/~jrey/Lingua-ES-Numeros-0.04/
Translates numbers to spanish text
----
Log-Cabin-0.05
http://search.cpan.org/~jorvis/Log-Cabin-0.05/
Partial implementation of Log::Log4perl with reduced disk IO.
----
Log-Report-0.12
http://search.cpan.org/~markov/Log-Report-0.12/
report a problem, pluggable handlers and language support
----
MARC-XML-0.88_1
http://search.cpan.org/~kados/MARC-XML-0.88_1/
----
MooseX-POE-0.02
http://search.cpan.org/~perigrin/MooseX-POE-0.02/
The Illicit Love Child of Moose and POE
----
MooseX-Storage-0.09
http://search.cpan.org/~perigrin/MooseX-Storage-0.09/
An serialization framework for Moose classes
----
Parse-Yapp-KeyValue-0.01
http://search.cpan.org/~diz/Parse-Yapp-KeyValue-0.01/
parser for simple key/value pairs
----
Perlbal-1.60
http://search.cpan.org/~bradfitz/Perlbal-1.60/
Reverse-proxy load balancer and webserver
----
Search-Tools-0.15
http://search.cpan.org/~karman/Search-Tools-0.15/
tools for building search applications
----
Set-Scalar-1.22
http://search.cpan.org/~jhi/Set-Scalar-1.22/
basic set operations
----
Sort-SQL-0.03
http://search.cpan.org/~karman/Sort-SQL-0.03/
manipulate SQL sort strings
----
String-BlackWhiteList-0.01
http://search.cpan.org/~marcel/String-BlackWhiteList-0.01/
match a string against a blacklist and a whitelist
----
Tk-JPEG-Lite-2.014_05
http://search.cpan.org/~srezic/Tk-JPEG-Lite-2.014_05/
lite JPEG loader for Tk::Photo
----
Tk-TIFF-0.10_51
http://search.cpan.org/~srezic/Tk-TIFF-0.10_51/
----
Wiki-Toolkit-Store-Mediawiki-0.05
http://search.cpan.org/~dprice/Wiki-Toolkit-Store-Mediawiki-0.05/
Mediawiki (MySQL) storage backend for Wiki::Toolkit
----
Win32-IEHistory-0.02
http://search.cpan.org/~ishigaki/Win32-IEHistory-0.02/
parse Internet Explorer's history index.dat
----
lsid-perl-0.1.1.6
http://search.cpan.org/~ekawas/lsid-perl-0.1.1.6/
----
slackget10-0.10
http://search.cpan.org/~dupuisarn/slackget10-0.10/
The main slack-get 1.0 library
If you're an author of one of these modules, please submit a detailed
announcement to comp.lang.perl.announce, and we'll pass it along.
This message was generated by a Perl program described in my Linux
Magazine column, which can be found on-line (along with more than
200 other freely available past column articles) at
http://www.stonehenge.com/merlyn/LinuxMag/col82.html
print "Just another Perl hacker," # the original
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Wed, 24 Oct 2007 06:23:44 +0000 (UTC)
From: Ilya Zakharevich <nospam-abuse@ilyaz.org>
Subject: Re: polymorphic regex -- encoding issue
Message-Id: <ffmodg$sv9$1@agate.berkeley.edu>
[A complimentary Cc of this posting was sent to
Dale Gerdemann
<dale.gerdemann@googlemail.com>], who wrote in article <1192946070.082466.54940@t8g2000prg.googlegroups.com>:
> But what the "improvers" of my code also missed is that I had a second
> reason for the itermediate step. I wanted the complete CP1251 charset
> stored in a variable so that I could make several passes through it.
> As you see in the small example I made two passes. Once for '\w' and
> once for '\s'.
What makes you think that "improvers of your code" missed this? At
least, I explicitly said that your solution might be quickier.
> I'm sure there are legitimate improvements that could be made to my
> code, but it baffles me that people should see packing into a oneliner
> as something virtuous.
It was "your code packed into a oneliner". It was absolutely
different code; and if you do not like oneliners, just unpack it using
dummy variables.
What your code had was using encode/decode cycle, while your intent
was, obviously, to do only a decode. I corrected your code to match
your intent.
Hope this helps,
Ilya
------------------------------
Date: Wed, 24 Oct 2007 09:08:50 -0000
From: king <hara.acharya@gmail.com>
Subject: Re: Reading a files's name
Message-Id: <1193216930.208515.234400@i38g2000prf.googlegroups.com>
Hi Joe,
I have a similar kind of problem.
Here is my script.
======================================
#!c:\Perl\bin\perl.exe
use Strict;
use File::Copy;
#use File::find;
$dir = "1.cd.A1";
print "enter the name of the file to be copied:";
$file=<>;
chomp $file;
print "$file\n";
$filetobecopied = "//Builds/release/$dir/$file";
$newfile = "C:/dos";
print "$filetobecopied\n";
print "$newfile\n";
copy ($filetobecopied,$newfile) or print "file not found\n";
#find(\&wanted, @directories);
=========================================================================================
here that $dir will change but the $file will always be same. So I can
hardcode that $file also. But I want to detect the new $dir added and
check and copy the file from the new directory added.
How can I do this.
On Oct 9, 2:11 pm, Joe Smith <j...@inwap.com> wrote:
> lerameur wrote:
> > my @files = glob( "$year2$month2$day2*" );
>
> > I am now trying to use the substr function with no luck
>
> Why? You don't need it.
>
> my %processed;
> for (;;sleep 60) {
> foreach my $file (glob "$year2$month2$day2*") {
> next if $processed{$file};
> do { "something with the file" }'
> $processed{$file} = localtime();
> }
>
> }
>
> That will skip files that have already been seen and will process
> only the new files.
> -Joe
------------------------------
Date: Fri, 23 Nov 2007 23:59:51 -0800
From: "Wade Ward" <zaxfuuq@invalid.net>
Subject: stuck in a control loop
Message-Id: <9e6dnUdchN3JQoPanZ2dnUVZ_uOmnZ2d@comcast.com>
# $m
my $number13 = 42;
my $number14 = 42;
while ($notdone)
{
$number13 = -- $number13;
print STDOUT "begin is $number13\n";
print STDOUT "epsilon is $epsilon\n";
$upper = $upper;
;
++ $notdone;
print STDOUT "notdone is $notdone\n";
$number14 = ++ $number14;
print STDOUT "end is $number14\n";
}
Why do numbers 13 and 14 not print?
--
wade ward
Westates Companies
1108 W. South Jordan pkwy
435 -838-7760
President
wade@zaxfuuq.net
------------------------------
Date: Wed, 24 Oct 2007 00:05:54 -0700
From: Keith Keller <kkeller-usenet@wombat.san-francisco.ca.us>
Subject: Re: stuck in a control loop
Message-Id: <if73v4xt7t.ln2@goaway.wombat.san-francisco.ca.us>
On 2007-11-24, Wade Ward <zaxfuuq@invalid.net> wrote:
> # $m
> my $number13 = 42;
> my $number14 = 42;
>
>
> while ($notdone)
> {
[loop snipped]
> }
>
> Why do numbers 13 and 14 not print?
Your loop is never executed, because $notdone is never true. I hope
you'll consider no longer making sweeping statements about Perl that are
demonstrably untrue in exchange for this advice. I also hope you'll
post code that compiles under use strict; in the future.
--keith
--
kkeller-usenet@wombat.san-francisco.ca.us
(try just my userid to email me)
AOLSFAQ=http://www.therockgarden.ca/aolsfaq.txt
see X- headers for PGP signature information
------------------------------
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 V11 Issue 970
**************************************
