[16966] in Perl-Users-Digest
Perl-Users Digest, Issue: 4378 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Sep 19 18:15:36 2000
Date: Tue, 19 Sep 2000 15:15:23 -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: <969401723-v9-i4378@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Tue, 19 Sep 2000 Volume: 9 Number: 4378
Today's topics:
Running lengthly perl scripts over cgi dj_morri@my-deja.com
Re: Running lengthly perl scripts over cgi <amonotod@netscape.net>
Script Available? <johnny.bgood@no-junk-mail-here-please.net.ntl.com>
Re: Send e-mail in HTML format with sendmail (Chris Fedde)
Sorting numerically on hash of hashes - are keys still <RCVP10@email.sps.mot.com>
Re: Sorting numerically on hash of hashes - are keys st <russ_jones@rac.ray.com>
Re: Split NS Log File <yanick@babyl.sympatico.ca>
Re: Split NS Log File <lr@hpl.hp.com>
Re: Split NS Log File <yanick@babyl.sympatico.ca>
Strange results using system vs backticks <tmvatcher@bigfoot.com>
Sybase DBI Question pennucci@my-deja.com
Re: Upgrade Error: ld.so.1: perl: fatal: libdb-3.1.so: <gellyfish@gellyfish.com>
Where to get Net::SMTP ?? <vgavan@hotmail.com>
Re: Where to get Net::SMTP ?? rathmore@tierceron.com
Re: Where to get Net::SMTP ?? <gellyfish@gellyfish.com>
Re: Willing to pay for this split job (Richard J. Rauenzahn)
Windows modules <kelley.a.kent@intel.com>
Re: Windows modules (Clinton A. Pierce)
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 19 Sep 2000 17:56:49 GMT
From: dj_morri@my-deja.com
Subject: Running lengthly perl scripts over cgi
Message-Id: <8q89cl$37i$1@nnrp1.deja.com>
Hi,
I wish to run a perl script spawned via a web cgi interface. Only
problem is that this script will take anything up to 15 minutes to
execute!! (Don't ask!) It's nothing untoward but it telnets into
around 50 hosts on our intranet and collects some info.
Script works fine when executed locally, except the webserver imposes a
timeout of around 5 mins killing the process. I don't want to increase
the webserver timeout, as generally I do NOT want perl cgi stuff
running for longer than 5 minutes!
So, my PERL question is....
Can I use my script to run a child script in the background, and exit
leaving the child to run on the system, not through CGI.
The starter script would write a HTML file to the server with a
"refresh" directive in, then return a redirect to this file.
The child script will then append status updates to that
HTML page. (So as far as the user is concerned it appears that it is
only one script running throughout) supplying progress reports.
Does that make sense?
My kludge for this situation is for the starter script to schedule a NT
AT job (cron-like job) for the current system time + 1 minute. Surely
there must be a perl solution, instead of resorting to platform
specific system commands. Comments?
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Tue, 19 Sep 2000 20:22:45 GMT
From: amonotod <amonotod@netscape.net>
Subject: Re: Running lengthly perl scripts over cgi
Message-Id: <8q8hts$e4f$1@nnrp1.deja.com>
In article <8q89cl$37i$1@nnrp1.deja.com>,
dj_morri@my-deja.com wrote:
> I wish to run a perl script spawned via a web cgi interface. Only
<snip>
> Surely there must be a perl solution, instead of resorting to platform
<snip>
I did something like this on our dev server, so that the dev'rs could
stop, start and reset the web, application, database and NT processes on
their own. It was getting simply too hard on the entire team for them
to count on me to stop the appsrvr so they could do some db stuff, for
instance.
I used Dave Roths Daemon.pm Directory Monitor to monitor a `jobs'
directory, and a cgi interface to create a file in the jobs directory.
The dirmon script picks up the file, logs some user info, starts the cgi
script as a local app, then deletes the job file. The local run cgi
script then does what I need it to do, using Win32::spawn.
I'd post my code, but it is embarrassingly ugly (pronounce as OOG-lè,
and think about Moronzilla! as you say it), and I just can't bear to
have it criticized. If you're interested, email me, I'll sanitize it in
regards to localized info and let you have it.
If you want to go your own way, using Daemon.pm, check out
http://www.roth.net/perl/ .
later,
amonotod
--
`\|||/ amonotod@
(@@) netscape.net
ooO_(_)_Ooo________________________________
_____|_____|_____|_____|_____|_____|_____|_____|
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Tue, 19 Sep 2000 21:12:40 +0100
From: "Johnny B'Good" <johnny.bgood@no-junk-mail-here-please.net.ntl.com>
Subject: Script Available?
Message-Id: <PIPx5.969$bD5.5881@news11-gui.server.ntli.net>
Hi folks,
I'm looking for a perl script that will do the following (the idea is to
achieve a printer friendly version of a page):
When a button (could be part of a form) is clicked, a cgi process is called
that takes the document that called it, and strips out everything but the
contents between two comment tags. It then takes what it has stripped out,
and dumps it into a blank html page between the body tags and feeds this
back to the browser.
Any ideas? Is there a script out there that will do this? Or do I need to
write my own?
Thanks
J
--
---------------------------------------------------------------------------
Usenet is like a herd of performing elephants with
diarrhea - massive, difficult to redirect, awe-inspiring,
entertaining, and a source of mind - boggling amounts
of excrement when you least expect it.
- Gene Spafford,1992
---------------------------------------------------------------------------
------------------------------
Date: Tue, 19 Sep 2000 21:18:36 GMT
From: cfedde@u.i.sl3d.com (Chris Fedde)
Subject: Re: Send e-mail in HTML format with sendmail
Message-Id: <MKQx5.264$W3.189938176@news.frii.net>
In article <8q7s16$3fi$1@news.asiaaccess.net.th>, Dimitri <d@i.am> wrote:
>How to send e-mail in HTML format with sendmail? The html source appear in
>the e-mail I send.
If you are really using sendmail then you will want to use the -t option so
that sendmail will get recipients from the message.
Also your message needs to conform to rfc822 standards. Most specifically
you need an empty line between the headers and the body.
chris
PS. This subject is a bit off topic here. The answer would be the
same regardless of the language that you were writing this in.
PPS. There are modules in CPAN that can make creating and sending email very
easy. Try looking there.
--
This space intentionally left blank
------------------------------
Date: Tue, 19 Sep 2000 11:42:06 -0700
From: Eric Titmas <RCVP10@email.sps.mot.com>
Subject: Sorting numerically on hash of hashes - are keys still a string?
Message-Id: <39C7B37E.2FCA4770@email.sps.mot.com>
Some data of the form:
$tchix_di{.1000} {.2000} = .2222;
$tchix_di{.1000} {.8000} = .4444;
$tchix_di{4.0000} {.2000} = .3333;
$tchix_di{4.0000} {.8000} = .5555;
@rows = sort {$a <=> $b} keys %tchix_di;
foreach $row (@rows) {
foreach $col (sort {$a <=> $b} keys %{$tchix_di{$row}}) {
$value = $tchix_di{$row}{$col};
...
}
}
Does the numeric sort change the keys to a number
and make them unusable as a hash key?
--
Eric Titmas eric.titmas@mot.com
Perl is designed to make the easy jobs easy,
without making the hard jobs impossible.
Programming Perl by Wall, Christiansen, Schwartz
------------------------------
Date: Tue, 19 Sep 2000 14:27:04 -0500
From: Russ Jones <russ_jones@rac.ray.com>
Subject: Re: Sorting numerically on hash of hashes - are keys still a string?
Message-Id: <39C7BE08.C1F50866@rac.ray.com>
Eric Titmas wrote:
>
(snip)
>
> Does the numeric sort change the keys to a number
> and make them unusable as a hash key?
Lemme try that again:
Nope, sort does not change the sorted records in any way, other than
ordering them. Internally it treats the "numeric" key as a number but
it's still stored like it was before, as a string.
--
Russ Jones - HP OpenView IT/Operatons support
Raytheon Aircraft Company, Wichita KS
russ_jones@rac.ray.com 316-676-0747
Quae narravi, nullo modo negabo. - Catullus
------------------------------
Date: Tue, 19 Sep 2000 18:17:13 GMT
From: Yanick Champoux <yanick@babyl.sympatico.ca>
Subject: Re: Split NS Log File
Message-Id: <J4Ox5.254775$Gh.6232453@news20.bellglobal.com>
Glyndwr <glynFOOdwr@fsckdeleteemed.co.uk> wrote:
: "Yanick Champoux" <yanick@babyl.sympatico.ca> wrote in message
: news:x9Nx5.273395$1h3.5770006@news20.bellglobal.com...
:> Glyndwr <glynFOOdwr@fsckdeleteemed.co.uk> wrote:
:> : <fperkins@my-deja.com> wrote in message
: news:8q7umv$la5$1@nnrp1.deja.com...
:> :> I have a log file that I need to split in order to analyze the fields.
:>
:> : I've never posted here before, so I'm expecting someone to come along in
: a
:> : few minutes and tell me this is rubbish. Still, I'll have a go :o)
:>
:> :> 207.179.196.120 - - [31/Jul/2000:22:05:02 -0000] "GET / HTTP/1.0" 200
:> :> 737 "http://www.someurl.com/url.html" "Mozilla/4.06 [en] (Win98;
:> :> I)" "INTERSE=20724114964484603"
:>
:> : Rather than a simple split, I would use a regexp and then get the bits
: from
:> : backreferences. Say the string is in $foo.
:>
:> : $foo =~
: /([\d\.]{15})[\s\-]*?\[(.*?)\]\s*"(.*?)".*"(.*)"\s*"(.*)"\s"(.*)"/;
:> : ($ip,$date,$request,$url,$browser,$foo) = ($1,$2,$3,$4,$5,$6);
:>
:> The regex is nice, albeit thereis some dubious assumptions
:> (for example, 127.0.0.1 is a valid IP address and doesn't match your
:> /[\d.]{15}/
: Hehe, hidden assumptions. Doncha just hate them?
With all my heart. :)
: Good point though. I nearly
: wrote
: \d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}
: but decided it was too clumsy so ditched it :o)
Well, it's long, it's ugly, it's repetitive, but it gets
the job done, so it's not entierely bad. :)
:>(oh, '.' in a [] is just that, a dot. no need to backlash)).
: Ah, I didn't know that, although in hindsight it's obvious.
Eh. For such a wee cluster of pixels, the dot is quite
perlyvalent. After all, we can write
print 1..2, "blah" . join '.', $., $foo =~ /.\.[.,]/ for 1...2;
which use the dot in... uh, a lot of contexes. :)
:> Myself, I prefer to do a couple of smallers regexes instead of one
:> big stomach-churning one (no offense to your code, but anything
:> that has twice as many backslashes than actual letters is bound to
:> be stomach-churning :). Here, I would have done:
: Hehe, no offence taken. It could use spacing out and some comments, at
: least.
m//x is out friend...
$foo =~ /^(\S+) # begin by the IP address
.*?\[ # munch till the date
(.*?)] # get the date
[^"]*? # don't tell my mother I said that
... # etc
/x;
:> $_ = <LOGFILE>; # read the line
:>
:> ( $ip ) = /^(\S+)/; # line begin with IP address
:> ( $date ) = /\[(.*?)\]/; # first thing in brackets is the date
:> ( $request, $url, $browser, $stuff ) = /".*?"/g; # all is quoted, yay!
: That is quite neat. Nice.
Thank! |)
Joy,
Yanick
--
eval" use 'that poor Yanick' ";
print map{ (sort keys %{{ map({$_=>1}split'',$@) }})[hex] }
qw/8 b 15 1 9 10 11 15 c b 13 1 12 b 13 f 1 c 9 a e b 13 0/;
------------------------------
Date: Tue, 19 Sep 2000 12:15:04 -0700
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: Split NS Log File
Message-Id: <MPG.14315b0e6c019d3498ad94@nntp.hpl.hp.com>
In article <J4Ox5.254775$Gh.6232453@news20.bellglobal.com> on Tue, 19
Sep 2000 18:17:13 GMT, Yanick Champoux <yanick@babyl.sympatico.ca>
says...
> Glyndwr <glynFOOdwr@fsckdeleteemed.co.uk> wrote:
...
> : \d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}
> : but decided it was too clumsy so ditched it :o)
>
> Well, it's long, it's ugly, it's repetitive, but it gets
> the job done, so it's not entierely bad. :)
(?:\d{1,3}\.){3}\d{1,3}
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Tue, 19 Sep 2000 19:52:47 GMT
From: Yanick Champoux <yanick@babyl.sympatico.ca>
Subject: Re: Split NS Log File
Message-Id: <juPx5.273726$1h3.5781260@news20.bellglobal.com>
Larry Rosler <lr@hpl.hp.com> wrote:
: In article <J4Ox5.254775$Gh.6232453@news20.bellglobal.com> on Tue, 19
: Sep 2000 18:17:13 GMT, Yanick Champoux <yanick@babyl.sympatico.ca>
: says...
:> Glyndwr <glynFOOdwr@fsckdeleteemed.co.uk> wrote:
: ...
:> : \d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}
:> : but decided it was too clumsy so ditched it :o)
:>
:> Well, it's long, it's ugly, it's repetitive, but it gets
:> the job done, so it's not entierely bad. :)
: (?:\d{1,3}\.){3}\d{1,3}
It's short, it's ugly, it's acyclic, but it gets the
job done, so it's not entierely bad either. ;)
*duck for cover*
Joy,
Yanick
--
eval" use 'that poor Yanick' ";
print map{ (sort keys %{{ map({$_=>1}split'',$@) }})[hex] }
qw/8 b 15 1 9 10 11 15 c b 13 1 12 b 13 f 1 c 9 a e b 13 0/;
------------------------------
Date: Tue, 19 Sep 2000 13:22:16 -0700
From: "Toni M. Vatcher" <tmvatcher@bigfoot.com>
Subject: Strange results using system vs backticks
Message-Id: <39C7CAF8.F9452898@bigfoot.com>
<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>
I'm running ActiveState Perl 522 on Windows NT 4.0
<p>I have a call to an executable within my perl script.
<p>I create a variable to contain the command:
<p> $system_cmd
= "$ENV{prog_dir}\\program.exe -option $param1 $param2";
<p>Then I use system as follows:
<p> $status
= system $system_cmd;
<p>My program appears to be calling the executable twice... (I verified
from within the debugger that I dont' somehow have the "system" command
twice)
<p>When I use backticks as follows:
<p> $results
= `$system_cmd`;
<p>it only gets called once.
<p>I prefer to use system in this case because the executable takes a long
time to run and its output provides % completion information to the
user.
<p>This behavior does not seem to happen when I change $system_cmd to "dir"
or to run a different executable. The executable that has the problem
runs fine (only once) from outside the perl script.
<p>Does anybody have any idea why this is happening or what I can do to
fix it?
<p>Or, if there's a way to get the output of the backticks to go to the
display as the program runs rather than waiting to the end, I guess that
would get me what I need. Although, I'd really like to understand
what's going on...
<p>Thanks!<br>
<BR>
<br>Toni Vatcher
<br>tmvatcher@bigfoot.com
<br> </html>
------------------------------
Date: Tue, 19 Sep 2000 21:04:28 GMT
From: pennucci@my-deja.com
Subject: Sybase DBI Question
Message-Id: <8q8kcc$h4l$1@nnrp1.deja.com>
Hello all,
I am a first time poster on this group. I have been coding in Perl for
about 5 years now, however I am fairly new to using DBI and DBD::Sybase.
I have a quick question. I am trying to copy a large volume of data
from a table on one server to a table on another server. I have been
successful with getting a database handle up and talking to both
machines, and getting the data from the view on the source table. The
problem comes in when I try to put the data into the destination
table.
Briefly, the code causing my problem looks something like
my $sql = qq {
INSERT INTO $insert_table ( $column_names )
VALUES(?, ?, ?, ... ? )
}
my $insert_sth = $insert_dbh->prepare( $sql );
to set up the sql and then I use
eval { $insert_sth->execute( @$row_ref ) };
to bind the next set of params from the export sth and insert the data
inside of a
do { while ( fetch() ) { ... } } while ( more_results )
set of paired loops.
The data appears to be copying properly, however I keep getting a
warning message in the Sybase error log
kernel uppri: new priority value -1 is not within range
I have been unable to find anything in the documentation about even
setting a priority value, so I am a little baffled.
Any advice on how to proceed with this one would be greatly appreciated.
Our DBA is getting a little miffed about 33K warnings every time I run
the job.
Thanks,
Mike
mppennucci@lnc.com
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 19 Sep 2000 07:00:00 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Upgrade Error: ld.so.1: perl: fatal: libdb-3.1.so: open failed: No such file or directory
Message-Id: <8q6vd0$q9h$1@orpheus.gellyfish.com>
On Mon, 18 Sep 2000 19:45:50 GMT bluearchtop@my-deja.com wrote:
> I just upgraded from 5.005 to 5.6 and previous scripts that worked now
> give me:
>
> ld.so.1: perl: fatal: libdb-3.1.so: open failed: No such file or
> directory
>
> The make test worked fine however in all tests. This particular script
> uses DB_File. Is there something I need to do?
>
Does libdb-3.1.so exist on your system and do any links it might have
resolve to existing files ? You don't say what OS you are on but if
you can do :
ldd `locate DB_File.so`
What do you get and do all of the files mentioned exist ?
If libdb-3.1.so *does* exist is it somewhere where your dynamic linker
expect to find it ? Again it's difficult to say without knowing the OS
but does the directory where the file resides get mentioned in either
the LD_LIBRARY_PATH environment variable or in /etc/ld.so.conf ?
/J\
--
yapc::Europe in assocation with the Institute Of Contemporary Arts
<http://www.yapc.org/Europe/> <http://www.ica.org.uk>
------------------------------
Date: Tue, 19 Sep 2000 18:42:33 GMT
From: "vgavan" <vgavan@hotmail.com>
Subject: Where to get Net::SMTP ??
Message-Id: <tsOx5.7621$nk3.360937@newsread03.prod.itd.earthlink.net>
I looked in http://www.perl.com/CPAN-local/modules/by-module/Net/ and
ActiveState.
Can't find it. Please help, point me where I can download binary for Win32
or source.
Thank you in advance.
------------------------------
Date: Tue, 19 Sep 2000 20:26:20 GMT
From: rathmore@tierceron.com
Subject: Re: Where to get Net::SMTP ??
Message-Id: <8q8i4h$e88$1@nnrp1.deja.com>
> I looked in http://www.perl.com/CPAN-local/modules/by-module/Net/ and
> ActiveState.
> Can't find it. Please help, point me where I can download binary for
Win32
> or source.
http://search.cpan.org/search?dist=libnet
You want the file libnet-1.0703.tar.gz.
Rathmore
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 19 Sep 2000 21:03:25 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Where to get Net::SMTP ??
Message-Id: <8q8gqd$2bq$1@orpheus.gellyfish.com>
On Tue, 19 Sep 2000 18:42:33 GMT vgavan wrote:
> I looked in http://www.perl.com/CPAN-local/modules/by-module/Net/ and
> ActiveState.
> Can't find it. Please help, point me where I can download binary for Win32
> or source.
>
Its part of libnet :
ppm install libnet
/J\
--
yapc::Europe in assocation with the Institute Of Contemporary Arts
<http://www.yapc.org/Europe/> <http://www.ica.org.uk>
------------------------------
Date: 19 Sep 2000 19:54:27 GMT
From: nospam@hairball.cup.hp.com (Richard J. Rauenzahn)
Subject: Re: Willing to pay for this split job
Message-Id: <969393266.173089@hpvablab.cup.hp.com>
petka1@yahoo.com writes:
>I'm willing to pay someone to create a script for me.
>E-mail me(petka1@yahoo.com) with your price for this job.
My price is that you have to learn Perl =-).
But seriously, if you decide to take this on yourself, the module
HTML::TableExtract will make it pretty easy. It even comes with sample
code in the manual.
The hardest part of the script will be finding the right regular
expressions for extracting the majority of the data from the 2nd row in
each table. The data structures are simple if you're using a different
array for each field.
If you still want to hire someone, then post to something in the
misc.jobs.* hierarchy. Job postings are considered inappropriate here.
#!/usr/bin/perl -w
use strict;
use HTML::TableExtract;
local $/;
my $string = <STDIN>;
$string =~ tr/\r\n/ /;
my $te = new HTML::TableExtract;
$te->parse($string);
# Examine all matching tables.
foreach my $ts ($te->table_states) {
print "**** Table (", join(',', $ts->coords), "):\n\n";
foreach my $row ($ts->rows) {
print " [" . join(',', @$row), "]\n";
}
}
$ ./foo < foo.html [and manually reformatted for 72 columns]
**** Table (1,0):
[ Stock Analysis v1.2,]
[ 1: Download Now - UNIX only ( 20k ) 2: Download Now - Win95/98 or
NT ( 4k ) Made by: John Doe Released on: April 4, 2000, Lisence:
Freeware Version Price: $0 (U.S dollars) Rating: Not A vailable]
[Stock anylisis is a powerful tool for blah blah blah... long
description here.,]
**** Table (1,1):
[ Commerce v1.1,]
[ 1: Download Now - UNIX or MacOS ( n/a ) Made by: Jane Doe Released
on: August 1, 1999, Lisence: Shareware Version Price: $15 (U.S
dollars) Rating: Not Available]
[Commerse v1.1 is one of the leading super functional and easy to
learn packages.,]
**** Table (0,0):
[ ]
Good luck!
Rich
--
Rich Rauenzahn ----------+xrrauenza@cup.hp.comx+ Hewlett-Packard Company
Technical Consultant | I speak for me, | 19055 Pruneridge Ave.
Development Alliances Lab| *not* HP | MS 46TU2
ESPD / E-Serv. Partner Division +--------------+---- Cupertino, CA 95014
------------------------------
Date: Tue, 19 Sep 2000 13:49:16 -0700
From: "Kelley Kent" <kelley.a.kent@intel.com>
Subject: Windows modules
Message-Id: <8q8je5$oh1@news.or.intel.com>
Am I crazy: didn't there used to be seperate Perl module packages
for Unix/Linux and Windows? I remember doing ppm stuff and
installing packages that way on Windows, but that was about a year
ago. All the modules I've found recently don't have the ppm stuff and
I basically just have to untar and unzip the module and copy the main
module folder to the perl/lib directory.
Were these ppm modules at a different site location that maybe I just
can't remember at the present time? Or are they now defunct?
Just a sanity check. :-)
-- Kelley
------------------------------
Date: Tue, 19 Sep 2000 21:52:13 GMT
From: clintp@geeksalad.org (Clinton A. Pierce)
Subject: Re: Windows modules
Message-Id: <heRx5.535$hD4.152635@news1.rdc1.mi.home.com>
[Posted and mailed]
In article <8q8je5$oh1@news.or.intel.com>,
"Kelley Kent" <kelley.a.kent@intel.com> writes:
> Am I crazy:
I am not a licensed therapist. Does my opinion count?
> didn't there used to be seperate Perl module packages
> for Unix/Linux and Windows? I remember doing ppm stuff and
> installing packages that way on Windows, but that was about a year
> ago. All the modules I've found recently don't have the ppm stuff and
> I basically just have to untar and unzip the module and copy the main
> module folder to the perl/lib directory.
When you installed the Windows version of Perl (presumably from
Activestate), did you read the documentation? Either on the site
or the stuff that got loaded on your hard disk.
PPM is still there. It's just the way it always was.
--
Clinton A. Pierce Teach Yourself Perl in 24 Hours!
clintp@geeksalad.org for details see http://www.geeksalad.org
"If you rush a Miracle Man,
you get rotten Miracles." --Miracle Max, The Princess Bride
------------------------------
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 4378
**************************************
