[28400] in Perl-Users-Digest
Perl-Users Digest, Issue: 9764 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Sep 25 18:06:02 2006
Date: Mon, 25 Sep 2006 15:05:08 -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 Mon, 25 Sep 2006 Volume: 10 Number: 9764
Today's topics:
Re: Checking for empty cell in Excel Spreadsheet <benmorrow@tiscali.co.uk>
Re: does it matter whether References headers are folde <bikikii-admin@example.com>
Re: empty fields <awk@hotmail.com>
Re: Endless loop in Text::Format::reformat() <noreply@gunnar.cc>
Re: Endless loop in Text::Format::reformat() <noreply@gunnar.cc>
Re: Help with "require" and importing constants <benmorrow@tiscali.co.uk>
list vs. array <rks@shell01.TheWorld.com>
Re: list vs. array <David.Squire@no.spam.from.here.au>
Re: list vs. array <mritty@gmail.com>
Re: list vs. array <john@castleamber.com>
Re: list vs. array <uri@stemsystems.com>
Re: passing multiple values into an argument as an arra <jgibson@mail.arc.nasa.gov>
Post to https using perl script <Giridhar.Bandi@gmail.com>
Re: Post to https using perl script usenet@DavidFilmer.com
Re: Post to https using perl script <Giridhar.Bandi@gmail.com>
Re: sort with Perl .. <tfurnitu@cisco.com>
Re: sort with Perl .. <christoph.lamprecht.no.spam@web.de>
Re: sort with Perl .. <tfurnitu@cisco.com>
Re: sort with Perl .. <wahab@chemie.uni-halle.de>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 25 Sep 2006 05:45:24 +0100
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: Checking for empty cell in Excel Spreadsheet
Message-Id: <4g3ku3-0nf.ln1@osiris.mauzo.dyndns.org>
Quoth Bob Walton <see.sig@rochester.rr.com>:
>
> > I am writing the script in a Windows envirement but the script will ber
> > run on Unix with a cron job.
^^^^^^^^^^^
> >
> > I am using the following Perl packages
> >
> > use strict;
> > use Spreadsheet::WriteExcel;
> > use Spreadsheet::ParseExcel;
> > use Win32::Ole;
>
> Can't find that one. Perhaps you mean Win32::OLE?
In either case, no use on Unix...
> > I have tried all the exmaples regarding parsing but can't find anything
> > that will
> > give me the data in a cell or check if the cell is empty before writihg
> > to it.
>
> How about the first example program in the docs for Win32::OLE? It
> looks as if the 'Value' property of the 'Range' class will return undef
> for a cell that never had anything put in it (is that what you mean by
> "empty"?). I tested this via a slight modification to that example.
> Use the defined() function to determine if the value is undef or not.
..so the OP will have to find a way to make SS::ParseExcel tell her what
she needs.
Ben
--
If I were a butterfly I'd live for a day, / I would be free, just blowing away.
This cruel country has driven me down / Teased me and lied, teased me and lied.
I've only sad stories to tell to this town: / My dreams have withered and died.
benmorrow@tiscali.co.uk (Kate Rusby)
------------------------------
Date: 25 Sep 2006 20:15:32 -0000
From: BiKiKii <bikikii-admin@example.com>
Subject: Re: does it matter whether References headers are folded?
Message-Id: <B3N9Q44T38985.635787037@anonymous.poster>
Anonymous <nobody@bikikii.ath.cx.invalid> wrote in
news:1K0ORU6738936.6401388889@anonymous.poster:
> In article <2c0c58bebd78da6b816987b210060211@dizum.com>
> Nomen Nescio <nobody@dizum.com> wrote:
>>
>> RFC 1036 says the message-IDs in the References header should be
>> separated by a space, but it's quite common to see them folded
>> (separated by a newline and some spaces or a newline and a tab).
>>
>> Does it matter?
>>
>> Is either folded or unfolded better or worse than the other?
>
> It shouldn't matter, but there are times when it matters to some
> home-grown applications. For example I've found that the BigApple
> mail2news software, currently run by Bikikii I think, barfs on folded
> headers by only including the first line. Other times we've seen
> non-folded headers truncated by a limit on line length.
>
> What to do.
>
>
BiKiKii M2N routine includes BA posting software.
Was not aware of folding References issue.
Will look into fix for folded Ref header within BiKiKii's M@N routine.
...apparently she is in need of swift kick (kickstart) too
BiKiKii
------------------------------
Date: Mon, 25 Sep 2006 21:39:37 +0200
From: Awkish <awk@hotmail.com>
Subject: Re: empty fields
Message-Id: <45183079$0$28396$ba620e4c@news.skynet.be>
Hi thanks for all your insights, you're very helpful.
------------------------------
Date: Mon, 25 Sep 2006 20:36:21 +0200
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: Endless loop in Text::Format::reformat()
Message-Id: <4nqlt6Fbbkh1U1@individual.net>
Brian McCauley wrote:
> Brian McCauley wrote:
>>
>>if ( $line =~ /^(.{$min,$opt1}) (.*)/ ||
>> $line =~ /^(.{$min,$max1}) (.*)/ || $line =~ /^(.{$min,})? (.*)/ )
>>{
>> push @output, "$1 ";
>> $line = $2;
>>}
>>
>>The way that $1 can be undef is if the first to two patterns don't
>>match and the third pattern matches but the optional subexpression does
>>not. This will happen if the first character of $line is a space.
>>
>>I can't immediately see the cause of the endless looping but there's
>>your warning.
>
> Got it...
>
> Look at _stuff.
>
> sub _stuff {
> my ($text, $num_quotes) = @_;
> if ($text =~ /^ / || $text =~ /^>/ || $text =~ /^From / ||
> $num_quotes > 0) {
> return " $text";
> }
> $text;
> }
>
> If $num_quotes=0 and $line starts with a space then the line
>
> $line = '>' x $num_quotes . _stuff($line, $num_quotes);
>
> Simply prepends a space to $line and then the code quoted in my
> previous message simply strips of a leading space.
No, in that case it strips off both the leading spaces, since $min is 1,
so the contents of $line won't be identical at the next iteration of the
while loop.
> There's your infinite loop.
Unfortunately I think it's more subtle than that. Please note that
CGI::ContactForm has worked just fine for about 3.5 years, and the
infinite loop problem has just appeared twice. I suspect it happened
when some spam robot invoked the script. Maybe I'd better concentrate on
preventing such robots from successfully submitting their crap...
Anyway, thanks for trying!
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: Mon, 25 Sep 2006 20:36:23 +0200
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: Endless loop in Text::Format::reformat()
Message-Id: <4nqlt8Fbbkh1U2@individual.net>
Bob Walton wrote:
> Hmmm...almost certainly this is happening because $1 is undef at line
> 600, since that is the only concatenation (interpolation actually does a
> concatenation). Looking at your code:
>
> ...
> 595:} elsif ( $line =~ /^(.{$min,$opt1}) (.*)/ ||
> 596: $line =~ /^(.{$min,$max1}) (.*)/ ||
> $line =~ /^(.{$min,})? (.*)/ ) {
> 597: # 1. Try to find a string as long as opt_length.
> 598: # 2. Try to find a string as long as max_length.
> 599: # 3. Take the first word.
> 600: push @output, "$1 ";
> ...
>
> it looks like the third alternative could match with $1 undef if $line
> started with a space character and there were no other space characters
> in $line (in which case the first two alternatives would fail, assuming
> $min>0). Is that a possibility?
Don't think so. Because of this line:
$line = '>' x $num_quotes . _stuff($line, $num_quotes);
$line will not begin with a single space when the regex at line 596 is run.
See also reply to Brian in this thread.
Thanks for trying, Bob!
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: Mon, 25 Sep 2006 05:47:17 +0100
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: Help with "require" and importing constants
Message-Id: <lj3ku3-0nf.ln1@osiris.mauzo.dyndns.org>
Quoth news@lawshouse.org:
> There's an easy answer to this, I'm sure, but an hour of Googling and
> experimenting has not led me to it. Can someone help?
>
> I need to include the module Win32::File if my code is running on
> Windows, but not on Linux. Job for the "require" statement, I thought.
> The module exports a set of constants (ARCHIVE being my example), but
> not, apparently, when "require" is used. How do I code this simple thing?
See if.pm on CPAN.
Ben
--
I must not fear. Fear is the mind-killer. I will face my fear and
I will let it pass through me. When the fear is gone there will be
nothing. Only I will remain.
benmorrow@tiscali.co.uk Frank Herbert, 'Dune'
------------------------------
Date: Mon, 25 Sep 2006 18:32:51 +0000 (UTC)
From: Robert Suyemoto <rks@shell01.TheWorld.com>
Subject: list vs. array
Message-Id: <ef97cj$89a$1@pcls6.std.com>
Hello.
I have recently heard the claim that in Perl,
"list" and "array" are two separate things, in that
one is of fixed length and the other isn't.
(Such that for the fixed length type, you could not
use push or pop on it.)
I have never heard of anything like this, but in
the interest of keeping an open mind, is there any
context where this would be true?
Thanks very much,
R.
------------------------------
Date: Mon, 25 Sep 2006 19:38:43 +0100
From: David Squire <David.Squire@no.spam.from.here.au>
Subject: Re: list vs. array
Message-Id: <ef97nj$4rl$1@gemini.csx.cam.ac.uk>
Robert Suyemoto wrote:
> Hello.
>
> I have recently heard the claim that in Perl,
> "list" and "array" are two separate things, in that
> one is of fixed length and the other isn't.
>
> (Such that for the fixed length type, you could not
> use push or pop on it.)
>
> I have never heard of anything like this,
Gee. You could have tried reading the documentation that comes with
Perl. When I type "perldoc -q list vs array", the third entry is
entitled "What is the difference between a list and an array?". The
first two sentences of that entry are "An array has a changeable length.
A list does not."
That is not the only difference. I suggest that you read the documentation.
DS
------------------------------
Date: 25 Sep 2006 11:46:59 -0700
From: "Paul Lalli" <mritty@gmail.com>
Subject: Re: list vs. array
Message-Id: <1159210019.360251.258410@i42g2000cwa.googlegroups.com>
Robert Suyemoto wrote:
> I have recently heard the claim
you mean the fact.
> that in Perl,
> "list" and "array" are two separate things, in that
> one is of fixed length and the other isn't.
One is a constant (or literal), one is a variable.
> (Such that for the fixed length type, you could not
> use push or pop on it.)
>
> I have never heard of anything like this, but in
> the interest of keeping an open mind, is there any
> context where this would be true?
This is a list: ('foo', 'bar', 'baz')
This is an array: @stuff;
An array is a variable that contains a list of scalars. It is (mostly)
analogous to the difference between a scalar value, like 'Hello World',
and the variable $phrase which might contain it. You can change
$phrase by concatenating to it or using a s/// operator, but you can't
change an actual literal string:
#this works, obviously:
$string =~ s/Hello/Goodbye/;
#but this gives "Can't modify constant item in substitution (s///) "
'Hello World' =~ s/Hello/Goodbye/;
Similarly,
#this works
push @stuff, 'bam';
#but this gives "Type of arg 1 to push must be array (not constant
item)"
push ('foo', 'bar', 'baz'), 'bam';
See also: perldoc -q difference
Found in /opt2/Perl5_8_4/lib/perl5/5.8.4/pod/perlfaq4.pod
What is the difference between a list and an array?
Paul Lalli
------------------------------
Date: 25 Sep 2006 18:59:12 GMT
From: John Bokma <john@castleamber.com>
Subject: Re: list vs. array
Message-Id: <Xns98498E9FDE571castleamber@130.133.1.4>
Robert Suyemoto <rks@shell01.TheWorld.com> wrote:
> Hello.
>
> I have recently heard the claim that in Perl,
> "list" and "array" are two separate things,
perldoc -q list
--
John Experienced Perl programmer: http://castleamber.com/
Perl help, tutorials, and examples: http://johnbokma.com/perl/
------------------------------
Date: Mon, 25 Sep 2006 15:18:41 -0400
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: list vs. array
Message-Id: <x73bafzre6.fsf@mail.sysarch.com>
>>>>> "PL" == Paul Lalli <mritty@gmail.com> writes:
PL> Robert Suyemoto wrote:
>> I have recently heard the claim
PL> you mean the fact.
>> that in Perl,
>> "list" and "array" are two separate things, in that
>> one is of fixed length and the other isn't.
PL> One is a constant (or literal), one is a variable.
i would say a list is a value (could be generated from a func call or
expression) and an array is a variable which can hold a list.
other major points i use to explain this:
lists live on the stack and are live only during that expression.
arrays live on the heap (allocated) and can be alive as long as you want
list have no way to be referenced later
arrays can have references and be anonymous and used in data trees
lists can never have a name
arrays could have names
lists are fixed size since they are the result of an expression
arrays can have their size changed since they are in variables
lists and arrays can be indexed and sliced. this is about the only
operation common to both.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Mon, 25 Sep 2006 12:24:41 -0700
From: Jim Gibson <jgibson@mail.arc.nasa.gov>
Subject: Re: passing multiple values into an argument as an array ?
Message-Id: <250920061224410056%jgibson@mail.arc.nasa.gov>
In article <g51ah2pbkkam5l7cbttqsjonqdnjptmpm6@4ax.com>, Michele Dondi
<bik.mido@tiscalinet.it> wrote:
> On 22 Sep 2006 20:43:51 -0700, "Jack" <jack_posemsky@yahoo.com> wrote:
>
> >I want to be able to say
> >perl -f value1 value2 ..valueN -v value value2 ..valueN
> >
> >and store the values of -f in a single array, and -v also (and the
> >number of passed values could vary !)
>
> You DON'T want that. You want
>
> perl yourscript -f whatever -v whatever
>
> Just use Getopt::* and invent a sensible "format" for whatever, i.e.
> comma separated or value separated, and then parse whatever
> accordingly, i.e. just split() it.
I am not sure why you advise against wanting multiple values for an
argument. I have several programs where this feature is quite handy.
In any case, multiple values are supported by Getopt::Long if you are
willing to use multiple entries:
prog -f value1 -f value2
See 'perldoc Getopt::Long' and search for "Options with multiple
values":
GetOptions('f' => \@f_values);
Otherwise, use comma-separated values and split:
GetOptions( 'f' => \$f_string);
@f_values = split(/,/,$f_string);
Posted Via Usenet.com Premium Usenet Newsgroup Services
----------------------------------------------------------
** SPEED ** RETENTION ** COMPLETION ** ANONYMITY **
----------------------------------------------------------
http://www.usenet.com
------------------------------
Date: 25 Sep 2006 13:28:32 -0700
From: "cardsharper" <Giridhar.Bandi@gmail.com>
Subject: Post to https using perl script
Message-Id: <1159216111.951188.222820@i42g2000cwa.googlegroups.com>
Hi
I wanted to post / upload a file to one of our https server
what i am trying to do here is trying to loging to the
https server using the user credentials . then trying to
post a file to another url which in general accepts post
after loging in .
i was able to successfully login, but unable to post
is this something todo with cookies ?
the error its throughing is "302 Found"
------------------here is the code --------------------------
#!/usr/bin/perl
use LWP;
my $url = 'https://192.168.1.3'; # Yes, HTTPS!
my $browser = LWP::UserAgent->new;
my $response = $browser->get($url);
die "Error at $url\n ", $response->status_line, "\n Aborting"
unless $response->is_success;
print "Whee, it worked! I got that ",
$response->content_type, " document!\n";
my $response1 = $browser->post( $url,
[
number => xxxxx,
password => yyyyyyy,
],
);
my $url2 = 'https://192.168.1.3/postfile';
my $response2 = $browser->post ( $url2,
[
filename =>['/tmp/abc.txt'],
],
);
die "Error at $url2\n ", $response2->status_line, "\n Aborting"
unless $response2->is_success;
------------------------------
Date: 25 Sep 2006 13:41:44 -0700
From: usenet@DavidFilmer.com
Subject: Re: Post to https using perl script
Message-Id: <1159216904.776487.136240@d34g2000cwd.googlegroups.com>
cardsharper wrote:
> i was able to successfully login, but unable to post
> is this something todo with cookies ?
If you suspect a problem with cookies, did you read the LWP::UserAgent
docs to see how cookies are handled? It says:
>> The default is to have no cookie_jar
If you site requires cookies, and you don't enable a cookie-jar, how
could that work?
FWIW, most folks would do this type of thing (these days) with
WWW::Mechanize (which is built on LWP but is often preferable - and it
furnishes a cookie-jar (memory resident) by default.
--
David Filmer (http://DavidFilmer.com)
------------------------------
Date: 25 Sep 2006 14:55:03 -0700
From: "cardsharper" <Giridhar.Bandi@gmail.com>
Subject: Re: Post to https using perl script
Message-Id: <1159221303.081981.221910@d34g2000cwd.googlegroups.com>
Well i did look at cookies as soon as i posted so tried the following
unable to see the file uploaded how can i debug this
i am pretty new to http protocol ..
#!/usr/bin/perl
use Data::Dumper;
use LWP::UserAgent;
use HTTP::Cookies;
my $https_login = 'https://192.168.1.3';
my $https_post = 'https://192.168.1.3/post';
my $https_user = 'xxxxx';
my $https_pass = ''yyyyy;
&postHTTPS();
sub postHTTPS
{
#secure login
my $ua = LWP::UserAgent->new();
$ua->protocols_allowed( [ 'https'] );
$ua->cookie_jar(HTTP::Cookies->new(file =>
".cookies.txt",autosave => 1));
my $response = $ua->post($https_login, [ 'user' =>
"$https_user",'password' => "$https_pass", 'switch' => 'Log In' ] );
#print Dumper($response);
if ($response->is_error())
{
printf " %s\n", $response->status_line;
print "https request error!\n";
} else {
my $content = $response->content();
print "$content\n";
}
$response = $ua->post($https_post, [
filename =>['/tmp/abc.txt'],
], );
if ($response->is_error())
{
printf " %s\n", $response->status_line;
print "https request error!\n";
} else {
my $content = $response->content();
print "$content\n";
}
}
usenet@DavidFilmer.com wrote:
> cardsharper wrote:
> > i was able to successfully login, but unable to post
> > is this something todo with cookies ?
>
> If you suspect a problem with cookies, did you read the LWP::UserAgent
> docs to see how cookies are handled? It says:
> >> The default is to have no cookie_jar
>
> If you site requires cookies, and you don't enable a cookie-jar, how
> could that work?
>
> FWIW, most folks would do this type of thing (these days) with
> WWW::Mechanize (which is built on LWP but is often preferable - and it
> furnishes a cookie-jar (memory resident) by default.
>
> --
> David Filmer (http://DavidFilmer.com)
------------------------------
Date: Mon, 25 Sep 2006 14:20:25 -0700
From: Taher <tfurnitu@cisco.com>
Subject: Re: sort with Perl ..
Message-Id: <45184819.EFE5DC1B@cisco.com>
I am not fully sure what top-posting means ... ?
I am not a regular NewsGroup user and have recently started checking postings
here when I get the time to improve my Perl .
(I guess there is some sort of guidleines for this newsgroup ? If someone can
point it out to me I shall try to follow it more carefully in future )
anno4000@radom.zrz.tu-berlin.de wrote:
> DJ Stunks <DJStunks@gmail.com> wrote in comp.lang.perl.misc:
> >
> > Taher wrote:
> > > Wow .. that was quick ... :-) .
> > >
> > > I was struggling to get this .. was not getting the right mix of using
> > > split with arrays ..
> > >
> > > Thanks to all Perl gurus ... ( learnt a lot today :-) )
> >
> > I have the sinking feeling you "learnt" that you can occasionally get
> > guys to write code for you at c.l.p.m.
>
> ...and get away with top-posting to boot!
>
> Anno
------------------------------
Date: Mon, 25 Sep 2006 23:26:24 +0200
From: Ch Lamprecht <christoph.lamprecht.no.spam@web.de>
Subject: Re: sort with Perl ..
Message-Id: <ef9hhv$ahl$2@online.de>
Taher wrote:
> I am not fully sure what top-posting means ... ?
>
> I am not a regular NewsGroup user and have recently started checking postings
> here when I get the time to improve my Perl .
>
> (I guess there is some sort of guidleines for this newsgroup ? If someone can
> point it out to me I shall try to follow it more carefully in future )
>
http://en.wikipedia.org/wiki/Top-posting
HTH,
Christoph
--
perl -e "print scalar reverse q/ed.enilno@ergn.l.hc/"
------------------------------
Date: Mon, 25 Sep 2006 14:26:59 -0700
From: Taher <tfurnitu@cisco.com>
Subject: Re: sort with Perl ..
Message-Id: <451849A3.FF6DAC46@cisco.com>
"A. Sinan Unur" wrote:
> "Mumia W. (reading news)" <paduille.4058.mumia.w@earthlink.net> wrote in
> news:BNyQg.14545$bM.5257@newsread4.news.pas.earthlink.net:
>
> > On 09/21/2006 09:19 AM, David Squire wrote:
> >> Mumia W. (reading news) wrote:
> >>> [ snipped ]
> >>
> >> What happened to waiting for the OP to at least make an attempt? If
> >> we're just doing folks work for them today, here's a moduleless
> >> version: [...]
> >
> > Yes, I should've waited for the OP's version of the program. I was
> > just excited about find out about Sort::Fields :-)
>
> I have been fairly busy lately, and by the time I am able to read the
> group, all questions have been answered adequately. But, this thread
> really rubbed me the wrong way.
>
> Mumia:
>
> Please choose a posting address and stick with it. I don't want to have
> to re-plonk you every couple of months.
>
> Yours is exactly the kind of behavior that keeps people coming back for
> 'gimme's.
>
Sinan ,
>
> Since Taher's only other response in this thread did not show that he
> paid attention to anyone other than the one who gave him the fish, I
> won't be seeing his future messages either.
I have paid attention to all the messages in the thread ( just that I havent
replied to each one of them )
I dont know why people are annoyed by my request here ??? I came across a
problem which I could not solve ( after spending some time on it ) , and so
I though of seeing if anyone here could help with .
I guess I am missing something here ( I have just started visiting this
newsgroup, and check only once in a while ) ...
I though this newsgroup was for people to improve and learned people to
help others improve their Perl...... ??
Taher .
>
>
> Sinan
> --
> A. Sinan Unur <1usa@llenroc.ude.invalid>
> (remove .invalid and reverse each component for email address)
>
> comp.lang.perl.misc guidelines on the WWW:
> http://augustmail.com/~tadmc/clpmisc/clpmisc_guidelines.html
------------------------------
Date: Mon, 25 Sep 2006 23:44:27 +0200
From: Mirco Wahab <wahab@chemie.uni-halle.de>
Subject: Re: sort with Perl ..
Message-Id: <ef9isa$ns5$1@mlucom4.urz.uni-halle.de>
Thus spoke Taher (on 2006-09-25 23:26):
> I though this newsgroup was for people to improve and learned people to
> help others improve their Perl...... ??
<std_prejudice>
No, this is the Perl newsgroup. Here you'll
get stomped just for knowing nothing and
beaten for making small mistakes.
</std_prejudice>
Here be the dragons.
For Perl, you have to bear the pain
and smell the jackboot. This is an
important part of your learning
experience. The alternative: get
praised for making stupid things? ;-)
In this sense, the Perl newsgroup is possibly very
much like the real life out there. On the other
hand, you'll be sometimes commended for making
strong achievements.
What do you want?
Regards
Mirco
------------------------------
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 9764
***************************************
