[28421] in Perl-Users-Digest
Perl-Users Digest, Issue: 9785 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Oct 1 03:05:45 2006
Date: Sun, 1 Oct 2006 00:05:05 -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 Sun, 1 Oct 2006 Volume: 10 Number: 9785
Today's topics:
[xchat] fetching own text - $_[0] not a string? <user@domain.invalid>
Re: [xchat] fetching own text - $_[0] not a string? <see.sig@rochester.rr.com>
Re: Computer Language Popularity Trend <arne@vajhoej.dk>
Re: FAQ 3.24 Why don't Perl one-liners work on my DOS/M <sherm@Sherm-Pendleys-Computer.local>
Re: FAQ 3.24 Why don't Perl one-liners work on my DOS/M <brian.d.foy@gmail.com>
Re: FAQ 4.34 How do I extract selected columns from a s <brian.d.foy@gmail.com>
Re: fetching own text - $_[0] not a string? <mritty@gmail.com>
I can't think of a thing to say robic0
Re: My first socket question xhoster@gmail.com
Re: need syntax help <see.sig@rochester.rr.com>
new CPAN modules on Sun Oct 1 2006 (Randal Schwartz)
Re: Questions about Inline::C <benmorrow@tiscali.co.uk>
Re: Questions about Inline::C xhoster@gmail.com
Re: remove last 10 lines of all files in a directory <ced@blv-sam-01.ca.boeing.com>
Re: remove last 10 lines of all files in a directory <someone@example.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sun, 01 Oct 2006 01:43:03 +0200
From: Vedran <user@domain.invalid>
Subject: [xchat] fetching own text - $_[0] not a string?
Message-Id: <efmve2$t2t$1@news1.carnet.hr>
Hello,
I am writing an xchat script, here is the part of code making me problems:
IRC::add_command_handler("", "enc");
...
sub enc {
my $target = IRC::get_info(2);
my $input = $_[0];
# print "-$input-\n"; prints for eg. -bla-
but:
my $ciphertext = $cipher->encrypt($$input);
won't work
but if I write:
my $input = "bla";
my $ciphertext = $cipher->encrypt($$input);
then It works.
What is the difference betweek $input = $_[0] and $input = "bla" ?
Aren't those bot scalars?
How can I do the $_[0] to be the same type of other string?
Thanks Smile
PS. I've tried with $_[0][0] $$input and similar but they are all empty Sad
------------------------------
Date: Sun, 01 Oct 2006 01:52:27 GMT
From: Bob Walton <see.sig@rochester.rr.com>
Subject: Re: [xchat] fetching own text - $_[0] not a string?
Message-Id: <vbFTg.51052$uH6.37353@twister.nyroc.rr.com>
Vedran wrote:
> Hello,
> I am writing an xchat script, here is the part of code making me problems:
>
You didn't show your complete script, but it is probable you didn't
use strict;
use warnings;
Let Perl give you all the help it can -- use these.
> IRC::add_command_handler("", "enc");
> ...
> sub enc {
> my $target = IRC::get_info(2);
> my $input = $_[0];
>
> # print "-$input-\n"; prints for eg. -bla-
>
> but:
> my $ciphertext = $cipher->encrypt($$input);
------------------------------------^^
This construction is known as a symbolic reference, and is generally a
BAD IDEA. That's why it won't work under use strict;, which you would
have found out if you had used it. Furthermore, symbolic references
only work with global variables, and will not function with lexical
variables. You fail to show whether $bla is global or lexical -- if
what you show "works", then $bla must be global.
> won't work
What exactly "won't work"? Does it generate an error? If so, what is
the error (exactly -- cut and paste it). What did you expect it to do,
and what exactly did it do? And why do you think that was wrong? Cite
the documentation that says it should do what you expected.
>
> but if I write:
> my $input = "bla";
> my $ciphertext = $cipher->encrypt($$input);
> then It works.
I'm not sure what you mean by "works". If everything else is the same,
it will give the same result regardless of how $input received the value
'bla'. Does $bla have the same value in both cases?
>
> What is the difference betweek $input = $_[0] and $input = "bla" ?
> Aren't those bot scalars?
There will be no difference if $_[0] has the string 'bla' as its value.
>
> How can I do the $_[0] to be the same type of other string?
Please rephrase -- that's gibberish.
>
> Thanks Smile
>
> PS. I've tried with $_[0][0] $$input and similar but they are all empty Sad
Don't just make stuff up. Read and understand the docs, use the debug
switch, etc.
If you show us a *complete* but *short and to-the-point* program that
illustrates your problem and that *anyone can copy/paste/run*, perhaps
someone could help. It would also be good if you stated what you are
really trying to accomplish. Why, for example, are attempting to use
symbolic references -- for what purpose -- any why wouldn't you use a
hash instead?
Have you read the posting guidelines for this newsgroup?
--
Bob Walton
Email: http://bwalton.com/cgi-bin/emailbob.pl
------------------------------
Date: Sat, 30 Sep 2006 16:04:39 -0400
From: =?UTF-8?B?QXJuZSBWYWpow7hq?= <arne@vajhoej.dk>
Subject: Re: Computer Language Popularity Trend
Message-Id: <o5ATg.1095$2g4.1043@dukeread09>
Danno wrote:
> Xah Lee wrote:
>> This page gives a visual report of computer languages's popularity, as
>> indicated by their traffic level in newsgroups. This is not a
>> comprehensive or fair survey, but does give some indications of
>> popularity trends.
>>
>> http://xahlee.org/lang_traf/index.html
>
> Wow, java is a low level industrial language? ;)
Compared to Python, Ruby etc. - yes.
Arne
------------------------------
Date: Sat, 30 Sep 2006 09:25:33 -0400
From: Sherm Pendley <sherm@Sherm-Pendleys-Computer.local>
Subject: Re: FAQ 3.24 Why don't Perl one-liners work on my DOS/Mac/VMS system?
Message-Id: <m2lko1wkoi.fsf@Sherm-Pendleys-Computer.local>
Justin C <justin@purestblue.com> writes:
> On 2006-09-30 02:03:02 +0100, PerlFAQ Server <brian@stonehenge.com> said:
>> 3.24: Why don't Perl one-liners work on my DOS/Mac/VMS system?
>>
>> The problem is usually that the command interpreters on those systems
>> have rather different ideas about quoting than the Unix shells under
>> which the one-liners were created. On some systems, you may have to
>> change single-quotes to double ones, which you must *NOT* do on Unix or
>> Plan9 systems. You might also have to change a single % to a %%.
>>
>> For example:
>>
>> # Unix
# Unix (including Mac OS X)
>> perl -e 'print "Hello world\n"'
>>
>> # DOS, etc.
>> perl -e "print \"Hello world\n\""
>>
>> # Mac
# MacPerl (for "classic" MacOS)
>> print "Hello world\n"
>> (then Run "Myscript" or Shift-Command-R)
>
> I'm not sure this is still correct... though I'm not in a position to
> thoroughly check it (not enough Perl knowledge / experience and only
> just got my Mac).
>
> I ran:
> perl -e 'print "hello world\n"'
>
> and got output as expected. Maybe the FAQ is based on pre OS X behaviour?
It is. Suggested changes above.
sherm--
--
Web Hosting by West Virginians, for West Virginians: http://wv-www.net
Cocoa programming in Perl: http://camelbones.sourceforge.net
------------------------------
Date: Sat, 30 Sep 2006 14:55:35 -0500
From: brian d foy <brian.d.foy@gmail.com>
Subject: Re: FAQ 3.24 Why don't Perl one-liners work on my DOS/Mac/VMS system?
Message-Id: <300920061455351140%brian.d.foy@gmail.com>
In article <m2lko1wkoi.fsf@Sherm-Pendleys-Computer.local>, Sherm
Pendley <sherm@Sherm-Pendleys-Computer.local> wrote:
> Justin C <justin@purestblue.com> writes:
> > On 2006-09-30 02:03:02 +0100, PerlFAQ Server <brian@stonehenge.com> said:
> >> 3.24: Why don't Perl one-liners work on my DOS/Mac/VMS system?
> > Maybe the FAQ is based on pre OS X behaviour?
>
> It is. Suggested changes above.
Fixed. Thanks. :)
--
Posted via a free Usenet account from http://www.teranews.com
------------------------------
Date: Sat, 30 Sep 2006 15:18:23 -0500
From: brian d foy <brian.d.foy@gmail.com>
Subject: Re: FAQ 4.34 How do I extract selected columns from a string?
Message-Id: <300920061518233209%brian.d.foy@gmail.com>
In article <290920061455577201%jgibson@mail.arc.nasa.gov>, Jim Gibson
<jgibson@mail.arc.nasa.gov> wrote:
> In article <6870v3-sje.ln1@blue.stonehenge.com>, PerlFAQ Server
> <brian@stonehenge.com> wrote:
> > 4.34: How do I extract selected columns from a string?
> Wouldn't it be a good idea to mention "split" here?
Yes, I could do that. I won't use a comma-separated value example,
though, since that format is a bit more tricky. Still, thanks for the
examples. :)
--
Posted via a free Usenet account from http://www.teranews.com
------------------------------
Date: 30 Sep 2006 18:19:12 -0700
From: "Paul Lalli" <mritty@gmail.com>
Subject: Re: fetching own text - $_[0] not a string?
Message-Id: <1159665552.410806.227450@e3g2000cwe.googlegroups.com>
Vedran wrote:
> Hello,
> I am writing an xchat script, here is the part of code making me problems:
>
> IRC::add_command_handler("", "enc");
> ...
> sub enc {
> my $target = IRC::get_info(2);
> my $input = $_[0];
>
> # print "-$input-\n"; prints for eg. -bla-
>
> but:
> my $ciphertext = $cipher->encrypt($$input);
> won't work
One would hope not. This is using a symbolic reference. You are
actually trying to pass the variable $bla into this method. Does such
a variable exist?
> but if I write:
> my $input = "bla";
> my $ciphertext = $cipher->encrypt($$input);
> then It works.
Then somewhere you defined a global variable $bla.
Please understand you should NOT be using symbolic references, and most
likely should not be using global variables either.
Please post a SHORT but COMPLETE script that demonstrates both the
"success" and "failure" cases, so that we can help you figure out how
to do your task correctly.
Paul Lalli
------------------------------
Date: Sat, 30 Sep 2006 23:07:36 -0700
From: robic0
Subject: I can't think of a thing to say
Message-Id: <comuh2pv9jn4l8mtmleqdn3tsila6unm88@4ax.com>
------------------------------
Date: 01 Oct 2006 05:40:31 GMT
From: xhoster@gmail.com
Subject: Re: My first socket question
Message-Id: <20061001014133.039$1t@newsreader.com>
Michele Dondi <bik.mido@tiscalinet.it> wrote:
> This is my first C/S socket question, so bear with me if the answer is
C/S?
> obvious or simple. I want to write a program that behaves like a
> server if called with no arguments and like a client if supplied some,
> sending commands based on those arguments to the server and waiting
> for a reply. The following minimal example *does* work for me:
>
...
>
> while ( my $client=$server->accept ) {
...
> }
> close $server or die "Cannot stop server mode: $!\n";
For what is worth, I do not like this idiom, despite using it myself
on occasion. "accept" should never return false, except on error.
If the loop is going to be effectively an infinite loop, it should look
like one.
while (1) {
my $client = $server->accept or die $!;
# other stuff here
};
> __END__
>
> Point is, in the *real* application I have in mind, when in server
> mode the program will be doing other stuff as well. To be fair, its
> main purpose will be doing other stuff. The C/S ipc's purpose will be
> exactly of gathering information on how other stuff is being done or
> influence how it is. Thus the actual code may be of the form
>
> while (1) {
> do_stuff;
> ???
> }
>
> where ??? is the code to handle incoming requests. What should I put
> there?
That depends on what you want to do. Most likely you need a different
structure, rather than just substituting the ???. Do you want to do_stuff
only once per control/inquiry connection (that is perhaps what your
proposed structure suggests)? Do you want to do_stuff as long as there is
not a pending control/inquiry connection? Can you suspeding do(ing)_stuff
while handling an incoming control/inquiry connection, or do you need to
handle stuff and connections concurrently?
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: Sun, 01 Oct 2006 02:04:24 GMT
From: Bob Walton <see.sig@rochester.rr.com>
Subject: Re: need syntax help
Message-Id: <ImFTg.51053$uH6.44055@twister.nyroc.rr.com>
ToddAndMargo@gbis.com wrote:
...
> Syntax question: how do I enter "mt -f /dev/st0 status; grep -i
> online"
> into the "command" field below? Do I put quotes around it?
Um, it already has quotes around it as you show it above. That should
do nicely, except you probably don't want the newline.
> How do I separate my command from the "userid" and
> "password"? I am concerned that the line below will
> confuse "-f" for the userid, etc..
Um, with the commas shown. You're making it too hard. I assume the
arguments are all supposed to be strings, so each argument should be an
expression which evaluates to a string. Specifically they should not be
barewords as shown in the description below. An example might be:
($rc,@output)=rexec('my_host',
'mt -f /dev/st0 status; grep -i online',
'my_userID','my_password');
or, if those things were all defined as variables:
($rc,@output)=rexec($host,$command,$userID,$pw);
> use Net::Rexec 'rexec';
> ($rc, @output) = rexec(host, command, [userid, [password]]);
...
> --T
--
Bob Walton
Email: http://bwalton.com/cgi-bin/emailbob.pl
------------------------------
Date: Sun, 1 Oct 2006 04:42:08 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Sun Oct 1 2006
Message-Id: <J6Fx28.MLG@zorch.sf-bay.org>
The following modules have recently been added to or updated in the
Comprehensive Perl Archive Network (CPAN). You can install them using the
instructions in the 'perlmodinstall' page included with your Perl
distribution.
Best-0.08
http://search.cpan.org/~gaal/Best-0.08/
Fallbackable module loader
----
Best-0.09
http://search.cpan.org/~gaal/Best-0.09/
Fallbackable module loader
----
Best-0.10
http://search.cpan.org/~gaal/Best-0.10/
Fallbackable module loader
----
CGI-URI2param-1.01
http://search.cpan.org/~domm/CGI-URI2param-1.01/
convert parts of an URL to param values
----
CPAN-1.88_51
http://search.cpan.org/~andk/CPAN-1.88_51/
query, download and build perl modules from CPAN sites
----
CPAN-IndexPod-0.24
http://search.cpan.org/~lbrocard/CPAN-IndexPod-0.24/
Index the POD from an unpacked CPAN
----
CPAN-Test-Dummy-Perl5-Build-1.02
http://search.cpan.org/~andk/CPAN-Test-Dummy-Perl5-Build-1.02/
CPAN Test Dummy
----
CPAN-Test-Dummy-Perl5-Make-1.03
http://search.cpan.org/~andk/CPAN-Test-Dummy-Perl5-Make-1.03/
CPAN Test Dummy
----
CPAN-Test-Dummy-Perl5-Make-Zip-1.02
http://search.cpan.org/~andk/CPAN-Test-Dummy-Perl5-Make-Zip-1.02/
CPAN Test Dummy
----
Class-DispatchToAll-0.11
http://search.cpan.org/~domm/Class-DispatchToAll-0.11/
Dispatch a method call to all inherited methods
----
Class-MOP-0.35
http://search.cpan.org/~stevan/Class-MOP-0.35/
A Meta Object Protocol for Perl 5
----
Config-Tiny-2.10
http://search.cpan.org/~adamk/Config-Tiny-2.10/
Read/Write .ini style files with as little code as possible
----
Crypt-Pwsafe-1.001
http://search.cpan.org/~tangent/Crypt-Pwsafe-1.001/
Perl extension for decrypting and parsing PasswordSafe V3 data files
----
Games-Sudoku-General-0.007
http://search.cpan.org/~wyant/Games-Sudoku-General-0.007/
Solve sudoku-like puzzles.
----
Image-Info-1.23
http://search.cpan.org/~tels/Image-Info-1.23/
Extract meta information from image files
----
JSAN-Parse-FileDeps-1.00
http://search.cpan.org/~adamk/JSAN-Parse-FileDeps-1.00/
Parse file-level dependencies from JSAN modules
----
LJ-Schedule-0.6
http://search.cpan.org/~kitty/LJ-Schedule-0.6/
A quick and dirty schedule-posting tool for LiveJournal.
----
LWP-Online-0.01
http://search.cpan.org/~adamk/LWP-Online-0.01/
Does your process have access to the web
----
Lemonldap-NG-Handler-0.1
http://search.cpan.org/~guimard/Lemonldap-NG-Handler-0.1/
Perl extension for building a Lemonldap compatible handler
----
Lucene-0.02
http://search.cpan.org/~tbusch/Lucene-0.02/
API to the C++ port of the Lucene search engine
----
Moose-0.13
http://search.cpan.org/~stevan/Moose-0.13/
A complete modern object system for Perl 5
----
SUPER-1.15
http://search.cpan.org/~chromatic/SUPER-1.15/
control superclass method dispatch
----
Snort-Rule-1.04
http://search.cpan.org/~saxjazman/Snort-Rule-1.04/
Perl extension for dynamically building snort rules
----
vars-global-v0.0.1
http://search.cpan.org/~polettix/vars-global-v0.0.1/
try to make global variables a little safer
----
xul2ppt_mec-0.01
http://search.cpan.org/~sal/xul2ppt_mec-0.01/
If you're an author of one of these modules, please submit a detailed
announcement to comp.lang.perl.announce, and we'll pass it along.
This message was generated by a Perl program described in my Linux
Magazine column, which can be found on-line (along with more than
200 other freely available past column articles) at
http://www.stonehenge.com/merlyn/LinuxMag/col82.html
print "Just another Perl hacker," # the original
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Fri, 29 Sep 2006 23:01:48 +0100
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: Questions about Inline::C
Message-Id: <cnh0v3-1to.ln1@osiris.mauzo.dyndns.org>
Quoth January Weiner <january.weiner@gmail.com>:
> Sisyphus <sisyphus1@nomail.afraid.org> wrote:
> > Inline_Stack_Vars and friends are defined in INLINE.h which is a header file
> > auto-generated by Inline::C. It gets written in the build directory - and
> > then cleaned up once the compilation has successfully completed (unless you
> > run with the Config option 'CLEAN_AFTER_BUILD => 0').
>
> Oh, that I do know, I have found that :-) It's just that it didn't tell me
> much, because it just redefines the macros. (define inline_stack_push as
> Inline_Stack_Push, and earlier Inline_Stack_Push as XPUSHs... but I still
> do not know what XPUSHs is).
See perlapi. IMHO those Inline_Foo macros are pretty stupid: just
renaming the XS macros for the hell of it.
Ben
--
Heracles: Vulture! Here's a titbit for you / A few dried molecules of the gall
From the liver of a friend of yours. / Excuse the arrow but I have no spoon.
(Ted Hughes, [ Heracles shoots Vulture with arrow. Vulture bursts into ]
'Alcestis') [ flame, and falls out of sight. ] benmorrow@tiscali.co.uk
------------------------------
Date: 01 Oct 2006 04:26:46 GMT
From: xhoster@gmail.com
Subject: Re: Questions about Inline::C
Message-Id: <20061001002747.059$qn@newsreader.com>
January Weiner <january.weiner@gmail.com> wrote:
> Dear all,
>
> I had to revert to C again. Since the thought of parsing all my files in
> C was dreadful, I decided to use Inline::C to only do the job that was
> really computationally intensive. Currently, my program seems to run
> quite well, I am very happy with Inline::C, and a little coding in C made
> me bless Larry again and again.
>
> There are, however, few questions that remain open.
>
> 1. In the Inline::C cookbook, it says
>
> > I would urge you to stay away from "malloc"ing your own buffer. Just
> > use Perl's built in memory management. In other words, just create
> > a new Perl string scalar. The function "newSVpv" does just that. And
> > "newSVpvf" includes "sprintf" functionality.
>
> Why? I mean, is there is any danger with malloc() from within
> Inline::C that is not present in regular C programs, or is it because
> using malloc is just generally tricky?
I think that it is some of both. Someone else pointed out New() vs. malloc
(which I've never been burned by myself) so I would just say that if you
malloc memory, you have to figure out when to free it, while Perl does the
refcounting for you (but I can never get it to work the first time on
complicated Inline code. Either it isn't intuitive or I haven't used it
enough.)
> I much prefer to do the
> allocation myself, as I know exactly how large my matrix is and as I
> want to allocate the whole matrix ( say, double 2000 x 2000 ) in one
> go myself.
Will that fit as an automatic (I think that is the term) variable?
double x[2000][2000];
If this works, and it has the appropriate scope for what you need (i.e.
only needed inside one sub, no passing data back and forth from C to Perl)
this is the way I would do it.
> The reason is that I fear that using perl guts for my
> calculations (accessing the matrix, calculating values in it etc.)
> will be not much slower than a simple C implementation. Maybe I am
> wrong, I haven't tested it.
You don't need to use perl guts for each manipulation. You can get the
char* to the start of the Perl sv string memory, and then cast that into
whatever you want. Store that casted pointer, and use it just like there
were no Perl involved from then on.
my $x= pack "d*", @list_of_numbers;
foo($x,scalar @list_of_numbers);
__C__
void foo (unsigned char* s, int num_doubles) {
double * x = (double*) s;
//now use x as any other double *, being sure not to go out of bounds.
}
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: Sat, 30 Sep 2006 18:08:41 GMT
From: Charles DeRykus <ced@blv-sam-01.ca.boeing.com>
Subject: Re: remove last 10 lines of all files in a directory
Message-Id: <J6F3qG.Gv@news.boeing.com>
rsarpi@gmail.com wrote:
> using perl 5.8.8
>
> Objective: remove last 10 lines of *all* files in a directory with no
> branches.
>
> Like...xfiles directory has the files xfile1...xfile10. No
> subdirectories. I want to remove the last 10 lines of xfile1...xfile10.
>
> How do I do that?
>
> I've tried to put all files in an array but I can't open all files at
> one to write to them. And for some reason globbing doesn't do the
> trick...like glob ("*.*");
>
> I came up with something to delete the last 10 lines of ONE file only.
> (A portion of this code is mine the other is from the perl cookbook)
> ----------
> #!/usr/bin/perl
>
> use warnings;
> use strict;
>
>
> my $path = "C:/path/to/file.txt";
>
> my $addr = "";
>
> #create a sentinel value
> my $counter = 1;
>
> #kicks out after it reaches line 10. We just want to delete 10 lines
> while ( $counter <= 10 ) {
> open( FH, "+< $path" ) or die $!;
> while (<FH>) {
> $addr = tell(FH) unless eof(FH);
> }
> truncate( FH, $addr ) or die $!;
>
> #update sentinel value
> $counter++;
> }
> print "all done\n";
>
if you have "find" on your Win32 box:
find ... | perl -MTie::File -nle "chomp;tie @a,'Tie::File',$_ or die
$!;splice @a,-10"
--
Charles DeRykus
------------------------------
Date: Sat, 30 Sep 2006 20:26:06 GMT
From: "John W. Krahn" <someone@example.com>
Subject: Re: remove last 10 lines of all files in a directory
Message-Id: <ypATg.43187$bf5.20649@edtnps90>
Charles DeRykus wrote:
> rsarpi@gmail.com wrote:
>>
>> Objective: remove last 10 lines of *all* files in a directory with no
>> branches.
>
> if you have "find" on your Win32 box:
>
> find ... | perl -MTie::File -nle "chomp;tie @a,'Tie::File',$_ or die
> $!;splice @a,-10"
You are chomping $_ twice. Either remove the -l switch or 'chomp;'.
John
--
Perl isn't a toolbox, but a small machine shop where you can special-order
certain sorts of tools at low cost and in short order. -- Larry Wall
------------------------------
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 9785
***************************************
