[24759] in Perl-Users-Digest
Perl-Users Digest, Issue: 6912 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Aug 25 21:06:12 2004
Date: Wed, 25 Aug 2004 18:05:06 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Wed, 25 Aug 2004 Volume: 10 Number: 6912
Today's topics:
Re: finding directory sizes <ddunham@redwood.taos.com>
Re: how to install sybperl??? <kalinaubears@iinet.net.au>
Re: I Broke a scalar $_@_.%_
Re: I Broke a scalar <usa1@llenroc.ude.invalid>
Re: Javascript, ODBC, and Oracle functions returning cu (Roger Redford)
Re: Javascript, ODBC, and Oracle functions returning cu (Roger Redford)
Re: Larry Wall & Cults <albalmer@att.net>
Re: Larry Wall & Cults <emschwar@pobox.com>
Re: Larry Wall & Cults <g@prullenbak.todd.nu>
Re: Larry Wall & Cults <rich.teer@rite-group.com>
Re: Larry Wall & Cults <dietz@dls.net>
Re: Oracle DBI/DBD and bind vars - so slooooowwwww <makbo@pacbell.net>
Re: Parsing FileName for upload <tore@aursand.no>
Re: Performance Improvement of complex data structure ( ctcgag@hotmail.com
Re: performance surprise -- why? ctcgag@hotmail.com
Re: Perl and DOS I/O <usenet@morrow.me.uk>
Resizing JPG images with Perl? <nospam@thanksanyway.org>
Re: Resizing JPG images with Perl? <tore@aursand.no>
Re: Resizing JPG images with Perl? <usa1@llenroc.ude.invalid>
Re: Resizing JPG images with Perl? <nospam@thanksanyway.org>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 26 Aug 2004 00:02:48 GMT
From: Darren Dunham <ddunham@redwood.taos.com>
Subject: Re: finding directory sizes
Message-Id: <IM9Xc.11702$mA3.5279@newssvr27.news.prodigy.com>
Zebee Johnstone <zebee@zip.com.au> wrote:
> yes, if I have to recurse, then I have to re-do du on that directory,
> so if there's a reasonable way to record the info for each file only
> once and then do the splitting that might be better.
When you use 'du -s', you're doing all the work, but throwing away the
intermediate information. You could just keep the entire output of
'du', then parse the directories you need.
Alternatively, you could create a hash in memory that reflected the
filesystem, along with the sizes of every subdirectory. Just form the
subtree as you're parsing.
Then you can check the size of the top-level. If it's too big, just
look for all the sub-components and check their size...
(Using straight filenames instead of a hierarchical hash would have been
easier in some ways, but if the directory was oversized, it would have
been much harder to find all the subdirectories.)
#!/usr/bin/perl -w
use strict;
use File::Find;
use File::Spec;
my $size_key = "SIZE%:/_-SIZE"; # just a string that is unlikely
# to match the name of a subdirectory
my $root_dir = "."; # Default. Change as needed.
my $dir_tree = {};
find(\&wanted, $root_dir);
# Now you can see the sizes of various dirs and subdirs.
print "Dir <.> is ", $dir_tree->{"."}{$size_key}," blocks.\n";
print "Dir <./foo> is ", $dir_tree->{"."}{"foo"}{$size_key},"blocks.\n";
print "Dir <./foo/bar> is ", $dir_tree->{"."}{"foo"}{"bar"}{$size_key}," blocks.\n";
sub wanted
{
my $blocks = (lstat $_)[12];
my @path_components = File::Spec->splitdir($File::Find::name);
my $filename = pop @path_components;
my $pointer = $dir_tree;
foreach my $component (@path_components)
{
#$filename = $File::Spec->catdir($pointer, $component);
$pointer = $pointer->{$component};
$pointer->{$size_key} += $blocks;
}
if (-d $_)
{
# add a new hash component.
$pointer->{$_} = { $size_key => $blocks };
}
}
A method like this is a big win whenever the cost of the treewalk and
the stats are large. If it takes 2 minutes to do the top-level 'du',
and you might have to repeat it a few times to get what you want, the
extra overhead in the program to do it once is worth it.
--
Darren Dunham ddunham@taos.com
Senior Technical Consultant TAOS http://www.taos.com/
Got some Dr Pepper? San Francisco, CA bay area
< This line left intentionally blank to confuse you. >
------------------------------
Date: Thu, 26 Aug 2004 10:53:05 +1000
From: Sisyphus <kalinaubears@iinet.net.au>
Subject: Re: how to install sybperl???
Message-Id: <412d35a3$0$22828$5a62ac22@per-qv1-newsreader-01.iinet.net.au>
yubo he wrote:
> (windows) I download sybperl module, but can not compile(using bc 5.2), it
> seems like makefile has some errors
> error makefile 137:colon expected
> fatal makefile 762: no terminator specified for in-line file operator
>
> anybody has exp. ? thank you
>
>
I believe that a compiled version suitable for Win32 (probably a ppm) is
available from:
http://www.peppler.org/downloads/ActiveState/
Cheers,
Rob
--
To reply by email u have to take out the u in kalinaubears.
------------------------------
Date: Wed, 25 Aug 2004 22:13:16 GMT
From: $_@_.%_
Subject: Re: I Broke a scalar
Message-Id: <0a8Xc.15044$IO1.3564@trndny03>
"no@no.invalid" <no@no.invalid> wrote in message-id:
<PJ7Xc.9520$VY.4595@trndny09>
>
>Can this be done? Should right? Well its not working =(
>What's goin on?
>
>my $a = '
>$VAR1 = bless( {
> 'read_limit' => 3000,
> 'outbuffer' => '',
> 'write_limit' => 3000,
> 'index' => 0,
> 'inbuffer' => '',
> 'handle' => bless( \*Symbol::GEN1, 'IO::Socket::INET' ),
> 'writeonly' => undef,
> 'eof' => 0,
> 'choker' => undef,
> 'choked' => 0,
> 'error' => 0,
> 'linemode' => 0,
> 'sset' => bless( {
> 'sessions' => {
>
>'IO::Socket::INET=GLOB(0x1a4
>c120)' => $VAR1
> },
> 'listen_socket' => bless(
>\*Symbol::GEN0, 'I
>O::Socket::INET' ),
> 'writers' => bless( [
> undef,
> 0
> ], 'IO::Select' ),
> 'readers' => bless( [
> '?',
> 2,
> undef,
> undef,
> undef,
>
>$VAR1->{'sset'}{'liste
>n_socket'},
> $VAR1->{'handle'}
> ], 'IO::Select' )
> }, 'IO::LineBufferedSet' )
> }, 'IO::LineBufferedSessionData' );
>$VAR1 = undef;
>';
>print $a;
ohhh its the single quotes.. isn't it? <sigh>
This messes with Tk::Text 'get' method but good it does. suppose the get
could be wrapped in a eval... blah
------------------------------
Date: 25 Aug 2004 22:24:11 GMT
From: "A. Sinan Unur" <usa1@llenroc.ude.invalid>
Subject: Re: I Broke a scalar
Message-Id: <Xns9550BB3799C3asu1cornelledu@132.236.56.8>
"no@no.invalid" <no@no.invalid> wrote in
news:PJ7Xc.9520$VY.4595@trndny09:
Your subject line is devoid of meaning.
> Can this be done?
Can what be done?
> Should right?
WTF ???
> Well its not working =(
ITYM it's not its.
On the other hand, I have no idea what 'it' is that should be working. Care
to enlighten us?
> What's goin on?
You are missing a 'g' up there.
> my $a = '
> $VAR1 = bless( {
> 'read_limit' => 3000,
OK, so far you have assigned the string
'
$VAR1 = bless( {
'
to $a. Then, you follow that by the bareword read_limit, which is followed
by another string etc etc so on and so forth. Are you by any chance looking
for the q operator?
Please stop the insanity and post a reasonable message that conveys a
meaning. You might want to read and understand
http://www.catb.org/~esr/faqs/smart-questions.html
before you do that.
Sinan.
------------------------------
Date: 25 Aug 2004 16:04:14 -0700
From: dba_222@yahoo.com (Roger Redford)
Subject: Re: Javascript, ODBC, and Oracle functions returning cursors
Message-Id: <a8c29269.0408251504.4a753af@posting.google.com>
Thanks for responding. To answer the question, these newsgroups
were the ones that I found at groups.google.com as groups that had
discussions on the keywords that I searched on.
> Why in the world are you spamming every language newgroup under the SUN?
> comp.databases.oracle.server,comp.lang.javascript,comp.lang.java.api,comp.l
> ang.basic.visual.database,comp.lang.perl.misc
>
> Either your ODBC or JS code is FUBAR. PL/SQL does know know or care
> about the language of the code which calls it. PL/SQL is too dumb to know
> or care about the calling language.
Right. The question was more, what is possible, and the exact
syntax to do it.
Thanks for the code.
------------------------------
Date: 25 Aug 2004 16:09:25 -0700
From: dba_222@yahoo.com (Roger Redford)
Subject: Re: Javascript, ODBC, and Oracle functions returning cursors
Message-Id: <a8c29269.0408251509.2a0255fb@posting.google.com>
Had you read the detailed post properly, you would have noticed:
1) that I had -already- included an example of how to return
rows from a cursor
2) the question is how to integrate this function (returning
a cursor) with javascript.
You don't seem illiterate. You -are- illiterate.
Gregory Toomey <nospam@bigpond.com> wrote in message news:<2onkhdFcbi2tU1@uni-berlin.de>...
> Roger Redford wrote:
>
> > Oracle is my specialty, the back end mainly,
> ...
> > 2)
> > Does anyone have experience getting a number of rows back
> > with an Oracle cursor? Is this possible?
>
> For somebody who specialises in Oracle, but does not know about getting rows
> from a cursor, your come across as a prize idiot.
>
> Please dont bother us in comp.lang.perl.misc.
>
> gtoomey
------------------------------
Date: Wed, 25 Aug 2004 15:42:55 -0700
From: Alan Balmer <albalmer@att.net>
Subject: Re: Larry Wall & Cults
Message-Id: <te5qi0tr1cn9ol3t7qj44f7ti6geugqdsr@4ax.com>
On 25 Aug 2004 14:56:06 -0700, xah@xahlee.org (Xah Lee) wrote:
>
>Did you know that throughout history there's this thing called cult?
Yes, we've heard of them.
--
Al Balmer
Balmer Consulting
removebalmerconsultingthis@att.net
------------------------------
Date: Wed, 25 Aug 2004 16:46:35 -0600
From: Eric Schwartz <emschwar@pobox.com>
Subject: Re: Larry Wall & Cults
Message-Id: <etoeklu6dkk.fsf@wilson.emschwar>
xah@xahlee.org (Xah Lee) writes:
> Did you know that throughout history there's this thing called cult?
I had no idea. Good thing you're here to help us out.
-=Eric
--
Come to think of it, there are already a million monkeys on a million
typewriters, and Usenet is NOTHING like Shakespeare.
-- Blair Houghton.
------------------------------
Date: Thu, 26 Aug 2004 01:20:24 +0200
From: Giles Todd <g@prullenbak.todd.nu>
Subject: Re: Larry Wall & Cults
Message-Id: <pg7qi0delhcvh0ej5r76i0qg10bm5kactd@4ax.com>
On 25 Aug 2004 14:56:06 -0700, xah@xahlee.org (Xah Lee) wrote:
> Did you know that throughout history there's this thing called cult?
Kenneth Williams used to claim repeatedly that he was a cult. This
was in the 1960s. So, yes, I think I know that "there's this thing
called cult".
> It is a very interesting phenomenon. I don't have time to expound and
> teach, but will try to brief you.
That's OK. I've done it for you. Now, try investigating "Rambling
Sid Rumpo".
Giles.
------------------------------
Date: Thu, 26 Aug 2004 00:24:31 GMT
From: Rich Teer <rich.teer@rite-group.com>
Subject: Re: Larry Wall & Cults
Message-Id: <Pine.SOL.4.58.0408251722510.568@zaphod.rite-group.com>
On Wed, 25 Aug 2004, Xah Lee wrote:
> Did you know that throughout history there's this thing called cult?
I think you're getting confused with the Blue Öyster Cult.
Don't Fear the Reaper - great song.
--
Rich Teer, SCNA, SCSA, author of "Solaris Systems Programming",
published in August 2004.
President,
Rite Online Inc.
Voice: +1 (250) 979-1638
URL: http://www.rite-group.com/rich
------------------------------
Date: Wed, 25 Aug 2004 19:51:57 -0500
From: "Paul F. Dietz" <dietz@dls.net>
Subject: Re: Larry Wall & Cults
Message-Id: <15WdnU2mIJV1rrDcRVn-gQ@dls.net>
Rich Teer wrote:
> I think you're getting confused with the Blue Öyster Cult.
> Don't Fear the Reaper - great song.
A great allegory about garbage collection, wasn't it?
Paul
------------------------------
Date: Thu, 26 Aug 2004 00:58:57 GMT
From: Mark Bole <makbo@pacbell.net>
Subject: Re: Oracle DBI/DBD and bind vars - so slooooowwwww
Message-Id: <lBaXc.12270$L%6.6004@newssvr29.news.prodigy.com>
lord0 wrote:
>>>We're having a bit of a problem using bind vars with Oracle via
>>>DBI/DBD::Oracle. Basically if we use bind vars the following code/query
>>>takes about 35 seconds to return results if we don't use bind vars i.e.
>
> hard
>
>>>code the search parameters into the query then the results are returned
>
> in
>
>>>about 10seconds! Any ideas? We are using the following environment:
>>
>>Btw, which Oracle version?
>
>
>>>>9i enterprise
>>
>>I think you might wish to take this question to an Oracle-related group.
>
>
>>>>Yeah probably right
>
>
>>There are cases in Oracle where it makes better (much better) execution
>>plans for queries where it has the parameters within the query as opposed
>>to using bind parameters.
>
>
>>>>I didn't realise this I thought bind vars were always better
>
>
>>This behaviour is also highly dependent on
>>Oracle server version and configuration (init.ora parameters). Also,
>>whether or not the tables and indices related to the query are analyzed
>>does affect the query performance. I suggest generating an execution
>>plan at least for the case with hardcoded parameters (and preferably
>>also for the bind-parameter case -- I'm just not certain how one would
>>generate one).
>
>
>>>>We have and at no point does the query not use indices. It first uses
>
> the index on the auto_enter_date column (BTW we changed this bit to use
> BETWEENS for the date - runs faster) and then uses an Intermedia/Full Text
> index to search the complete entry via contains.
>
>>As a final note, if the 'CONTAINS(complete_entry, ?) > 0' does what I
>
> think
>
>>(i.e. selects recors where the 'complete_entry' field contains the desired
>>text), then be careful with this -- it'll always omit any indexes there
>>might be for the 'complete_entry' field (because text indexes in Oracle
>>index from start of the text, and if you match something from within the
>>text, the indexes just cannot be used).
>>
>>Hmm.. now that I think of this; if you have a fixed set of words you'd
>
> like
>
>>to match (so, 'network' and some amount of others), and you don't expect
>>many updates on this field, you might be able to make some experimentation
>>by building function-based indices on
>>CONTAINS(complete_entry, 'word')
>>for each word you'd like to match -- and then using the corresponding
>>fixed-parameter expressions in your query. The timestamps could still
>>use the bind parameter.
>>
>>Leaving the actual SQL query for reference:
>>
>>>$sql="SELECT id, title, to_char(auto_enter_date, 'DD/MM/YYYY') as
>>>auto_enter_date, tracker_ref, SUBSTR(description, 1, 255) AS description
>>
>>>FROM boss_contract_admin WHERE (1=1) AND auto_enter_date >= TO_DATE(?,
>>
>>>'DD/MM/YYYY') AND auto_enter_date <= TO_DATE(?, 'DD/MM/YYYY') AND
>>>CONTAINS(complete_entry, ?) > 0";
>>
>>--
>>Wolf a.k.a. Juha Laiho Espoo, Finland
>>(GC 3.0) GIT d- s+: a C++ ULSH++++$ P++@ L+++ E- W+$@ N++ !K w !O !M V
>> PS(+) PE Y+ PGP(+) t- 5 !X R !tv b+ !DI D G e+ h---- r+++ y++++
>>"...cancel my subscription to the resurrection!" (Jim Morrison)
>
>
>
Dear OP -- your in-line comments are hard to read, because they are
quoted almost like the message you are replying to.
The benefit of bind variables shows up in mainly in the following case:
running repeatedly the same SQL statement with predicate (WHERE clause)
using literal values that change each time, versus running repeatedly
the same SQL statement with bind variables in the predicate (the latter
should be faster).
As Juha implied, bind variables are usually, but not always, better. To
quote from the Oracle "AskTom" expert site (http://tinyurl.com/6nzgp)
"binds are for things that change, if something never changes -- it is
as good as bound (better even)". (that is, use literal values if they
are static or you are only running the query once).
I haven't used Oracle Text ( CONTAINS() function) but maybe you could
try a test where you do not use the Perl DBI bind mechanism for
CONTAINS() function and see if it makes any difference. Upon skimming
the documentation (Oracle Text Application Developer's Guide), it looks
like there are some specific rules pertaining to query performance with
the CONTAINS() function.
--Mark Bole
------------------------------
Date: Thu, 26 Aug 2004 00:56:06 +0200
From: Tore Aursand <tore@aursand.no>
Subject: Re: Parsing FileName for upload
Message-Id: <pan.2004.08.25.22.56.05.213181@aursand.no>
On Wed, 25 Aug 2004 14:08:40 -0700, Tony McGuire wrote:
>> BTW: Why do you need to know _if_ there is a full path present?
> The examples I've found expect to see either '/' or '\'. Then they grab
> the last portion as the file name. [...]
Still, I don't understand. Why can't you use File::Basename? Am I
misunderstanding something here?
--
Tore Aursand <tore@aursand.no>
"Time only seems to matter when it's running out." (Peter Strup)
------------------------------
Date: 26 Aug 2004 01:02:44 GMT
From: ctcgag@hotmail.com
Subject: Re: Performance Improvement of complex data structure (hash of hashes of hashes)
Message-Id: <20040825210244.112$Sc@newsreader.com>
"Scott Gilpin" <sgilpin@gmail.com> wrote:
> Here is the code that I'm using to build up this data structure. I'm
> running perl version 5.8.3 on solaris 8 (sparc processor). The system
> is not memory bound or cpu bound -
If it is not memory or cpu bound, then it must be I/O bound. That is
pretty much the only other choice, right? Are you sure it isn't CPU bound?
The fact that it is the only thing that runs on that machine doesn't mean
it isn't CPU bound.
> ## loop to process each row of the original data
> while(<INDATA>)
> {
> chomp($_);
>
> ## Each row is delimited with |
> my @original_row = split(/\|/o,$_);
} #Let us say you end the loop right there.
#How long does it take to run now?
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: 26 Aug 2004 00:55:03 GMT
From: ctcgag@hotmail.com
Subject: Re: performance surprise -- why?
Message-Id: <20040825205503.150$De@newsreader.com>
Joe Davison <haltingNOSPAM@comcast.net> wrote:
> On 25 Aug 2004, Anno Siegel wrote:
> >
> > That is unexpected. The substitution method must move parts of the
> > string for every match, so I'd expect it to be slower than global
> > matching.
> >
> > I benchmarked both, and also a method based on the index() function.
> > The results show indexing and global matching in the same ballpark,
> > both almost twice as fast as substitution (code appended below):
> >
> > substitute 13.6/s -- -41% -45%
> > indexing 23.1/s 69% -- -7%
> > globmatch 24.8/s 82% 7% --
> >
> > This was on a slow matching with much smaller (200 K) samples, but
> > the dependence on size should be largely linear. Where your
> > quadratic (well, more-than-linear) behavior comes from is anybody's
> > guess.
> >
> > Anno
> >
>
> Thanks.
> I took your program and modified it so that instead of generating the
> string you're matching, it read if from a file, and took the file name
> from the command line -- so I could feed it the same files I'd used
> before.
Let us crawl before we walk. Run the code exactly like Anno posted it.
If globmatch is dogging it when you do that, we know that the problem
lies in your machine or perl installation, not in your Perl program.
(I tested it up to SIZE of 400_000_000, and globmatch always
came out on top)
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: Wed, 25 Aug 2004 11:19:25 +0100
From: Ben Morrow <usenet@morrow.me.uk>
Subject: Re: Perl and DOS I/O
Message-Id: <dm5uv1-6l5.ln1@osiris.mauzo.dyndns.org>
Quoth kumarh@gmail.com (Hemant Kumar):
> I want to start a DOS program from perl, read its output and give it
> further input when the program prompts (based on output of the
> program).
>
> Suppose the DOS program is as follows
>
> #include <stdio.h>
>
> void main() {
> int choice;
> srand();
>
> do {
> printf ("\n%d\n", rand());
> printf ("Do you want to do more ?\n");
> choice = getchar();
> } while ( choice != 'n');
>
> printf("\nGoodbye\n");
> }
>
> I want the perl script to read the results generated. Based on results
> read, give input for getchar. I have tried using system(), Open (this
> only allows me to do either input or output but not both). I don't
> have the source for the DOS program so need to do both input and
> output from Perl.
> Can you suggest a way to get around these limitations ?
The standard answer is IPC::Open2, but I don't know how well this will
work under Win32. You may want to try Win32::Process instead.
IME, getting DOS programs to behave nicely is Very Difficult: it is
usually easier to arrange things so you can just do
system "dosprog.exe < input > output";
and process the results: it looks like this isn't possible in your case,
though.
--
All persons, living or dead, are entirely coincidental.
ben@morrow.me.uk Kurt Vonnegut
------------------------------
Date: Wed, 25 Aug 2004 15:21:05 -0700
From: "Mark" <nospam@thanksanyway.org>
Subject: Resizing JPG images with Perl?
Message-Id: <I9GdnfgJ97VSjbDcRVn-qg@speakeasy.net>
I need to write some Perl code that will resize every JPG
image in a directory. Can someone here suggest a Perl
module that can do this, which isn't too difficult to learn
and which won't give me fits trying to build it on my
Windows XP system?
Thanks
-Mark
------------------------------
Date: Thu, 26 Aug 2004 00:59:13 +0200
From: Tore Aursand <tore@aursand.no>
Subject: Re: Resizing JPG images with Perl?
Message-Id: <pan.2004.08.25.22.59.13.181436@aursand.no>
On Wed, 25 Aug 2004 15:21:05 -0700, Mark wrote:
> I need to write some Perl code that will resize every JPG image in a
> directory. Can someone here suggest a Perl module that can do this [...]
Did you even _try_ to search for a module at CPAN?
<http://www.cpan.org/>
--
Tore Aursand <tore@aursand.no>
"Time only seems to matter when it's running out." (Peter Strup)
------------------------------
Date: 25 Aug 2004 23:00:19 GMT
From: "A. Sinan Unur" <usa1@llenroc.ude.invalid>
Subject: Re: Resizing JPG images with Perl?
Message-Id: <Xns9550C1581CB7Easu1cornelledu@132.236.56.8>
"Mark" <nospam@thanksanyway.org> wrote in news:I9GdnfgJ97VSjbDcRVn-
qg@speakeasy.net:
> I need to write some Perl code that will resize every JPG
> image in a directory. Can someone here suggest a Perl
> module that can do this, which isn't too difficult to learn
> and which won't give me fits trying to build it on my
> Windows XP system?
It seems like you can get Image::Magick from
ppm install http://www.bribes.org/perl/ppm/Image-Magick.ppd
see also:
http://www.bribes.org/perl/ppmdir.html#ap
Sinan
------------------------------
Date: Wed, 25 Aug 2004 18:03:39 -0700
From: "Mark" <nospam@thanksanyway.org>
Subject: Re: Resizing JPG images with Perl?
Message-Id: <EqydnVtWGJV2q7DcRVn-pg@speakeasy.net>
"Tore Aursand" <tore@aursand.no> wrote:
>
> Did you even _try_ to search for a module at CPAN?
> <http://www.cpan.org/>
Yes. That's always the first place I look.
I downloaded two different modules, both of which
failed with compiler errors. That doesn't necessarily
mean that there is a problem with the modules, BUT
I typically don't encounter this problem with modules
I download from CPAN.
-Mark
------------------------------
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 V10 Issue 6912
***************************************
