[30160] in Perl-Users-Digest
Perl-Users Digest, Issue: 1403 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Mar 29 11:09:42 2008
Date: Sat, 29 Mar 2008 08:09:07 -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 Sat, 29 Mar 2008 Volume: 11 Number: 1403
Today's topics:
Re: BEGIN, INIT etc... <bart.lateur@pandora.be>
Re: BEGIN, INIT etc... <joost@zeekat.nl>
Re: child process dying if syswrite fails? <elwood@agouros.de>
Re: empty variables - getting rid of "uninitialized val <nospam@somewhere.com>
Re: empty variables - getting rid of "uninitialized val <noreply@gunnar.cc>
Re: FAQ 8.1 How do I find out which operating system I' <jm@nospam.fr>
Memory issues <jm@nospam.fr>
Re: Memory issues <joost@zeekat.nl>
Re: Memory issues <smallpond@juno.com>
Re: Memory issues <jm@nospam.fr>
Re: Memory issues <jm@nospam.fr>
Re: Memory issues <smallpond@juno.com>
new CPAN modules on Sat Mar 29 2008 (Randal Schwartz)
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 29 Mar 2008 14:23:02 +0100
From: Bart Lateur <bart.lateur@pandora.be>
Subject: Re: BEGIN, INIT etc...
Message-Id: <okgsu3tlkqhr7n9ha0tf0d0m0k01n9lf4b@4ax.com>
Joost Diepenmaat wrote:
>END blocks are useful to "guarantee" that code gets run when the program
>ends, even if for example an exception is thrown. Useful for system
>resources that may not get freed properly otherwise.
Unfortunately they're still not called on exit and on exec.
--
Bart.
------------------------------
Date: Sat, 29 Mar 2008 14:29:40 +0100
From: Joost Diepenmaat <joost@zeekat.nl>
Subject: Re: BEGIN, INIT etc...
Message-Id: <87d4pd4q0r.fsf@zeekat.nl>
Bart Lateur <bart.lateur@pandora.be> writes:
> Joost Diepenmaat wrote:
>
>>END blocks are useful to "guarantee" that code gets run when the program
>>ends, even if for example an exception is thrown. Useful for system
>>resources that may not get freed properly otherwise.
>
> Unfortunately they're still not called on exit and on exec.
They are called on exit(), just not on POSIX::_exit
$ perl -w -Mstrict -e'END{ print "END"}; exit'
END
Cheers,
Joost.
--
Joost Diepenmaat | blog: http://joost.zeekat.nl/ | work: http://zeekat.nl/
------------------------------
Date: Sat, 29 Mar 2008 08:56:51 +0000 (UTC)
From: Konstantinos Agouros <elwood@agouros.de>
Subject: Re: child process dying if syswrite fails?
Message-Id: <1206781011.474276@rumba>
In <g2hvb5-mr3.ln1@osiris.mauzo.dyndns.org> Ben Morrow <ben@morrow.me.uk> writes:
>Quoth Konstantinos Agouros <elwood@agouros.de>:
>>
>> I encountered a strange problem. I have an application that has a few
>> sockets open. To notify the other side that I am 'finished' I do a
>> shutdown on the socket. Because I am lazy I do a syswrite on the socket
>> after the shutdown which of course fails. However I found that the whole
>> childprocess doing this dies if I do the syswrite. This used not to happen.
>> The whole thing is on Gentoo Linux using perl 5.8.8.
>If you write to a socket (or pipe) which is closed, your process will be
>sent SIGPIPE. The default action for SIGPIPE is to terminate the
>process: this is useful in pipelines when the reading process exits
>early. You can ignore this signal, in which case the write will fail
>with EPIPE instead.
Indeed I did not ignore this signal. Strange that the same code used to
work before but thanks for the explanation.
Konstantin
>Ben
--
Dipl-Inf. Konstantin Agouros aka Elwood Blues. Internet: elwood@agouros.de
Otkerstr. 28, 81547 Muenchen, Germany. Tel +49 89 69370185
----------------------------------------------------------------------------
"Captain, this ship will not survive the forming of the cosmos." B'Elana Torres
------------------------------
Date: Sat, 29 Mar 2008 03:29:08 -0400
From: "Thrill5" <nospam@somewhere.com>
Subject: Re: empty variables - getting rid of "uninitialized value" warnings?
Message-Id: <ivCdnRrwO9tYcnDanZ2dnUVZ_vGinZ2d@comcast.com>
"Tomasz Chmielewski" <tch@nospam.syneticon.net> wrote in message
news:fsie2l$g0f$1@online.de...
>I have perl code which should do some action only if:
>
> - the variable does not begin with "#" (commented out),
> - the variable is not empty
>
>
>
> use strict;
> use warnings;
>
> my @array = ("# Comment", "/usr/bin/binary --test", "");
>
> foreach my $var (@array) {
>
> my @execargs = split(/#/, $var);
>
> if ( $execargs[0] ne '' ) { print "$var 0: |$execargs[0]|\n" }
>
> }
>
>
> Unfortunately, it shows uninitialized value warnings for the empty
> variable (""):
>
> $ perl test.pl
> /usr/bin/binary --test 0: |/usr/bin/binary --test|
> Use of uninitialized value $execargs[0] in string ne at test.pl line 14.
>
>
>
> Using:
>
> if ( defined $execargs[0] ) { print "$var 0: |$execargs[0]|\n" }
>
> is not a solution either, because $execargs[0] will be defined for a case
> with "# Comment" and an undesired action will be made for this element:
>
>
> $ perl test.pl
> # Comment 0: ||
> /usr/bin/binary --test 0: |/usr/bin/binary --test|
>
>
>
> How can I get rid of warnings if I make tests with "if" and some variables
> are empty?
>
> Should I just ignore it? Or use "no warnings" just for that piece of code
> throwing a warning?
>
>
>
> --
> Tomasz Chmielewski
> http://wpkg.org
Try:
use strict;
use warnings;
no warnings 'uninitialized';
This will turn off only the uninitialized variable warnings, and keep all
the other warnings. I find those warnings are more trouble to get rid of
then the value that the warning provides.
------------------------------
Date: Sat, 29 Mar 2008 13:35:40 +0100
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: empty variables - getting rid of "uninitialized value" warnings?
Message-Id: <656rgrF2e915cU1@mid.individual.net>
Thrill5 wrote:
> "Tomasz Chmielewski" <tch@nospam.syneticon.net> wrote in message
> news:fsie2l$g0f$1@online.de...
>> How can I get rid of warnings if I make tests with "if" and some variables
>> are empty?
>>
>> Should I just ignore it? Or use "no warnings" just for that piece of code
>> throwing a warning?
>
> Try:
> use strict;
> use warnings;
> no warnings 'uninitialized';
>
> This will turn off only the uninitialized variable warnings, and keep all
> the other warnings. I find those warnings are more trouble to get rid of
> then the value that the warning provides.
Even if that may be true in some cases, it's not true in this case IMO.
If you write code that does not generate such warnings, you increase the
chance that there are no bugs. The OP has already received a few
suggestions.
Also, if you want to disable 'uninitialized' warnings, you'd better do
so in the block(s) where it's needed, and not disable them for the whole
program.
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: Sat, 29 Mar 2008 13:41:01 +0100
From: jm <jm@nospam.fr>
Subject: Re: FAQ 8.1 How do I find out which operating system I'm running under?
Message-Id: <47ee38de$0$21145$7a628cd7@news.club-internet.fr>
> 8.1: How do I find out which operating system I'm running under?
>
> The $^O variable ($OSNAME if you use English) contains an indication of
> the name of the operating system (not its release number) that your perl
> binary was built for.
Is cygwin an operating system (according to perlport)?
And how can I know what kind of perl I'm running under?
strawberryperl?
activeperl?
cygwinperl?
------------------------------
Date: Sat, 29 Mar 2008 13:45:58 +0100
From: jm <jm@nospam.fr>
Subject: Memory issues
Message-Id: <47ee3a06$0$21142$7a628cd7@news.club-internet.fr>
Based on the fact that perl contains many memory leaks,
A universal way to measure how many memory is malloced is required.
Is there standard way to measure how many memory a process has
allacated, which run with cygwin perl, active perl, and strawberry perl?
This should help to localize which code makes memory leaks.
------------------------------
Date: Sat, 29 Mar 2008 14:15:20 +0100
From: Joost Diepenmaat <joost@zeekat.nl>
Subject: Re: Memory issues
Message-Id: <87hcep4qon.fsf@zeekat.nl>
jm <jm@nospam.fr> writes:
> Based on the fact that perl contains many memory leaks,
It doesn't.
> A universal way to measure how many memory is malloced is required.
I don't understand what that means.
> Is there standard way to measure how many memory a process has
> allacated, which run with cygwin perl, active perl, and strawberry perl?
That's not nearly universal. See Win32::Process::Info
> This should help to localize which code makes memory leaks.
It hardly would.
--
Joost Diepenmaat | blog: http://joost.zeekat.nl/ | work: http://zeekat.nl/
------------------------------
Date: Sat, 29 Mar 2008 06:25:26 -0700 (PDT)
From: smallpond <smallpond@juno.com>
Subject: Re: Memory issues
Message-Id: <fd5e65d2-7545-4d1d-a309-d0811cbd4e3d@k13g2000hse.googlegroups.com>
On Mar 29, 8:45 am, jm <j...@nospam.fr> wrote:
> Based on the fact that perl contains many memory leaks,
>
> A universal way to measure how many memory is malloced is required.
>
> Is there standard way to measure how many memory a process has
> allacated, which run with cygwin perl, active perl, and strawberry perl?
>
> This should help to localize which code makes memory leaks.
perldoc perlfaq3
See:
How can I make my Perl program take less memory?
How can I free an array or hash so my program shrinks?
------------------------------
Date: Sat, 29 Mar 2008 14:55:47 +0100
From: jm <jm@nospam.fr>
Subject: Re: Memory issues
Message-Id: <47ee4a63$0$21146$7a628cd7@news.club-internet.fr>
Joost Diepenmaat a écrit :
> jm <jm@nospam.fr> writes:
>
>> Based on the fact that perl contains many memory leaks,
>
> It doesn't.
I wrote a sample of code to illustrate the issue.
The code create a 10 mega characters string. this is the only big data
in this sample.
Then, the main part of the code just modify this data; that mean that
memory usage should (in my humble opinion) stay near of 10 or 20 (or 40)
mega bytes.
The main program does not manipulate directly the string, but makes
functions aa and ab to manipulate this string. Those two functions aa
and ab just make substitutions within the string.
After creating the first string, perl use (around) 20 Mbytes. It is okay.
Calling function aa (one or several times) makes a memory leak (or
memory empreint) of 150 Mbytes.
I mean that once I called this function I do not know how to free those
150 mega bytes, but if I call this same function again I will not loose
more memory.
When I call the function ab, which is quite similar to function aa,
I have the same memory issue, but with only 50 Mbytes more.
Hereafter the result of the script, and the script.
System is debian etch, with 512 Mbytes memory.
----- Result of script: ----------------------------------
/tmp$ perl essai.pl
10000001
PID TTY STAT TIME MAJFL TRS DRS RSS %MEM COMMAND
20492 pts/1 R+ 0:00 0 1022 22977 20988 4.0 perl essai.pl
10000001
PID TTY STAT TIME MAJFL TRS DRS RSS %MEM COMMAND
20492 pts/1 S+ 0:43 0 1022 159921 158132 30.5 perl essai.pl
10000001
PID TTY STAT TIME MAJFL TRS DRS RSS %MEM COMMAND
20492 pts/1 R+ 0:57 0 1022 159921 158132 30.5 perl essai.pl
10000001
PID TTY STAT TIME MAJFL TRS DRS RSS %MEM COMMAND
20492 pts/1 R+ 4:34 0 1022 218529 216740 41.9 perl essai.pl
10000001
PID TTY STAT TIME MAJFL TRS DRS RSS %MEM COMMAND
20492 pts/1 R+ 8:10 0 1022 218529 216740 41.9 perl essai.pl
----- Script: ------------------------------------------
sub aa($)
{
my ($d) = @_;
$d =~ s/x(.....)/$1y/g ;
$d =~ s/x(.....)/$1z/g ;
$d =~ s/x(.....)/$1a/g ;
$d =~ s/x(.....)/$1b/g ;
$d =~ s/x(.....)/$1c/g ;
return $d;
}
sub ab($)
{
my ($d) = @_;
$d =~ s/a(.....)/$1y/g ;
$d =~ s/b(.....)/$1z/g ;
$d =~ s/c(.....)/$1a/g ;
$d =~ s/y(.....)/$1b/g ;
$d =~ s/z(.....)/$1c/g ;
return $d;
}
my $c= 'x' x (1000*1000*10) ;
$c .= "\x{1234}" ;
print length($c) ."\n" ;
my $v = qx( ps v $$ );
print "$v\n" ;
$c = aa($c);
print length($c) ."\n" ;
my $v = qx( ps v $$ );
print "$v\n" ;
$c = aa($c);
$c = aa($c);
$c = aa($c);
$c = aa($c);
$c = aa($c);
print length($c) ."\n" ;
my $v = qx( ps v $$ );
print $v;
$c = ab($c);
$c = ab($c);
$c = ab($c);
$c = ab($c);
$c = ab($c);
print length($c) ."\n" ;
my $v = qx( ps v $$ );
print $v;
$c = ab($c);
$c = ab($c);
$c = ab($c);
$c = ab($c);
$c = ab($c);
print length($c) ."\n" ;
my $v = qx( ps v $$ );
print $v;
------------------------------
Date: Sat, 29 Mar 2008 15:10:16 +0100
From: jm <jm@nospam.fr>
Subject: Re: Memory issues
Message-Id: <47ee4dd1$0$21146$7a628cd7@news.club-internet.fr>
smallpond a écrit :
> On Mar 29, 8:45 am, jm <j...@nospam.fr> wrote:
>> Based on the fact that perl contains many memory leaks,
>>
>> A universal way to measure how many memory is malloced is required.
>>
>> Is there standard way to measure how many memory a process has
>> allacated, which run with cygwin perl, active perl, and strawberry perl?
>>
>> This should help to localize which code makes memory leaks.
>
>
> perldoc perlfaq3
> See:
> How can I make my Perl program take less memory?
> How can I free an array or hash so my program shrinks?
It is interesting, but it does not seam to solve my substitution issue.
However I does not understand this:
« Memory allocated to lexicals (i.e. my() variables)
cannot be reclaimed or reused even if they go out of scope. It is
reserved in case the variables come back into scope. Memory allocated
to global variables can be reused (within your program) by using
undef()ing and/or delete(). »
Aren't my variables local variables?
Why aren't they freed when function terminates?
------------------------------
Date: Sat, 29 Mar 2008 07:27:14 -0700 (PDT)
From: smallpond <smallpond@juno.com>
Subject: Re: Memory issues
Message-Id: <18ab99df-e966-462d-bc51-e21dbd228598@8g2000hse.googlegroups.com>
On Mar 29, 10:10 am, jm <j...@nospam.fr> wrote:
> smallpond a =E9crit :
>
> > On Mar 29, 8:45 am, jm <j...@nospam.fr> wrote:
> >> Based on the fact that perl contains many memory leaks,
>
> >> A universal way to measure how many memory is malloced is required.
>
> >> Is there standard way to measure how many memory a process has
> >> allacated, which run with cygwin perl, active perl, and strawberry perl=
?
>
> >> This should help to localize which code makes memory leaks.
>
> > perldoc perlfaq3
> > See:
> > How can I make my Perl program take less memory?
> > How can I free an array or hash so my program shrinks?
>
> It is interesting, but it does not seam to solve my substitution issue.
>
> However I does not understand this:
>
> =AB Memory allocated to lexicals (i.e. my() variables)=
> cannot be reclaimed or reused even if they go out of scope. It is
> reserved in case the variables come back into scope. Memory allocat=
ed
> to global variables can be reused (within your program) by using
> undef()ing and/or delete(). =BB
>
> Aren't my variables local variables?
> Why aren't they freed when function terminates?
sub foo {
my $v =3D 5;
return \$v;
}
In C, once the function terminates $v is gone and a pointer
to it will fail. In perl this reference is legal and the
space will not be reclaimed.
In your sample of code above, when you pass a string to a sub,
perl will make a copy. If you pass a reference it will not.
This isn't a memory leak in perl, it's a memory leak in your
program.
------------------------------
Date: Sat, 29 Mar 2008 04:42:17 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Sat Mar 29 2008
Message-Id: <JyH6EH.BI1@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.
Apache2-AuthenNIS-0.14
http://search.cpan.org/~iteahaus/Apache2-AuthenNIS-0.14/
mod_perl2 NIS Authentication module
----
Apache2-FileManager-0.21
http://search.cpan.org/~davvid/Apache2-FileManager-0.21/
Apache2 mod_perl File Manager
----
CGI-CMS-0.31
http://search.cpan.org/~lze/CGI-CMS-0.31/
Content Managment System that runs under mod_perl and and as cgi script.
----
CGI-Session-4.29_2
http://search.cpan.org/~markstos/CGI-Session-4.29_2/
persistent session data in CGI applications
----
Crypt-CBC-2.27
http://search.cpan.org/~lds/Crypt-CBC-2.27/
Encrypt Data with Cipher Block Chaining Mode
----
Devel-Size-Report-0.12
http://search.cpan.org/~tels/Devel-Size-Report-0.12/
generate a size report for all elements in a structure
----
File-Flock-2008.01
http://search.cpan.org/~muir/File-Flock-2008.01/
file locking with flock
----
Finance-Bank-LloydsTSB-1.30
http://search.cpan.org/~aspiers/Finance-Bank-LloydsTSB-1.30/
Check your bank accounts from Perl
----
FormValidator-Simple-Plugin-Number-Phone-US-v0.0.2
http://search.cpan.org/~bcmb/FormValidator-Simple-Plugin-Number-Phone-US-v0.0.2/
United States phone number validation
----
Games-SGF-0.04
http://search.cpan.org/~whitcode/Games-SGF-0.04/
A general SGF parser
----
HTML-Merge-3.54
http://search.cpan.org/~razinf/HTML-Merge-3.54/
Embedded HTML/SQL/Perl system.
----
HTML-Widgets-NavMenu-1.0201
http://search.cpan.org/~shlomif/HTML-Widgets-NavMenu-1.0201/
A Perl Module for Generating HTML Navigation Menus
----
IPC-Concurrency-0.5
http://search.cpan.org/~bbkr/IPC-Concurrency-0.5/
Concurrency guard for processes.
----
Lingua-PT-Speaker-0.10
http://search.cpan.org/~ambs/Lingua-PT-Speaker-0.10/
perl extension text to speech of Portuguese text
----
Lyrics-Fetcher-LyrDB-0.01
http://search.cpan.org/~jbsoles/Lyrics-Fetcher-LyrDB-0.01/
The great new Lyrics::Fetcher::LyrDB!
----
MooseX-Emulate-Class-Accessor-Fast-0.00200
http://search.cpan.org/~groditi/MooseX-Emulate-Class-Accessor-Fast-0.00200/
Emulate Class::Accessor::Fast behavior using Moose attributes
----
MySpam-0.09
http://search.cpan.org/~mlawren/MySpam-0.09/
Database operations for the MySpam application
----
Nagios-Plugin-0.26
http://search.cpan.org/~tonvoon/Nagios-Plugin-0.26/
A family of perl modules to streamline writing Nagios plugins
----
Net-Sieve-0.03
http://search.cpan.org/~yvesago/Net-Sieve-0.03/
Implementation of managesieve protocol to manage sieve scripts
----
Net-Sieve-Script-0.04
http://search.cpan.org/~yvesago/Net-Sieve-Script-0.04/
parse and write sieve scripts
----
Net-UCP-0.32
http://search.cpan.org/~nemux/Net-UCP-0.32/
Perl extension for EMI - UCP Protocol.
----
Notification-Center-0.0.4
http://search.cpan.org/~rlb/Notification-Center-0.0.4/
An observer/notification for Moose
----
ODG-Record-0.26
http://search.cpan.org/~ctbrown/ODG-Record-0.26/
Perl extension for manipulating row based records.
----
POE-Component-DBIx-MyServer-0.01_06
http://search.cpan.org/~eriam/POE-Component-DBIx-MyServer-0.01_06/
A pseudo mysql POE server
----
POE-Component-WWW-Pastebin-Bot-Pastebot-Create-0.001
http://search.cpan.org/~zoffix/POE-Component-WWW-Pastebin-Bot-Pastebot-Create-0.001/
non-blocking POE wrapper around WWW::Pastebin::Bot::Pastebot::Create
----
Rinchi-Fortran-Preprocessor-0.01
http://search.cpan.org/~bmames/Rinchi-Fortran-Preprocessor-0.01/
An Fortran to XML preprocessor extension for preprocessing Fortran files producing XML SAX parser events for the tokens scanned.
----
SQL-DB-0.13
http://search.cpan.org/~mlawren/SQL-DB-0.13/
Perl interface to SQL Databases
----
String-Splitter-0.4
http://search.cpan.org/~bbkr/String-Splitter-0.4/
Find all possible string splits and unique substrings.
----
SyslogScan-Daemon-SpamDetector-0.56
http://search.cpan.org/~muir/SyslogScan-Daemon-SpamDetector-0.56/
Notice spammers in the log files
----
Text-Printf-1.01
http://search.cpan.org/~roode/Text-Printf-1.01/
A simple, lightweight text fill-in class.
----
Time-Format-1.06
http://search.cpan.org/~roode/Time-Format-1.06/
Easy-to-use date/time formatting.
----
Tk-ColourChooser-1.52
http://search.cpan.org/~tinita/Tk-ColourChooser-1.52/
Perl/Tk module providing a Colour selection dialogue box.
----
VMPS-Server-0.02
http://search.cpan.org/~kbrint/VMPS-Server-0.02/
VLAN Membership Policy Server
----
VMPS-Server-0.03
http://search.cpan.org/~kbrint/VMPS-Server-0.03/
VLAN Membership Policy Server
----
WWW-OpenResty-0.03
http://search.cpan.org/~agent/WWW-OpenResty-0.03/
Client-side library for OpenResty servers
----
WWW-OpenResty-0.04
http://search.cpan.org/~agent/WWW-OpenResty-0.04/
Client-side library for OpenResty servers
----
Wurst-0.51
http://search.cpan.org/~wurst/Wurst-0.51/
Perl extension for playing with alignment methods
----
Yahoo-Marketing-4.04
http://search.cpan.org/~shenj/Yahoo-Marketing-4.04/
an interface for Yahoo! Search Marketing's Web Services.
----
bitflags-0.01
http://search.cpan.org/~schoejo/bitflags-0.01/
Simplify export of bitflag names
----
bitflags-ct-0.01
http://search.cpan.org/~schoejo/bitflags-ct-0.01/
= bitflags + grouping
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: 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 1403
***************************************
