[28314] in Perl-Users-Digest
Perl-Users Digest, Issue: 9678 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Sep 3 00:05:50 2006
Date: Sat, 2 Sep 2006 21:05:04 -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 Sat, 2 Sep 2006 Volume: 10 Number: 9678
Today's topics:
Re: 3 problems with perl. <nobull67@gmail.com>
Re: Can anyone explain this code? <mfarid1@yahoo.com>
Re: Can I monitor the execution of a perl script <Peter@PSDT.com>
Re: Help with 4 dimensional implementation <xicheng@gmail.com>
Re: Help with 4 dimensional implementation <someone@example.com>
Re: Help with 4 dimensional implementation <DJStunks@gmail.com>
Re: Help with 4 dimensional implementation <rvtol+news@isolution.nl>
Re: Help with 4 dimensional implementation <rvtol+news@isolution.nl>
speed comparison of Perl to exe solutions drleeds@gmail.com
Re: speed comparison of Perl to exe solutions <john@castleamber.com>
Re: speed comparison of Perl to exe solutions <kevin@vaildc.net>
Re: speed comparison of Perl to exe solutions <john@castleamber.com>
Unzip a file in windows perl sambhav.kataria@gmail.com
Re: Unzip a file in windows perl <john@castleamber.com>
Re: What's wrong with my installation <1usa@llenroc.ude.invalid>
Re: What's wrong with my installation <mgarrish@gmail.com>
Where was a function defined? <occitan@esperanto.org>
Re: words selection <my_email@no_spam.com>
Re: words selection <David.Squire@no.spam.from.here.au>
Re: words selection <my_email@no_spam.com>
Re: words selection <David.Squire@no.spam.from.here.au>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 2 Sep 2006 11:11:56 -0700
From: "Brian McCauley" <nobull67@gmail.com>
Subject: Re: 3 problems with perl.
Message-Id: <1157220716.518582.220600@m73g2000cwd.googlegroups.com>
Brian McCauley wrote:
> nimrodna wrote:
> > 1. , I'm having problem with balanced parenthesis.
>
> >Are you?
>
> How is that relevant?
Sorry that's a bit confused. What I meant was that you were having a
problem with variable declarations and recursive pattern matches. The
problem that you were trying to solve with the recursive pattern is not
actually part of the problem.
Consider, if you will, an analogy. if your car breaks down on the way
to work you have a problem getting to work. But this is not relevant to
how you fix the car.
.
Correctly partitioning your problem is a very important first step to
soving it.
------------------------------
Date: 2 Sep 2006 19:37:23 -0700
From: "PerlNovice" <mfarid1@yahoo.com>
Subject: Re: Can anyone explain this code?
Message-Id: <1157251043.188345.240540@i42g2000cwa.googlegroups.com>
Michele/David, I put David's tidied up version in a file called
MyProc.pl. I then tried
to execute it and see if it produces the same resul as follows:
perl -ne MyProc.pl
Nothing happens. It doesn't even come back to command prompt.
Joe, thank you for your response. However, I would need little bit more
detail to understand.
1),">".(join"_",@F).".log" or die "@F $!"
I know the part after the comma is the second part of the file handle.
But what does
">".(join"_",@F).".log" mean? I know the file being created is a .log
file. What is
">".(join"_",@F).? I know @F is the file name that is created later.
How is the file name
created in this format? What d,s,w etc mean? What .*MATCHED? I know
that giving a character
by character explanation will take you long time but any explanation in
this format will be
very helpful. In the meantime, I am trying by best to understand the
code.
A lot of thanks to anyone who responds.
------------------------------
Date: Sun, 03 Sep 2006 02:26:37 GMT
From: Peter Scott <Peter@PSDT.com>
Subject: Re: Can I monitor the execution of a perl script
Message-Id: <pan.2006.09.03.02.26.35.116361@PSDT.com>
On Sat, 02 Sep 2006 10:37:39 -0700, Brian McCauley wrote:
> linq936@hotmail.com wrote:
>> I wonder if there is any simple way
>> to monitor the execution of the script just like I can run "set -xv" in
>> BASH and see BASH script running?
>
> You can get fairly close with
>
> PERLDB_OPTS="NonStop AutoTrace" perl -d myscript.pl
Couple of modules that do the same sort of thing:
http://search.cpan.org/~mjd/Devel-Trace-0.10/Trace.pm
http://search.cpan.org/~davidrw/Acme-Echo-0.01/lib/Acme/Echo.pm
--
Peter Scott
http://www.perlmedic.com/
http://www.perldebugged.com/
------------------------------
Date: 2 Sep 2006 12:00:09 -0700
From: "Xicheng Jia" <xicheng@gmail.com>
Subject: Re: Help with 4 dimensional implementation
Message-Id: <1157223609.787511.204210@p79g2000cwp.googlegroups.com>
Deepu wrote:
> Hi All,
>
> I have a file which has transitions like:
>
> SA
> SB
> SC
> SD
> SE
> SF
> SC
> SD
> SE
> SA
> SB
> SC
> SD
> and so on
>
> I am trying to count number of times the transitions occurs (for
> example):
>
> SA -> SB -> SC -> SD = 2
> SB -> SC -> SD -> SE = 1
> SC -> SD -> SE -> SF = 1
> SD -> SE -> SF -> SC = 1
> SE -> SF -> SC -> SD = 1
> SF -> SC -> SD -> SE = 1
> SC -> SD -> SE -> SA = 1
> SD -> SE -> SA -> SB = 1
> SE -> SA -> SB -> SC = 1
> SB -> SC -> SD -> and so on
>
> Can somebody please provide me with some ideas.
>
perl -ln00e '
s/\n/ -> /g;
$seen{ "$1$2" }++ while /(\w+)(?=((?: -> \w+){3}))/g;
}{
print "$_ = $seen{$_}" for sort keys %seen;
' file.txt
Xicheng
------------------------------
Date: Sat, 02 Sep 2006 19:41:12 GMT
From: "John W. Krahn" <someone@example.com>
Subject: Re: Help with 4 dimensional implementation
Message-Id: <s7lKg.950$Hr1.670@clgrps12>
Xicheng Jia wrote:
>
> perl -ln00e '
> s/\n/ -> /g;
> $seen{ "$1$2" }++ while /(\w+)(?=((?: -> \w+){3}))/g;
> }{
> print "$_ = $seen{$_}" for sort keys %seen;
> ' file.txt
perl -ln0777e'
$seen{ "$1 -> $2 -> $3 -> $4" }++
while /(\S+)(?=\s+(\S+)\s+(\S+)\s+(\S+))/g;
print "$_ = $seen{$_}" for sort keys %seen
'
John
--
use Perl;
program
fulfillment
------------------------------
Date: 2 Sep 2006 16:17:23 -0700
From: "DJ Stunks" <DJStunks@gmail.com>
Subject: Re: Help with 4 dimensional implementation
Message-Id: <1157239043.072772.84820@m73g2000cwd.googlegroups.com>
John W. Krahn wrote:
> Deepu wrote:
> >
> > I have a file which has transitions like:
> >
> > SA
> > SB
> > SC
> > SD
> > SE
> > SF
> > SC
> > SD
> > SE
> > SA
> > SB
> > SC
> > SD
> > and so on
> >
> > I am trying to count number of times the transitions occurs (for
> > example):
> >
> > SA -> SB -> SC -> SD = 2
> > SB -> SC -> SD -> SE = 1
> > SC -> SD -> SE -> SF = 1
> > SD -> SE -> SF -> SC = 1
> > SE -> SF -> SC -> SD = 1
> > SF -> SC -> SD -> SE = 1
> > SC -> SD -> SE -> SA = 1
> > SD -> SE -> SA -> SB = 1
> > SE -> SA -> SB -> SC = 1
> > SB -> SC -> SD -> and so on
> >
> > Can somebody please provide me with some ideas.
>
> $ echo "SA
> SB
> SC
> SD
> SE
> SF
> SC
> SD
> SE
> SA
> SB
> SC
> SD" | perl -lne'
> push @x, $_;
> @x == 4 && ++$x{ join $;, @x } && shift @x
> }{
> print join( " -> ", split $; ), " = $x{ $_ }" for sort keys %x
> '
> SA -> SB -> SC -> SD = 2
> SB -> SC -> SD -> SE = 1
> SC -> SD -> SE -> SA = 1
> SC -> SD -> SE -> SF = 1
> SD -> SE -> SA -> SB = 1
> SD -> SE -> SF -> SC = 1
> SE -> SA -> SB -> SC = 1
> SE -> SF -> SC -> SD = 1
> SF -> SC -> SD -> SE = 1
are there any docs other than perlvar on $;? it wasn't that
informative...
-jp
------------------------------
Date: Sun, 3 Sep 2006 02:15:56 +0200
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: Help with 4 dimensional implementation
Message-Id: <edde05.1a8.1@news.isolution.nl>
Xicheng Jia schreef:
> perl -ln00e '
> s/\n/ -> /g;
> $seen{ "$1$2" }++ while /(\w+)(?=((?: -> \w+){3}))/g;
> }{
> print "$_ = $seen{$_}" for sort keys %seen;
> ' file.txt
Variant:
perl -ln0e'
s/\n/ -> /g;
$seen{$1.$2}++ while /(\w+)(?=((?:\W+\w+){3}))/g;
print "$_ = $seen{$_}" for sort keys %seen
'
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: Sun, 3 Sep 2006 03:35:29 +0200
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: Help with 4 dimensional implementation
Message-Id: <eddimu.1ag.1@news.isolution.nl>
John W. Krahn schreef:
> perl -ln0777e'
> $seen{ "$1 -> $2 -> $3 -> $4" }++
> while /(\S+)(?=\s+(\S+)\s+(\S+)\s+(\S+))/g;
> print "$_ = $seen{$_}" for sort keys %seen
> '
Variant:
perl -ln0777e'
$;=" -> ";
$seen{$1,$2,$3,$4}++
while /(\S+)(?=\s+(\S+)\s+(\S+)\s+(\S+))/g;
print "$_ = $seen{$_}" for sort keys %seen
'
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: 2 Sep 2006 14:46:26 -0700
From: drleeds@gmail.com
Subject: speed comparison of Perl to exe solutions
Message-Id: <1157233586.557904.180360@p79g2000cwp.googlegroups.com>
I am working on a program which I am giving to people who use only
Windows machines and do not want to know anything about installing Perl
or modules.
I am using the pp tool that comes with Par to create the exe. My
program uses Strawberry Perl and an assortment of modules, like
WWW::Mechanize, HTML::TreeBuilder, HTML::Template, File::Slurp. I am
planning to possibly use Date::Manip and maybe others. I wanted to use
Win32::Printer, but I could not get Strawberry Perl to install it, even
with force.
The .exe version of the program runs a little slower than I was hoping
it would. I have not formally timed it, but it seems like the .pl
version runs faster. It is hard to tell because the program depends on
network conditions.
Is there a difference in the speed of execution of Windows executables
created by the various Perl to exe solutions? ActiveState, Par or one
of the other two or more other solutions?
I am not sure how these programs do what they do and if it is very
different from one to another. Thank you for any advice on this matter.
------------------------------
Date: 3 Sep 2006 00:10:08 GMT
From: John Bokma <john@castleamber.com>
Subject: Re: speed comparison of Perl to exe solutions
Message-Id: <Xns9832C2FF5AD1Ecastleamber@130.133.1.4>
drleeds@gmail.com wrote:
> I am working on a program which I am giving to people who use only
> Windows machines and do not want to know anything about installing Perl
> or modules.
>
> I am using the pp tool that comes with Par to create the exe. My
> program uses Strawberry Perl and an assortment of modules, like
> WWW::Mechanize, HTML::TreeBuilder, HTML::Template, File::Slurp. I am
> planning to possibly use Date::Manip and maybe others. I wanted to use
> Win32::Printer, but I could not get Strawberry Perl to install it, even
> with force.
>
> The .exe version of the program runs a little slower than I was hoping
> it would. I have not formally timed it, but it seems like the .pl
> version runs faster. It is hard to tell because the program depends on
> network conditions.
Odd. I thought that par did nothing else then wrapping perl.exe and some
modules in a compressed file?
> Is there a difference in the speed of execution of Windows executables
> created by the various Perl to exe solutions? ActiveState, Par or one
> of the other two or more other solutions?
>
> I am not sure how these programs do what they do and if it is very
> different from one to another. Thank you for any advice on this matter.
No experience with perl2exe. I recall that the end result of the latter is
much smaller, but I have no idea what they exactly do.
--
John Experienced Perl programmer: http://castleamber.com/
Perl help, tutorials, and examples: http://johnbokma.com/perl/
------------------------------
Date: Sun, 03 Sep 2006 02:04:01 GMT
From: Kevin Michael Vail <kevin@vaildc.net>
Subject: Re: speed comparison of Perl to exe solutions
Message-Id: <kevin-544493.22040102092006@news.verizon.net>
In article <Xns9832C2FF5AD1Ecastleamber@130.133.1.4>,
John Bokma <john@castleamber.com> wrote:
> drleeds@gmail.com wrote:
>
> > I am not sure how these programs do what they do and if it is very
> > different from one to another. Thank you for any advice on this matter.
>
> No experience with perl2exe. I recall that the end result of the latter is
> much smaller, but I have no idea what they exactly do.
It does the same basic thing as PAR and pp. Depending on options you
give it, it can either (a) just put everything in one big .exe file, (b)
put everything but the Perl DLL in the big .exe file, or (c) put
everything but all DLLs in the big .exe file. In (b) and (c), it copies
the necessary DLLs to the directory you run it from. It also has the
ability to embed modules that aren't directly referenced by using a
special comment, and can do some other things, depending on the version
of Perl you use it with.
I like it better than PAR/pp because of the DLL-copying thing, but that
could just be because I've been using it longer and haven't had time to
really get things working. To my mind, the ability to add comments to
make sure modules get included is a big win; as far as I know, pp make
you add command line options for each additional module.
None of the programs that produce .exe files produce an execution
speedup; they should all run at about the same speed as running the .pl
file using the perl interpreter, because basically that's what's still
happening.
--
boss, sometimes i think | kevin michael vail
that our friend mehitabel | kevin@vaildc.net
is a trifle too gay |
-- archy | wotthehell wotthehell
------------------------------
Date: 3 Sep 2006 02:59:14 GMT
From: John Bokma <john@castleamber.com>
Subject: Re: speed comparison of Perl to exe solutions
Message-Id: <Xns9832DFA9E364Ecastleamber@130.133.1.4>
Kevin Michael Vail <kevin@vaildc.net> wrote:
> In article <Xns9832C2FF5AD1Ecastleamber@130.133.1.4>,
> John Bokma <john@castleamber.com> wrote:
>
>> drleeds@gmail.com wrote:
>>
>> > I am not sure how these programs do what they do and if it is very
>> > different from one to another. Thank you for any advice on this
>> > matter.
>>
>> No experience with perl2exe. I recall that the end result of the
>> latter is much smaller, but I have no idea what they exactly do.
>
> It does the same basic thing as PAR and pp. Depending on options you
> give it, it can either (a) just put everything in one big .exe file,
I never saw perl2exe, but I was given a perl2exe generated file + the Perl
source etc. I recall that PAR generated exe's are around 2 MB for
starters, and I recall that the exe I got was 700 kb. I have no idea if
that was because of (b) or (c) :-)
> (b) put everything but the Perl DLL in the big .exe file, or (c) put
> everything but all DLLs in the big .exe file. In (b) and (c), it
> I like it better than PAR/pp because of the DLL-copying thing, but
> that could just be because I've been using it longer and haven't had
> time to really get things working. To my mind, the ability to add
> comments to make sure modules get included is a big win; as far as I
> know, pp make you add command line options for each additional module.
Which I like more :-) You can also add more "use" lines.
--
John Experienced Perl programmer: http://castleamber.com/
Perl help, tutorials, and examples: http://johnbokma.com/perl/
------------------------------
Date: 2 Sep 2006 15:44:22 -0700
From: sambhav.kataria@gmail.com
Subject: Unzip a file in windows perl
Message-Id: <1157237061.991744.216230@i3g2000cwc.googlegroups.com>
Hi
I am using perl in windows i want to unzip a direcotry in windows in
my perl program
i was trying to Archive::zip
Can any body easy way of unzip something like gunzip -d in UNIX
Thanks in advance for your help
------------------------------
Date: 3 Sep 2006 00:08:04 GMT
From: John Bokma <john@castleamber.com>
Subject: Re: Unzip a file in windows perl
Message-Id: <Xns9832C2A51FC4castleamber@130.133.1.4>
sambhav.kataria@gmail.com wrote:
> Hi
>
> I am using perl in windows i want to unzip a direcotry in windows in
> my perl program
> i was trying to Archive::zip
> Can any body easy way of unzip something like gunzip -d in UNIX
http://johnbokma.com/mexit/2006/07/01/
--
John Experienced Perl programmer: http://castleamber.com/
Perl help, tutorials, and examples: http://johnbokma.com/perl/
------------------------------
Date: Sat, 02 Sep 2006 22:14:26 GMT
From: "A. Sinan Unur" <1usa@llenroc.ude.invalid>
Subject: Re: What's wrong with my installation
Message-Id: <Xns9832B988549D2asu1cornelledu@127.0.0.1>
Truty <my_email@no_spam.com> wrote in news:mn.14227d69f71f4f37.52132
@nospam.com:
> Michael avait prétendu :
>> Problem solved. cuz I need to save it to pl instead of plx.
>>
>> Thanks!
>
> lol, I had the same error.
How is using .plx rather than .pl an error? Learn to use the OS you prefer
to use.
Bye bye.
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: 2 Sep 2006 16:12:06 -0700
From: "Matt Garrish" <mgarrish@gmail.com>
Subject: Re: What's wrong with my installation
Message-Id: <1157238725.929945.295480@e3g2000cwe.googlegroups.com>
A=2E Sinan Unur wrote:
> Truty <my_email@no_spam.com> wrote in news:mn.14227d69f71f4f37.52132
> @nospam.com:
>
> > Michael avait pr=E9tendu :
> >> Problem solved. cuz I need to save it to pl instead of plx.
> >>
> >> Thanks!
> >
> > lol, I had the same error.
>
> How is using .plx rather than .pl an error? Learn to use the OS you prefer
> to use.
>
Since no one's actually mentioned why that's bad... .plx is
ActiveState's extension for running the perlex dll from IIS. If you
give your scripts that extension in Windows and don't explicitly call
the perl.exe interpreter the registry lookup will result in the dll
being used, which will not provide the results one expects.
Matt
------------------------------
Date: Sun, 03 Sep 2006 00:39:37 +0200
From: Daniel Pfeiffer <occitan@esperanto.org>
Subject: Where was a function defined?
Message-Id: <edd0tf$mng$02$1@news.t-online.com>
Hi,
with "caller" I can pinpoint where something comes from. Question is how can
I get at that same information _without_ calling the function?
Usage is in the "make" improvement makepp.sf.net, where a rule action can be a
self defined function as in
sub c_mycommand { ... } # c_ marks this as a command
targets: dependencies
&mycommand args
Now that function might be defined in the same makefile, in an include file,
or in a module which gets use`d. (In the first two cases it goes through an
eval with a #line nnn "file" directive so perl knows where it came from.)
Since makepp tries very hard to guarantee correct builds, it makes this
function an implicit dependency. But currently that dependency is the
makefile -- which is wrong if it came from include or use.
I hope there is an easier way than traversing %:: and hunting for a function
of the same name!
thanks in advance!
Daniel
------------------------------
Date: Sat, 02 Sep 2006 20:14:35 +0200
From: Truty <my_email@no_spam.com>
Subject: Re: words selection
Message-Id: <mn.14be7d69ffd78b94.52132@nospam.com>
David Squire avait écrit le 02/09/2006 :
> next if !($carac_available && $carac_notavailable);
but with this line I haven't all words result, because
$carac_available is empty and $carac_notavailable isn't empty
or
$carac_available isn't empty and $carac_notavailable is empty
------------------------------
Date: Sat, 02 Sep 2006 19:30:50 +0100
From: David Squire <David.Squire@no.spam.from.here.au>
Subject: Re: words selection
Message-Id: <edcikq$5i8$1@gemini.csx.cam.ac.uk>
Truty wrote:
> David Squire avait écrit le 02/09/2006 :
>> next if !($carac_available && $carac_notavailable);
>
> but with this line I haven't all words result, because
> $carac_available is empty and $carac_notavailable isn't empty
> or
> $carac_available isn't empty and $carac_notavailable is empty
>
>
Well, I can't guess your requirements, you know :) Are both situations
relevant? What do you want to do in each case, i.e. under what
conditions is a word considered valid if one of these strings is empty?
DS
------------------------------
Date: Sat, 02 Sep 2006 20:44:45 +0200
From: Truty <my_email@no_spam.com>
Subject: Re: words selection
Message-Id: <mn.14dc7d696e62b0a1.52132@nospam.com>
David Squire a présenté l'énoncé suivant :
> Truty wrote:
>> David Squire avait écrit le 02/09/2006 :
>>> next if !($carac_available && $carac_notavailable);
>>
>> but with this line I haven't all words result, because
>> $carac_available is empty and $carac_notavailable isn't empty
>> or
>> $carac_available isn't empty and $carac_notavailable is empty
>>
>>
>
> Well, I can't guess your requirements, you know :) Are both situations
> relevant? What do you want to do in each case, i.e. under what conditions is
> a word considered valid if one of these strings is empty?
>
>
> DS
a word is valid if this word contain all caracteres in $carac_available
and no caracteres of $carac_notavailable
but at the begining, the code don't working because $carac_available or
$carac_notavailable could be empty.
------------------------------
Date: Sat, 02 Sep 2006 19:56:45 +0100
From: David Squire <David.Squire@no.spam.from.here.au>
Subject: Re: words selection
Message-Id: <edck5e$8lg$1@gemini.csx.cam.ac.uk>
Truty wrote:
> David Squire a présenté l'énoncé suivant :
>> Truty wrote:
>>> David Squire avait écrit le 02/09/2006 :
>>>> next if !($carac_available && $carac_notavailable);
>>>
>>> but with this line I haven't all words result, because
>>> $carac_available is empty and $carac_notavailable isn't empty
>>> or
>>> $carac_available isn't empty and $carac_notavailable is empty
>>
>> Well, I can't guess your requirements, you know :) Are both situations
>> relevant? What do you want to do in each case, i.e. under what
>> conditions is a word considered valid if one of these strings is empty?
>>
>
> a word is valid if this word contain all caracteres in $carac_available
> and no caracteres of $carac_notavailable
Yes, that was already clear. The question is, what do you want to do in
the special cases where the strings are empty? If $carac_available is
empty, does that mean that any word is OK so long as it does not contain
any characters from $carac_notavailable?
I think I can guess the behaviour you want. If I am right, this will do it:
----
#!/usr/bin/perl
use strict;
use warnings;
my $carac_available = 'eo';
my $carac_notavailable = 'hydngp';
while (my $ligne = <DATA>) {
chomp $ligne;
my $contains_all_carac_available = 1;
if ($carac_available) { # if $carac_available is empty, then there
# are no compulsory characters
$contains_all_carac_available &= ($ligne =~ /$_/) for split //,
$carac_available;
}
if (
($contains_all_carac_available
&& (!$carac_notavailable # if $carac_notavailable is empty,
# then all characters are OK
|| $ligne !~ /[$carac_notavailable]/
)
)
) {
print $ligne." | ";
}
}
----
DS
------------------------------
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 9678
***************************************
