[15515] in Perl-Users-Digest
Perl-Users Digest, Issue: 2925 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue May 2 14:10:30 2000
Date: Tue, 2 May 2000 11:10:21 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <957291021-v9-i2925@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Tue, 2 May 2000 Volume: 9 Number: 2925
Today's topics:
mod_perl and function exporting wierdness geoff_gunner@my-deja.com
Re: newbie Q - detecting browser version <rootbeer@redcat.com>
Re: oct() function <rootbeer@redcat.com>
Re: Order of evaluation (Was: Re: regex) <iltzu@sci.invalid>
Re: Perl CGI Script Crashes on Win2K but not at Command <rootbeer@redcat.com>
Re: Perl CGI Script Crashes on Win2K but not at Command kent@darwin.eeb.uconn.edu
Re: perl in NT .BAT files Question <sturdevr@yahoo.com>
Re: Pulling my hair out! <jondunn@speakeasy.org>
RE Question <mweir@jetform.com>
Re: RE Question <godzilla@stomp.stomp.tokyo>
References and hashes <rbbdsb@earthlink.net>
Re: References and hashes <samay1NOsaSPAM@hotmail.com.invalid>
Re: References and hashes <rootbeer@redcat.com>
Re: References and hashes nobull@mail.com
Re: Reformatting a File (Variable to Fixed) mkrol@my-deja.com
Re: Reformatting a File (Variable to Fixed) <jeff@vpservices.com>
Re: resizing an image johnand@my-deja.com
Re: resizing an image johnand@my-deja.com
Re: Specifying timeout with sockets <franl-removethis@world.omitthis.std.com>
uuencode (ashanti)
What debugger do people use for Perl? (jkroger)
Where can I download HotKey.pm module ? <aureld@free.fr>
Re: Win32 Perl Program RAM Usage <Jonathan.L.Ericson@jpl.nasa.gov>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 02 May 2000 15:03:32 GMT
From: geoff_gunner@my-deja.com
Subject: mod_perl and function exporting wierdness
Message-Id: <8emqnm$5gs$1@nnrp1.deja.com>
Hope this is the right forum for this.
Got some wierdness with mod_perl and the importing of functions.
Bear with the description; it will save statements like 'you should use
strict' ;-). 'I inherited this system', he mutters darkly...
The system is around 50 perl scripts and a couple of libraries.
It runs under websql (a Sybase/web fusion), but I'm trying to port it
to Run_Perl/mod_perl/DBI.
When websql runs a script, it creates a wrapper. It sets up all the CGI
passed parameters in that wrapper, plus a database handle, plus all the
websql functions. The wrapper's package is 'main' - not nice,
considering how mod_perl works. Just to add to my misery, functions
tend to use globals rather than passed parameters, so any attempt at
packaging functions will immediately break the scripts unless months of
nit-picking is done (grrrrr).
SO - as a stop-gap, here's my strategy to enable the system to run
under run_perl (to start with):
1) from a $query object, create aliases of all cgi parameters into the
pseudo-main package (remember; mod_perl runs your script out of a new
package).
2) evaluate all global library nonsense inside that package
3) define a module of functions that are exported to that package that
reproduce the websql functionality.
So far, so good. The mod_perl-created package now has all the variables
and functions that 'main::' used to do under websql. The scripts are
successfully duped into running successfully. Dumping the package
symbol table shows that the function names are all present.
*** PROBLEM ***
On every 6th call to that script, the script barfs out on calling a
function. It's like one of the apache children has lost the library
once it's loaded (remember, even on the barfing script the symbol table
shows the function name).
Is it a coincidence that there are 6 apache children running ? The
system's set up so that there are initially only 5. The websql-
replacement is preloaded; I'm running Server: Apache/1.3.12 (Unix)
mod_perl/1.23 and perl 5.00503.
Does anyone have any idea what is going on here? And more importantly -
how to fix it!
All help gratefully appreciated!
Geoff
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Tue, 2 May 2000 08:39:59 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: newbie Q - detecting browser version
Message-Id: <Pine.GSO.4.10.10005020839110.13677-100000@user2.teleport.com>
On Tue, 2 May 2000, vjeran.com wrote:
> OK how would you detect older browser versions and according to version
> number send HTML that will work with that browser version?
Sounds as if you want to search for the docs, FAQs, and newsgroups about
programming for the web. Reading comp.infosystems.www.authoring.cgi might
be good. Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Tue, 2 May 2000 08:36:57 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: oct() function
Message-Id: <Pine.GSO.4.10.10005020836120.13677-100000@user2.teleport.com>
On Tue, 2 May 2000 c_guex@my-deja.com wrote:
> I've try:
>
> oct "0b11", but the result is always 0. Is the
> structure false ?
That's a new feature in 5.6.0 - are you using an earlier version of perl?
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 2 May 2000 13:53:44 GMT
From: Ilmari Karonen <iltzu@sci.invalid>
Subject: Re: Order of evaluation (Was: Re: regex)
Message-Id: <957274614.10343@itz.pp.sci.fi>
In article <MPG.13777d52735f579198a9c0@nntp.hpl.hp.com>, Larry Rosler wrote:
>As an example, someone today posited in Fun With Perl the equivalence of
>the following two expressions (except for the side-effect change in the
>final value of $_):
>
> $_ & $_ - 1
> $_ & --$_
I'd just like to clarify here that:
1. It was my post that Larry appears to be referring to.
2. The statements above are _not_ equivalent. The decrement in the
second statement is done before evaluating *either* side, at least
on 5.005 and 5.004 which I tested.
3. Larry's font sucks. My actual suggestion was $_ & ~ -$_, which is
_precisely_ equivalent to the original statement. (Assuming ones'
complement arithmetic, of course.)
[Followups narrowed.]
--
Ilmari Karonen - http://www.sci.fi/~iltzu/
Please ignore Godzilla and its pseudonyms - do not feed the troll.
------------------------------
Date: Tue, 2 May 2000 09:07:47 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Perl CGI Script Crashes on Win2K but not at Command
Message-Id: <Pine.GSO.4.10.10005020907230.13677-100000@user2.teleport.com>
On Tue, 2 May 2000, John wrote:
> Hi, I have a script that I wrote that will run at the command prompt but
> crash perl.exe if it's run from a browser.
When you're having trouble with a CGI program in Perl, you should first
look at the please-don't-be-offended-by-the-name Idiot's Guide to solving
such problems. It's available on CPAN.
http://www.perl.com/CPAN/
http://www.cpan.org/
http://www.cpan.org/doc/FAQs/cgi/idiots-guide.html
http://www.cpan.org/doc/manual/html/pod/
Hope this helps!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 02 May 2000 12:06:11 -0400
From: kent@darwin.eeb.uconn.edu
Subject: Re: Perl CGI Script Crashes on Win2K but not at Command
Message-Id: <ubt2pndho.fsf@darwin.eeb.uconn.edu>
perldoc -q CGI gives me
=head1 Found in /usr/lib/perl5/5.00503/pod/perlfaq9.pod
=head2 My CGI script runs from the command line but not the browser. (500 Server Error)
Read what it says and take its advice.
Kent
--
Kent E. Holsinger kent@darwin.eeb.uconn.edu
http://darwin.eeb.uconn.edu
-- Department of Ecology & Evolutionary Biology
-- University of Connecticut, U-3043
-- Storrs, CT 06269-3043
------------------------------
Date: Tue, 2 May 2000 13:34:52 -0400
From: "BobS" <sturdevr@yahoo.com>
Subject: Re: perl in NT .BAT files Question
Message-Id: <8en3js$m7f$1@bob.news.rcn.net>
Thanks for the heads up. I'll keep that in mind. Since the proprietary
C-ISAM library does file access, my thought is to let Perl control the file
handler routines already in place. Hmmm, I wonder if Perl has a C-ISAM
module ...
Cheers,
Bob
"David Ness" <DNess@Home.Com> wrote in message
news:390EEBA6.F69402F3@Home.Com...
> BobS wrote:
> >
> > Hi David,
> >
> > Thanks for the response. I appreciate your offer. I (obviously) know
little
> > about Perl. My real question is about the strength of Perl to do what I
> > need. Since then, I've found Perl can meet most any application
programming
> > requirement. Initially, I got off on the wrong direction and couldn't
get
> > past the CGI stuff avail everywhere. CGI I don't need.
> >
> > My environment is a complex 16-bit legacy application running under
NTVDM.
> > There are some 16-bit proprietary libraries needed for file access so am
> > stuck in 16-bit land. I _think_ I can write Perl scripts to replace the
> > BLAST scripts to provide high level handshaking for file queuing and FTP
> > between sites. The modem driver itself to be replaced by vanilla FTP or
> > similar. Perl scripts should provide a layer between my COBOL (did I say
> > legacy? <g>) executables and the 16-bit file libraries. I see that Perl
also
> > has a FTP module that looks promising but is beyond my present
> > understanding.
> >
> > In theory, I think I have a plan (somewhat klunky but, hey, the whole
mess
> > is already a kludge). In practice, however, I need to learn Perl which
I'm
> > working on now. I'm trying to learn enough to determine if this is
doable.
> > That's why the general questions.
> >
> > Again, I appreciate your response. If you don't mind, I'll probably have
a
> > question or two later.
> >
> > Cheers,
> > Bob
> >
>
> Best of luck with your efforts. I don't know anything about BLAST, so your
> words fall on deaf ears v-a-v that. However, if you are working in 16-bit
> land then I have only one `early warning' for you and that deals with
> file names. I found a major effort to get some of my old 16-bit code
working
> was to realize that in a 32-bit world the file `abc.dat' might well exist
> but code that tried to search for `ABC.DAT' would not find it. I thus
became a
> good friend of `tr/a-z/A-Z/' on filenames before searching them, etc...
------------------------------
Date: Tue, 2 May 2000 10:38:25 -0700
From: "Jonathan C. Dunn" <jondunn@speakeasy.org>
Subject: Re: Pulling my hair out!
Message-Id: <Pine.LNX.4.21.0005021036440.4929-100000@grace.speakeasy.org>
> It doesn't fail for me.
>
> $_ = '"murry the hump" big leaves "terris" catatonia "60ft dolls"';
> ($\, $,) = ("\n", '|');
> print /"([^"]*)"/g;
> -->
> murry the hump|terris|60ft dolls
>
> There must be some other reason for your failure.
Perhaps looking for the first element in $array[1] ? ;)
------------------------------
Date: Tue, 2 May 2000 13:12:40 -0400
From: "Michael Weir" <mweir@jetform.com>
Subject: RE Question
Message-Id: <sgu3hojg1g2100@corp.supernews.com>
I want to parse lines like this:
"Some text with comma, bad bad",33,44,55
by commas, but not by commas followed by a space.
Is there a way to do this?
------------------------------
Date: Tue, 02 May 2000 10:50:09 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: RE Question
Message-Id: <390F1551.5C10C56A@stomp.stomp.tokyo>
Michael Weir wrote:
> I want to parse lines like this:
> "Some text with comma, bad bad",33,44,55
> by commas, but not by commas followed by a space.
> Is there a way to do this?
Being an imaginative, if not schizoid programmer, my
personal method would be to do this in a way quite
different than a typical techno-geekster approach.
Replace comma/space with a special character.
Perform a split.
Replace the comma/space.
$your_data =~ s/, /©/g;
local ($var1, $var2, $var3, $var4) = split (/,/, $your_data);
Your example shows text in $var1 with a comma/space.
$var1 =~ s/©/, /g;
This is a fairly straight forth approach
with no need for a lot of fancy coding.
Godzilla!
------------------------------
Date: Tue, 02 May 2000 15:36:41 GMT
From: "rbbdsb" <rbbdsb@earthlink.net>
Subject: References and hashes
Message-Id: <dCCP4.18554$g4.497782@newsread2.prod.itd.earthlink.net>
Hi,
I'm trying to read in a file with three fields, create an array of the
distinct values in the first field, and hashes named the first field
containing the second and third fields. An example would be:
name1 field1a field2a
name1 field1b field2b
name2 field1a field2a
name2 field1b field2b
name2 filed1c field2c
...
I want an array containing
name1, name2, ...
and hashes
$name1{fiield2a} = field1a;
$name1{field2b} = field1b;
$name2{filled2a} = field1a;
...
I've been playing with a statement like
$$array[0]{$array[2]} = $array[1];
and that seems to create the hashes, but cannot seem to get an array
containing only the distinct names. Can anyone help?
TIA,
Russ
------------------------------
Date: Tue, 02 May 2000 08:53:22 -0700
From: Samay <samay1NOsaSPAM@hotmail.com.invalid>
Subject: Re: References and hashes
Message-Id: <0057f950.00e95012@usw-ex0104-031.remarq.com>
Your file:
data.txt
open DATA, "data.txt";
while(<DATA>){
@array = split;
$hash->{$array[0]}{$array[2]} = $array[1];
}
print keys %{$hash};
* Sent from RemarQ http://www.remarq.com The Internet's Discussion Network *
The fastest and easiest way to search and participate in Usenet - Free!
------------------------------
Date: Tue, 2 May 2000 09:21:08 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: References and hashes
Message-Id: <Pine.GSO.4.10.10005020920200.13677-100000@user2.teleport.com>
On Tue, 2 May 2000, Samay wrote:
> open DATA, "data.txt";
Even when your script is "just an example" (and perhaps especially in that
case!) you should _always_ check the return value after opening a file.
> print keys %{$hash};
That output could probably be formatted a little more nicely. :-)
Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 02 May 2000 17:56:48 +0100
From: nobull@mail.com
Subject: Re: References and hashes
Message-Id: <u9vh0wao1b.fsf@wcl-l.bham.ac.uk>
"rbbdsb" <rbbdsb@earthlink.net> writes:
> I'm trying to read in a file with three fields, create an array of the
> distinct values in the first field, and hashes named the first field
> containing the second and third fields.
OK sort of with you.
> An example would be:
>
> name1 field1a field2a
> name1 field1b field2b
> name2 field1a field2a
> name2 field1b field2b
> name2 filed1c field2c
> ...
>
> I want an array containing
> name1, name2, ...
> and hashes
> $name1{fiield2a} = field1a;
> $name1{field2b} = field1b;
> $name2{filled2a} = field1a;
> ...
That's not what you described.
Hmm... lets guess the example (less the random mutations) is correct
and the text is wrong.
no strict; # Evil code follows
while (<FILE>) {
my ($name,$value,$field) = split;
push @an_array, $name unless defined %$name;
$$name{$field} = $value;
}
Note: you do _not_ really want to do this - you should use a
hash-of-hashes not several hashes an symbolic refs.
use strict; # No evils live on
my %parsed_file;
while (<FILE>) {
my ($name,$value,$field) = split;
$parsed_file{$name}{$field} = $value;
}
my @an_array = keys %parsed_file;
(If you care about the order then build @an_array as in the first
example).
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
Date: Tue, 02 May 2000 14:58:01 GMT
From: mkrol@my-deja.com
Subject: Re: Reformatting a File (Variable to Fixed)
Message-Id: <8emqde$4ul$1@nnrp1.deja.com>
I've tried both methods of FTPing the file, and they are both showing
as variable length. I have received another response, that it could be
possible to reformat the data using sysread() and unpack(). Does this
sound right?
Thanks in advance
In article <Pine.GSO.4.10.10005011106350.13677-
100000@user2.teleport.com>,
Tom Phoenix <rootbeer@redcat.com> wrote:
> On Mon, 1 May 2000 mkrol@my-deja.com wrote:
>
> > Is there a way to convert a file that has variable length records
to a
> > file with fixed length records using a Perl script?
>
> Sure; it's probably a one-liner, in fact.
>
> I'm interpreting your question to be something like, "Is there a perl
> program which will read a file that has variable-length records and
output
> the same data as a file of fixed-length records." If I've gotten that
> wrong, you may wish to ask again.
>
> > I have a file with 25 records that are 238 chars long, but when I
Ftp
> > the file to an IBM MVS system the file is showing as variable length
> > (255 chars long).
>
> That sounds as if you didn't transfer the file correctly. Did you use
> binary mode on a text file, or vice versa?
>
> --
> Tom Phoenix Perl Training and Hacking Esperanto
> Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
>
>
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Tue, 02 May 2000 08:13:33 -0700
From: Jeff Zucker <jeff@vpservices.com>
Subject: Re: Reformatting a File (Variable to Fixed)
Message-Id: <390EF09D.7DCECF42@vpservices.com>
mkrol@my-deja.com wrote:
>
> I've tried both methods of FTPing the file, and they are both showing
> as variable length. I have received another response, that it could be
> possible to reformat the data using sysread() and unpack(). Does this
> sound right?
What exactly do you mean by variable length? Do you mean that the lines
are different from the original, or that they are different from each
other, or that the fields within the lines are not consistently a
certain length from one record to the next, or what?
--
Jeff
------------------------------
Date: Tue, 02 May 2000 15:43:13 GMT
From: johnand@my-deja.com
Subject: Re: resizing an image
Message-Id: <8emt2c$849$1@nnrp1.deja.com>
In article <45rP4.10009$Ie5.1838247@news-west.usenetserver.com>,
"sjohn" <sjohn92694@kcweb.net> wrote:
> <p align="center"><img border="0" src="your image" width="563"
height="86">
> </p>
>
> Now what I do, to resize the images, I just change the width="400"
> height="50"
> and the image will resize on your site.
> This works for me, This is not perl, just standard html
Yikes! You should NOT do this; having the browser resize images slows
down the browser's page rendering and totally wastes bandwidth.
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Tue, 02 May 2000 15:53:01 GMT
From: johnand@my-deja.com
Subject: Re: resizing an image
Message-Id: <8emtkl$8qs$1@nnrp1.deja.com>
In article <8el6on$96g$1@tesla.a2000.nl>,
"qwerty" <vioon@hotmil.com> wrote:
>
>
> I am looking for a script, module or subroutine that can resize
images.
> What i want is something like this :
>
> $newimage= &resize($image,newwith,newheight);
>
You may want to check out the PerlMagick package, which is a Perl
interface to ImageMagick. It's very CPU and memory intensive, but I
believe it can resize images on-the-fly (it can certainly do everything
*else*).
You can get it from CPAN in the Image directory; here's a link:
http://www.perl.com/CPAN-local//modules/by-module/Image/PerlMagick-4.28.
tar.gz
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Tue, 2 May 2000 17:09:58 GMT
From: Francis Litterio <franl-removethis@world.omitthis.std.com>
To: Stephen Dodd <dodd@ll.mit.ed>
Subject: Re: Specifying timeout with sockets
Message-Id: <m37ldc7uah.fsf@franl.andover.net>
Stephen Dodd <dodd@ll.mit.edu> writes:
> When connecting to a terminal server using a socket object, I set the
> timeout value to 10. The documention doesn't state the units of time but
> I presume it's in seconds.
From reading /usr/lib/perl5/5.00503/i386-linux/IO/Socket.pm on my Linux
machine, I can confirm that the timeout value is in units of seconds.
> The documents further states that the timeout is used for "some" operations.
Where "some" means IO::Socket::connect() and IO::Socket::accept(). In
fact, here's how IO::Socket::connect() implements the timeout using
Perl's builtin "alarm" function -- I've elided unrelated code with
"#..."for clarity:
sub connect {
my $fh = shift;
my $timeout = ${*$fh}{'io_socket_timeout'};
local($SIG{ALRM}) = $timeout ? sub { undef $fh; }
: $SIG{ALRM} || 'DEFAULT';
eval {
if($timeout) {
defined $Config{d_alarm} && defined alarm($timeout) or
$timeout = 0;
}
my $ok = connect($fh, $addr);
alarm(0)
if($timeout);
croak "connect: timeout"
unless defined $fh;
undef $fh unless $ok;
};
$fh;
}
You could do the same around any method call your code makes.
--
Francis Litterio
franl-removethis@world.std.omit-this.com
PGP public keys available on keyservers.
------------------------------
Date: Tue, 02 May 2000 15:25:44 GMT
From: ashanti@ashanti.fiyabun.com (ashanti)
Subject: uuencode
Message-Id: <slrn8gtsnb.geu.ashanti@ashanti.fiyabun.com>
I would like to create a perl script that takes a file,
uuencodes it, then sends it to a nntp server.
The NNTP portion I can handle, it's the multi-part message
portion I am unsure about.
What all do I need to break the file up into multiple portions?
Also do I need to place special headers at the top of each
part of the message to associate with with the other messages?
Thanks
------------------------------
Date: Tue, 02 May 2000 13:50:38 -0400
From: jkrogerSPAMBLOCKER@earthlink.net (jkroger)
Subject: What debugger do people use for Perl?
Message-Id: <jkrogerSPAMBLOCKER-0205001350380001@tritone.csbmb.princeton.edu>
Hi, I'm learning Perl, and would like to know what people use for a
debugger. I tried typing "perldoc debug" and "perldoc debugger" and got
nothing.
TIA,
Jim
------------------------------
Date: Tue, 02 May 2000 16:50:57 GMT
From: "Aurelien" <aureld@free.fr>
Subject: Where can I download HotKey.pm module ?
Message-Id: <RHDP4.3423$114.7261282@nnrp5.proxad.net>
Hello !
I have seen in perlfaq8 that the HotKey.pm module is very interesting and
I'd like to download it. It is present in the faq but I 'd prefer to have
it with a makefile like other CPAN modules.
Someone can give me an URL where I can download it please ? Thanks.
Aurelien
------------------------------
Date: Tue, 02 May 2000 10:48:39 -0700
From: Jon Ericson <Jonathan.L.Ericson@jpl.nasa.gov>
Subject: Re: Win32 Perl Program RAM Usage
Message-Id: <390F14F7.E57A328E@jpl.nasa.gov>
R1CH wrote:
> I have a Perl IRC bot that runs in Win32 using ActivePerl. Running Task
> Manager shows it uses around 10mb of RAM when first started. It
> basically is just one big loop with event processing in, and logfile and
> stats generation. However, after about a day of uptime, the RAM usage is
> around 100mb !!
Read perldebug and perldebguts (especially the 'Debugging Perl memory
usage' section). You might consider saving status information to a file
or database so that it isn't constantly in memory. This will also allow
you to recover more elegantly from failure.
Jon
--
Knowledge is that which remains when what is
learned is forgotten. - Mr. King
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
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: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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 V9 Issue 2925
**************************************
