[30013] in Perl-Users-Digest
Perl-Users Digest, Issue: 1256 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Feb 5 03:09:47 2008
Date: Tue, 5 Feb 2008 00:09:08 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Tue, 5 Feb 2008 Volume: 11 Number: 1256
Today's topics:
Re: circular buffering using substr() ? <stoupa@practisoft.cz>
Re: circular buffering using substr() ? <uri@stemsystems.com>
Easy work from your home : <nan620@gmail.com>
hash in perl <invalid@invalid.net>
Re: hash in perl <jimsgibson@gmail.com>
Re: hash in perl <ben@morrow.me.uk>
new CPAN modules on Tue Feb 5 2008 (Randal Schwartz)
subroutine's name <newtan@gmail.com>
Re: subroutine's name <ben@morrow.me.uk>
Re: Trying to properly use WWW::Mechanize <m@rtij.nl.invlalid>
Re: Trying to properly use WWW::Mechanize <ben@morrow.me.uk>
using bare perl to run Unix passwd <cracraft@cox.net>
Re: using bare perl to run Unix passwd <too.much.spam@psychogenic.com>
Re: using bare perl to run Unix passwd <cracraft@cox.net>
Re: using bare perl to run Unix passwd <someone@example.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 5 Feb 2008 03:50:14 +0100
From: "Petr Vileta" <stoupa@practisoft.cz>
Subject: Re: circular buffering using substr() ?
Message-Id: <fo8ivq$bu3$2@ns.felk.cvut.cz>
Uri Guttman wrote:
>>>>>> "PV" == Petr Vileta <stoupa@practisoft.cz> writes:
>
> no, i know what you mean. please don't tell me about how to do
> buffering. the array is MORE complex and slower than a single string
> buffer. period. as i said you need all the string buffer logic and
> also the array buffer logic.
>
Yes, arrays can be a problem in time critical applications.
> you don't understand non-blocking stream I/O. it is not line oriented
> and you can just push/pop single bits of i/o at will. you have to
> maintain your buffers with finer granularity than lines.
>
I understand what is a non-blocking stream I/O but I never work with bit
stream but with byte streams only. In other word I never read bits from single
wire but always bytes from PIO or SIO chips, FIFO buffer or 8 bits port on
measuring card in asynchronous mode.
In these cases an end-of-data was be defined as 0x00 or 0x0d or any other byte
and I can accumulate bytes to string buffer until I haven't got end-of-data
byte. At this moment I pushed string buffer into array and empty this string
for next receiving.
--
Petr Vileta, Czech republic
(My server rejects all messages from Yahoo and Hotmail. Send me your
mail from another non-spammer site please.)
Please reply to <petr AT practisoft DOT cz>
------------------------------
Date: Tue, 05 Feb 2008 04:01:43 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: circular buffering using substr() ?
Message-Id: <x7y7a02gri.fsf@mail.sysarch.com>
>>>>> "PV" == Petr Vileta <stoupa@practisoft.cz> writes:
PV> Uri Guttman wrote:
>>>>>>> "PV" == Petr Vileta <stoupa@practisoft.cz> writes:
>>
>> no, i know what you mean. please don't tell me about how to do
>> buffering. the array is MORE complex and slower than a single string
>> buffer. period. as i said you need all the string buffer logic and
>> also the array buffer logic.
>>
PV> Yes, arrays can be a problem in time critical applications.
>> you don't understand non-blocking stream I/O. it is not line oriented
>> and you can just push/pop single bits of i/o at will. you have to
>> maintain your buffers with finer granularity than lines.
>>
PV> I understand what is a non-blocking stream I/O but I never work with
PV> bit stream but with byte streams only. In other word I never read bits
PV> from single wire but always bytes from PIO or SIO chips, FIFO buffer
PV> or 8 bits port on measuring card in asynchronous mode.
PV> In these cases an end-of-data was be defined as 0x00 or 0x0d or any
PV> other byte and I can accumulate bytes to string buffer until I haven't
PV> got end-of-data byte. At this moment I pushed string buffer into array
PV> and empty this string for next receiving.
in the tcp world there are nb bits, only bytes. async on a serial line
is not the same as async (non-blocking) on a socket. don't confuse them.
and you don't need end of data chars in a protocol. length and data work
find and many protocols do that or use fixed sized records.
you haven't seen to grasped why arrays are poor for this. they offer no
benefits other than record boundaries which may not be needed. a single
string used as a rotating buffer works very well and is trivial
code. here is a simple example from Stem::AsyncIO (some code is trimmed
from this):
this sub is called when the socket in its object is writeable (there is
room in the socket output buffer). note that it shuts down the write
event if there is no more data to write
sub writeable {
my( $self ) = @_ ;
return if $self->{'shut_down'} ;
my $buf_ref = \$self->{'write_buf'} ;
my $buf_len = length $$buf_ref ;
unless ( $buf_len ) {
$self->{'write_event'}->stop() ;
return ;
}
my $bytes_written = syswrite( $self->{'write_fh'}, $$buf_ref ) ;
unless( defined( $bytes_written ) ) {
return ;
}
# remove the part of the buffer that was written
substr( $$buf_ref, 0, $bytes_written, '' ) ;
return if length( $$buf_ref ) ;
$self->write_shut_down() if $self->{'shut_down_when_empty'} ;
}
that is a rotating string buffer (or a ring buffer) with one call to
syswrite and one call to substr. the rest is error or condition
checking.
simple.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.sysarch.com --
----- Perl Architecture, Development, Training, Support, Code Review ------
----------- Search or Offer Perl Jobs ----- http://jobs.perl.org ---------
--------- Gourmet Hot Cocoa Mix ---- http://bestfriendscocoa.com ---------
------------------------------
Date: Mon, 4 Feb 2008 23:23:46 -0800 (PST)
From: kayal <nan620@gmail.com>
Subject: Easy work from your home :
Message-Id: <0240338d-5864-44c5-a4e6-4e553d755bed@s12g2000prg.googlegroups.com>
Easy work from your home :
you earn #200 per day, work is no hard work, it is simple
see and get information
~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~
http://www.freewebs.com/business-xx
~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~
you want any loan
see and get loans
~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`
http://padmagirl.blogspot.com
~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~
------------------------------
Date: Mon, 4 Feb 2008 18:31:07 -0700
From: "Gerry Ford" <invalid@invalid.net>
Subject: hash in perl
Message-Id: <1202175147_1957@sp12lax.superfeed.net>
#!/usr/bin/env ruby
require 'rubygems'
require 'fruit_processor'
#if __FILE__ == $0
!end excerpt
I never thought of the collision between the shebang line and C-style
preprocessing. How would this look in perl? The require's look like
C-style #includes.
--
Gerry Ford
"The apple was really a peach."
-- Allison Dunn on the garden of eden
------------------------------
Date: Mon, 04 Feb 2008 18:11:31 -0800
From: Jim Gibson <jimsgibson@gmail.com>
Subject: Re: hash in perl
Message-Id: <040220081811310711%jimsgibson@gmail.com>
In article <1202175147_1957@sp12lax.superfeed.net>, Gerry Ford
<invalid@invalid.net> wrote:
> #!/usr/bin/env ruby
>
> require 'rubygems'
> require 'fruit_processor'
>
> #if __FILE__ == $0
>
> !end excerpt
>
> I never thought of the collision between the shebang line and C-style
> preprocessing. How would this look in perl? The require's look like
> C-style #includes.
There are three "include" functions in Perl: do, require, and use. See:
perldoc -f do
perldoc -f require
perldoc -f use
--
Jim Gibson
Posted Via Usenet.com Premium Usenet Newsgroup Services
----------------------------------------------------------
** SPEED ** RETENTION ** COMPLETION ** ANONYMITY **
----------------------------------------------------------
http://www.usenet.com
------------------------------
Date: Tue, 5 Feb 2008 03:25:39 +0000
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: hash in perl
Message-Id: <ji1l75-aeq.ln1@osiris.mauzo.dyndns.org>
Quoth "Gerry Ford" <invalid@invalid.net>:
> #!/usr/bin/env ruby
>
> require 'rubygems'
> require 'fruit_processor'
>
> #if __FILE__ == $0
>
> !end excerpt
>
> I never thought of the collision between the shebang line and C-style
> preprocessing. How would this look in perl? The require's look like
> C-style #includes.
I'm not really familiar with Ruby, so I'm not entirely sure what this is
supposed to do; but I would have thought something like
#!/usr/bin/perl
if (__FILE__ eq $0) {
...
}
__END__
would be equivalent. Of course, you don't get the (presumably)
compile-time effect of #if, so perhaps something like
__FILE__ eq $0 and eval q{
...
};
is closer. Note that the usual idiom in Perl for 'am I the top-level
program rather than a used/required module' is
unless (caller) { ... }
since caller returns undef if and only if this is the top-level program.
Ben
------------------------------
Date: Tue, 5 Feb 2008 05:42:18 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Tue Feb 5 2008
Message-Id: <Jvr3uI.22nL@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.
AI-Calibrate-1.0
http://search.cpan.org/~tomfa/AI-Calibrate-1.0/
Perl module for producing probabilities from classifier scores
----
Bundle-Theory-1.01
http://search.cpan.org/~dwheeler/Bundle-Theory-1.01/
A bundle to install all Theory's favorite modules
----
Bundle-Theory-1.02
http://search.cpan.org/~dwheeler/Bundle-Theory-1.02/
A bundle to install all Theory's favorite modules
----
CPAN-1.92_56
http://search.cpan.org/~andk/CPAN-1.92_56/
query, download and build perl modules from CPAN sites
----
CPAN-Reporter-Smoker-0.03
http://search.cpan.org/~dagolden/CPAN-Reporter-Smoker-0.03/
Turnkey CPAN Testers smoking
----
CPAN-Reporter-Smoker-0.04
http://search.cpan.org/~dagolden/CPAN-Reporter-Smoker-0.04/
Turnkey CPAN Testers smoking
----
Data-Domain-0.09
http://search.cpan.org/~dami/Data-Domain-0.09/
Data description and validation
----
Data-Formatter-Html-0.01
http://search.cpan.org/~zblair/Data-Formatter-Html-0.01/
stringified perl data structures, nicely formatted for users
----
Data-Formatter-Text-0.01
http://search.cpan.org/~zblair/Data-Formatter-Text-0.01/
Perl extension for formatting data stored in scalars, hashes, and arrays into strings, definition lists, and bulletted lists, etc.
----
Games-Word-0.02
http://search.cpan.org/~doy/Games-Word-0.02/
utility functions for writing word games
----
Geo-Point-Plugin-Transform-0.0.2
http://search.cpan.org/~kokogiko/Geo-Point-Plugin-Transform-0.0.2/
Geo::Point????????????????????
----
Geo-Proj-Japan-0.0.2
http://search.cpan.org/~kokogiko/Geo-Proj-Japan-0.0.2/
Geo::Proj?????????????????????
----
HTML-Table-2.07a
http://search.cpan.org/~ajpeacock/HTML-Table-2.07a/
produces HTML tables
----
Keystone-Resolver-1.16
http://search.cpan.org/~mirk/Keystone-Resolver-1.16/
an OpenURL resolver
----
Language-MuldisD-0.19.0
http://search.cpan.org/~duncand/Language-MuldisD-0.19.0/
Formal spec of Muldis D relational DBMS lang
----
Math-Complex-1.49
http://search.cpan.org/~jhi/Math-Complex-1.49/
complex numbers and associated mathematical functions
----
Module-PluginFinder-0.03
http://search.cpan.org/~pevans/Module-PluginFinder-0.03/
automatically choose the most appropriate plugin module.
----
Net-FTP-Recursive-2.02
http://search.cpan.org/~jdlee/Net-FTP-Recursive-2.02/
Recursive FTP Client class
----
Net-LDAP-Server-Test-0.02
http://search.cpan.org/~karman/Net-LDAP-Server-Test-0.02/
test Net::LDAP code
----
Net-Whois-Raw-1.40
http://search.cpan.org/~despair/Net-Whois-Raw-1.40/
Get Whois information for domains
----
Net-eBay-0.46
http://search.cpan.org/~ichudov/Net-eBay-0.46/
Perl Interface to XML based eBay API.
----
OODoc-Template-0.13
http://search.cpan.org/~markov/OODoc-Template-0.13/
Simple template system
----
PAR-Dist-0.27
http://search.cpan.org/~smueller/PAR-Dist-0.27/
Create and manipulate PAR distributions
----
POE-Component-IRC-5.58
http://search.cpan.org/~bingos/POE-Component-IRC-5.58/
a fully event-driven IRC client module.
----
PadWalker-1.7
http://search.cpan.org/~robin/PadWalker-1.7/
play with other peoples' lexical variables
----
QtCore-4.004
http://search.cpan.org/~vadiml/QtCore-4.004/
----
QtGui-4.004
http://search.cpan.org/~vadiml/QtGui-4.004/
----
Rose-DB-Object-0.7663
http://search.cpan.org/~jsiracusa/Rose-DB-Object-0.7663/
Extensible, high performance RDBMS-OO mapper.
----
SNMP-Class-0.09
http://search.cpan.org/~aduitsis/SNMP-Class-0.09/
A convenience class around the NetSNMP perl modules.
----
Safe-Caller-0.07
http://search.cpan.org/~schubiger/Safe-Caller-0.07/
A nicer interface to the built-in caller()
----
Search-QueryParser-0.93
http://search.cpan.org/~dami/Search-QueryParser-0.93/
parses a query string into a data structure suitable for external search engines
----
Syntax-Highlight-Engine-Kate-0.04
http://search.cpan.org/~hanje/Syntax-Highlight-Engine-Kate-0.04/
a port to Perl of the syntax highlight engine of the Kate texteditor.
----
Task-BeLike-RJBS-undef
http://search.cpan.org/~rjbs/Task-BeLike-RJBS-undef/
----
Tk-GridColumns-0.07
http://search.cpan.org/~matthiasw/Tk-GridColumns-0.07/
Columns widget for Tk
----
Variable-Magic-0.10
http://search.cpan.org/~vpit/Variable-Magic-0.10/
Associate user-defined magic to variables from Perl.
----
VoiceXML-Client-1.01
http://search.cpan.org/~pdeegan/VoiceXML-Client-1.01/
Perl extension for VoiceXML (VXML) clients, including useragent, parser and interpreter.
----
Want-0.17
http://search.cpan.org/~robin/Want-0.17/
A generalisation of wantarray
----
Want-0.18
http://search.cpan.org/~robin/Want-0.18/
A generalisation of wantarray
----
WordPress-XMLRPC-1.04
http://search.cpan.org/~leocharre/WordPress-XMLRPC-1.04/
----
WordPress-XMLRPC-1.05
http://search.cpan.org/~leocharre/WordPress-XMLRPC-1.05/
----
XML-Comma-1.997
http://search.cpan.org/~brianski/XML-Comma-1.997/
A framework for structured document manipulation
----
XML-Compile-0.67
http://search.cpan.org/~markov/XML-Compile-0.67/
Compilation based XML processing
----
XML-LibXML-Simple-0.10
http://search.cpan.org/~markov/XML-LibXML-Simple-0.10/
XML::LibXML clone of XML::Simple::XMLin()
----
XML-Mini-1.38
http://search.cpan.org/~pdeegan/XML-Mini-1.38/
Perl implementation of the XML::Mini XML create/parse interface.
----
mobirc-0.05
http://search.cpan.org/~tokuhirom/mobirc-0.05/
modern IRC to HTTP gateway
----
mobirc-0.06
http://search.cpan.org/~tokuhirom/mobirc-0.06/
modern IRC to HTTP gateway
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: Mon, 4 Feb 2008 13:34:39 -0800 (PST)
From: nazrat <newtan@gmail.com>
Subject: subroutine's name
Message-Id: <e218d75e-05c1-45c1-be6e-e80d25c93f85@y5g2000hsf.googlegroups.com>
hi,
i have the following setting
*f1 = \&foo;
sub foo {
print 'i am ', (caller(0))[3] , "\n";
}
f1(); # this prints main::foo
is it possible for 'foo' to see its alias being called? (ie. f1() =>
gives main::f1) thanks.
------------------------------
Date: Mon, 4 Feb 2008 22:34:45 +0000
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: subroutine's name
Message-Id: <5hgk75-0ii.ln1@osiris.mauzo.dyndns.org>
Quoth nazrat <newtan@gmail.com>:
>
> i have the following setting
>
> *f1 = \&foo;
>
> sub foo {
> print 'i am ', (caller(0))[3] , "\n";
> }
>
> f1(); # this prints main::foo
>
> is it possible for 'foo' to see its alias being called? (ie. f1() =>
> gives main::f1) thanks.
Not usually, no. Glob aliases point to the same sub, which only has one
name. You can change that name with Sub::Name, but that will change the
name of all aliases to this sub at once.
If you *really* want to do this, you can clone the sub with
Clone::Closure (actually, I think plain Clone will work for subs that
aren't closures), assign that clone a new name, and put that in the
symbol table:
use Clone::Closure qw/clone/;
use Sub::Name qw/subname/;
*f1 = subname f1 => clone \&foo;
but it would probably be better to have foo and f1 call a subordinate
sub with a parameter:
sub _dofoo {
my $name = shift;
warn "I am $name";
}
for my $sub (qw/foo f1/) { # $sub must be lexical
no strict 'refs';
*$sub = sub { _dofoo $sub, @_ };
}
Ben
------------------------------
Date: Mon, 4 Feb 2008 20:36:31 +0100
From: Martijn Lievaart <m@rtij.nl.invlalid>
Subject: Re: Trying to properly use WWW::Mechanize
Message-Id: <pan.2008.02.04.19.36.31@rtij.nl.invlalid>
On Mon, 04 Feb 2008 18:15:44 +0100, Peter J. Holzer wrote:
> On 2008-02-04 13:57, Phil Powell <phillip.s.powell@gmail.com> wrote:
>> On Feb 1, 9:09 pm, Tad J McClellan <ta...@seesig.invalid> wrote:
>>> You should always, yes *always*, check the return value from open():
>>>
>>> open(HTML, ">$file") or die "could not open '$file' $!";
>>
>> I haven't coded in Perl in several years so I'll forget that step,
>> which isn't often done in my native language of PHP.
>
> Does PHP open throw an exception on error? If not you should get into
> the habit of explicitely checking for errors in PHP, too.
No it doesn't. It does produce warnings though.
M4
------------------------------
Date: Mon, 4 Feb 2008 19:54:36 +0000
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: Trying to properly use WWW::Mechanize
Message-Id: <s47k75-acc.ln1@osiris.mauzo.dyndns.org>
Quoth Peter Makholm <peter@makholm.net>:
> "Peter J. Holzer" <hjp-usenet2@hjp.at> writes:
>
> > (There is a perl module which causes the usual I/O functions to die() on
> > error, but I forgot its name)
>
> use Fatal qw(open close);
or use Fatal qw(:void open close); which only throws an exception if you
forgot to check yourself.
Ben
------------------------------
Date: Mon, 4 Feb 2008 19:42:38 -0800 (PST)
From: smcracraft <cracraft@cox.net>
Subject: using bare perl to run Unix passwd
Message-Id: <0779f19b-0942-41f9-ad10-1c8a7c8584ec@c4g2000hsg.googlegroups.com>
Hi,
Anyone know of a Perl program that can
run Unix passwd and set a particular password
for a particular user?
I don't want to have to edit the passwd or shadow
files and want to use the built-in-passwd.
The two caveats on this is: no Expect allowed and
also no Perl libraries other than the standard ones.
Also, this is not on Windows but on Unix.
Thanks anybody/everybody.
------------------------------
Date: 5 Feb 2008 00:12:55 -0500
From: Pat Deegan <too.much.spam@psychogenic.com>
Subject: Re: using bare perl to run Unix passwd
Message-Id: <pan.2008.02.05.05.12.55@psychogenic.com>
Greets,
On Mon, 04 Feb 2008 19:42:38 -0800, smcracraft wrote:
> Hi,
>
> Anyone know of a Perl program that can run Unix passwd and set a
> particular password for a particular user?
On my system at least, `passwd` has a --stdin option:
"This option is used to indicate that passwd should
read the new password from standard input,
which can be a pipe."
So opening a pipe to '| passwd --stdin username' should work.
HTH,
Pat D
------------------------------
Date: Mon, 4 Feb 2008 21:53:08 -0800 (PST)
From: smcracraft <cracraft@cox.net>
Subject: Re: using bare perl to run Unix passwd
Message-Id: <defd3937-db82-4568-a0b7-2aa8c2e2e8e3@v4g2000hsf.googlegroups.com>
passwd does not have a --stdin on most vendor Unixes because
it is considered a security flaw.
I should have been more specific to exclude the above "--stdin"
from the requirement.
On Feb 4, 9:12 pm, Pat Deegan <too.much.s...@psychogenic.com> wrote:
> Greets,
>
> On Mon, 04 Feb 2008 19:42:38 -0800,smcracraftwrote:
> > Hi,
>
> > Anyone know of aPerlprogram that can run Unix passwd and set a
> > particular password for a particular user?
>
> On my system at least, `passwd` has a --stdin option:
> "This option is used to indicate that passwd should
> read the new password from standard input,
> which can be a pipe."
>
> So opening a pipe to '| passwd --stdin username' should work.
>
> HTH,
> Pat D
------------------------------
Date: Tue, 05 Feb 2008 06:15:49 GMT
From: "John W. Krahn" <someone@example.com>
Subject: Re: using bare perl to run Unix passwd
Message-Id: <paTpj.12210$C61.7968@edtnps89>
smcracraft wrote:
>
> Anyone know of a Perl program that can
> run Unix passwd and set a particular password
> for a particular user?
>
> I don't want to have to edit the passwd or shadow
> files and want to use the built-in-passwd.
>
> The two caveats on this is: no Expect allowed and
> also no Perl libraries other than the standard ones.
>
> Also, this is not on Windows but on Unix.
http://groups.google.com/group/comp.lang.perl.misc/browse_thread/thread/3de7596861d102be/39fa3c167101fcae?lnk=st&q=#39fa3c167101fcae
John
--
Perl isn't a toolbox, but a small machine shop where you
can special-order certain sorts of tools at low cost and
in short order. -- Larry Wall
------------------------------
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 1256
***************************************
