[19687] in Perl-Users-Digest
Perl-Users Digest, Issue: 1882 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Oct 5 21:05:49 2001
Date: Fri, 5 Oct 2001 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)
Message-Id: <1002330306-v10-i1882@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Fri, 5 Oct 2001 Volume: 10 Number: 1882
Today's topics:
Re: "chdir" argument as a variable... (David Efflandt)
Am I asking too much ??? (Tana)
Re: Am I asking too much ??? (Damian James)
Re: Am I asking too much ??? (Martien Verbruggen)
Re: Am I asking too much ??? <Jon.Ericson@jpl.nasa.gov>
Re: Goedel JAPH (Martien Verbruggen)
How to have portable email script? <a@b.c>
Re: How to have portable email script? (Mark Taylor)
Re: How to have portable email script? <a@b.c>
Re: Is Perl for CGI going the way of the dodo? (Tim Hammerquist)
Re: Multiplexing strings - one line only <goldbb2@earthlink.net>
Re: Multiplexing strings <dtweed@acm.org>
Re: Multiplexing strings <goldbb2@earthlink.net>
Re: Multiplexing strings <goldbb2@earthlink.net>
Problem with backticks and passing spaces in quotes <banshee@banshee.com>
quasi xml to xml <bac2@duke.edu>
Re: quasi xml to xml <thunderbear@bigfoot.com>
Re: quasi xml to xml <jeff@vpservices.com>
Re: quasi xml to xml <anette_stegmann_@gmx.de>
Re: sending AT commands to a modem (David Efflandt)
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 6 Oct 2001 00:15:50 +0000 (UTC)
From: efflandt@xnet.com (David Efflandt)
Subject: Re: "chdir" argument as a variable...
Message-Id: <slrn9rsj9m.qf2.efflandt@typhoon.xnet.com>
On 5 Oct 2001 11:58:14 -0700, Bruce Schreiber <bruces@real-info.com> wrote:
> I would like to change directory within a script where the directory
> name is taken from a list in a text file, i.e.
>
> $file = 'list.txt'; # Name the file
> open(INFO, $file); # Open the file
> @lines = <INFO>; # Read it into an array
> foreach $i (@lines) { # Read each line of the array
> #chdir $i
This would not work because you forgot a semicolon above. But maybe you
will resolve that when you add code to check the success of chdir.
> open(OUT,"> command$i"); # Open output file
> print OUT "FILE $i.unl"; # Print text to output file
> print OUT "DELIMITER '|' 20\;\n"; # Print text to output file
> print OUT "INSERT INTO sales_temp\;\n"; # Print text to output file
> close(OUT); # Close output file
> #chdir '..';
> }
> close (INFO); # Close array
--
David Efflandt - All spam is ignored - http://www.de-srv.com/
http://www.autox.chicago.il.us/ http://www.berniesfloral.net/
http://cgi-help.virtualave.net/ http://hammer.prohosting.com/~cgi-wiz/
------------------------------
Date: 5 Oct 2001 16:50:01 -0700
From: tana@acedsl.com (Tana)
Subject: Am I asking too much ???
Message-Id: <4294f74d.0110051550.29250786@posting.google.com>
I have the following code in PERL:
# read the post from PayPal system and add 'cmd'
read (STDIN, $query, $ENV{'CONTENT_LENGTH'});
$query .= '&cmd=_notify-validate';
# post back to PayPal system to validate
use LWP::UserAgent;
$ua = new LWP::UserAgent;
$req = new HTTP::Request 'POST','https://www.paypal.com/cgi-bin/webscr';
$req->content_type('application/x-www-form-urlencoded');
$req->content($query);
$res = $ua->request($req);
My question is:
Could someone give me the equivalent PHP code for this PERL code above?
Am I asking too much ???
thanks :)
Tana
------------------------------
Date: 6 Oct 2001 00:39:41 GMT
From: damian@qimr.edu.au (Damian James)
Subject: Re: Am I asking too much ???
Message-Id: <slrn9rskh3.p70.damian@puma.qimr.edu.au>
On 5 Oct 2001 16:50:01 -0700, Tana said:
>...
>My question is:
>Could someone give me the equivalent PHP code for this PERL code above?
>Am I asking too much ???
>
Yes.
You either need to learn both languages, or pay someone to do it
for you, and that's assuming there even is an equivalent.
There -- never let it be said that simple, clear and precise
answers cannot be found in this group.
Cheers,
Damian
--
@:=grep!(m!$/|#!..$|),split//,<DATA>;@;=0..$#:;while($:=@;){$;=rand
$:--,@;[$;,$:]=@;[$:,$;]while$:;push@|,shift@;if$;[0]==@|;select$,,
$,,$,,1/80;print qq x\bxx((@;+@|)*$|++),@:[@|,@;],!@;&&$/} __END__
Just another Perl Hacker,### http://home.pacific.net.au/~djames.hub
------------------------------
Date: Sat, 6 Oct 2001 10:50:24 +1000
From: mgjv@tradingpost.com.au (Martien Verbruggen)
Subject: Re: Am I asking too much ???
Message-Id: <slrn9rslag.d6o.mgjv@martien.heliotrope.home>
On 5 Oct 2001 16:50:01 -0700,
Tana <tana@acedsl.com> wrote:
> I have the following code in PERL:
[snip]
> My question is:
> Could someone give me the equivalent PHP code for this PERL code above?
I don't know. You could try on a PHP group, but I doubt that people
there are more willing to just do your job for you than they are here.
> Am I asking too much ???
Yes, you most definitely are asking too much, and you're asking it in
the wrong place. You want PHP written, so hire a PHP programmer, or at
least ask in a PHP group or mailing list. This group was formed to
discuss the Perl programming language, not to translate random Perl code
into other languages for anyone who can't be bothered to even try for
themselves.
> thanks :)
uh-huh,
Martien
--
Martien Verbruggen |
Interactive Media Division | I took an IQ test and the results
Commercial Dynamics Pty. Ltd. | were negative.
NSW, Australia |
------------------------------
Date: 05 Oct 2001 16:06:11 +0000
From: Jon Ericson <Jon.Ericson@jpl.nasa.gov>
Subject: Re: Am I asking too much ???
Message-Id: <86itducbrg.fsf@jon_ericson.jpl.nasa.gov>
tana@acedsl.com (Tana) writes:
> I have the following code in PERL:
[snip code]
> My question is:
> Could someone give me the equivalent PHP code for this PERL code above?
> Am I asking too much ???
Frankly, yes. This is a newsgroup for discussion of *perl*. Honestly,
you'd be better off finding a group discussing *PHP*.
Jon
------------------------------
Date: Sat, 6 Oct 2001 10:22:56 +1000
From: mgjv@tradingpost.com.au (Martien Verbruggen)
Subject: Re: Goedel JAPH
Message-Id: <slrn9rsjn0.d6o.mgjv@martien.heliotrope.home>
On Fri, 5 Oct 2001 16:15:12 +0200,
Leopold Toetsch <lt@toetsch.at> wrote:
> Hi JAPHs,
>
> for your weekend fun, I have a new one:
>
> #!/usr/bin/perl -lw
> use strict;
> use English;
Needs a bit of work:
[lines wrapped]
$ perl5.6.1 /tmp/foo.pl
String found where operator expected at (eval 3) line 1, near
"prInT"JuSt anOtHeR PeRl HaCkEr""
$ perl5.6.0 /tmp/foo.pl
String found where operator expected at (eval 3) line 1, near
"prInT"JuSt anOtHeR PeRl HaCkEr""
$ perl5.00503 /tmp/foo.pl
$ perl5.00405 /tmp/foo.pl
$
The last 2 may not be displaying anything, because you're not emitting a
newline. Let's see..
$ perl5.00503 /tmp/foo.pl > /tmp/foo.out
$ echo `cat /tmp/foo.out`
Just another Perl Hacker
$
Aha.
Martien
--
Martien Verbruggen |
Interactive Media Division | Useful Statistic: 75% of the people
Commercial Dynamics Pty. Ltd. | make up 3/4 of the population.
NSW, Australia |
------------------------------
Date: Fri, 05 Oct 2001 17:16:48 -0700
From: BCC <a@b.c>
Subject: How to have portable email script?
Message-Id: <3BBE4D70.E3D10620@b.c>
Hi,
I need to write a simple cgi script that takes form elements and then
emails them to one address.
Easy! In -unix-. But how to do this in windows? The client who wants
this needs to temporarily have the script running on an NT machine, but
then moved to a unix machine, which is my home environment. Far as I
know, windows doesnt have sendmail, and has some nasty windows objects
that are normally used.
Can someone offer some suggestions or docs or code on how to send email
in perl on a windows machine?
Thanks,
Bryan
------------------------------
Date: 5 Oct 2001 19:34:31 -0500
From: mtaylor@lrim.com (Mark Taylor)
Subject: Re: How to have portable email script?
Message-Id: <Xns9131C9D9DE331maintainersetifaqorg@128.242.171.114>
BCC <a@b.c> wrote in <3BBE4D70.E3D10620@b.c>:
>Hi,
>
>I need to write a simple cgi script that takes form elements and then
>emails them to one address.
>
>Easy! In -unix-. But how to do this in windows? The client who wants
>this needs to temporarily have the script running on an NT machine, but
>then moved to a unix machine, which is my home environment. Far as I
>know, windows doesnt have sendmail, and has some nasty windows objects
>that are normally used.
>
>Can someone offer some suggestions or docs or code on how to send email
>in perl on a windows machine?
>
>Thanks,
>Bryan
>
Have a look at CPan Mail::Sendmail
Example:
use Mail::Sendmail;
my %mail = (To => 'rbowen@rcbowen.com',
From=> 'fubar@rcbowen.com',
Subject=>'Mail::Sendmail',
Message=>'Mail::Sendmail rocks!',
);
sendmail(%mail) or die $Mail::Sendmail::error;
Works in both *nix and windows.
Mark
______________________________________________________________________________
Posted Via Binaries.net = SPEED+RETENTION+COMPLETION = http://www.binaries.net
------------------------------
Date: Fri, 05 Oct 2001 17:58:18 -0700
From: BCC <a@b.c>
Subject: Re: How to have portable email script?
Message-Id: <3BBE572A.85123AE4@b.c>
Thanks Mark!
Mail::Sendmail wouldnt happen to be installed by default with activeperl
would it? :P
The windows machine I have to use is on our ISP and I have no idea what
they have installe on it. This is a problem I believe.
B
Mark Taylor wrote:
> Have a look at CPan Mail::Sendmail
>
> Example:
>
> use Mail::Sendmail;
> my %mail = (To => 'rbowen@rcbowen.com',
> From=> 'fubar@rcbowen.com',
> Subject=>'Mail::Sendmail',
> Message=>'Mail::Sendmail rocks!',
> );
> sendmail(%mail) or die $Mail::Sendmail::error;
>
> Works in both *nix and windows.
>
> Mark
> ______________________________________________________________________________
> Posted Via Binaries.net = SPEED+RETENTION+COMPLETION = http://www.binaries.net
------------------------------
Date: Fri, 05 Oct 2001 23:21:12 GMT
From: tim@vegeta.ath.cx (Tim Hammerquist)
Subject: Re: Is Perl for CGI going the way of the dodo?
Message-Id: <slrn9rsgt7.6kt.tim@vegeta.ath.cx>
Me parece que Ilya Martynov <ilya@martynov.org> dijo:
> >>>>> On Fri, 05 Oct 2001 02:25:54 GMT, tim@vegeta.ath.cx (Tim Hammerquist) said:
>
> TH> And I just want to clear up the common misconception that the OP seems
> TH> to have real quick:
>
> TH> CGI is not Perl, nor vice versa.
>
> TH> Perl is one way to implement a CGI app. You can use Java to perform
> TH> CGI, but see, there's a reason Perl was chosen as a popular CGI
> TH> language.
>
> TH> CGI may very well be falling into obsolescence, but that does not
> TH> sign Perl's death certificate, nor does it mean that CGI will die
> TH> any time soon. CGI will be around for a while simply because so
> TH> many people use it. This is similar to the reason many managers
> TH> insist on Micro$oft products, even when there are so many faster,
> TH> more stable, and more cost-efficient solutions. Oh yeah, and these
> TH> same solutions often have fewer bugs.
>
> I would like to add that if you want to develop in Perl it doesn't
> necessary means CGI. There is exist AxKit, HTML::Mason. Apache::ASP
> and other technologies. For example I hardly remember when I wrote CGI
> last time (I work as a web developer).
This was one of the points I wanted to make in this post, and I did hint
at it with 'CGI is not Perl.' However, I obviously got sidetracked by
the OP's catastrophistic statements, as if CGI's bad rep would bring
Perl down with it.
Thanks for make this important point in my temporary diversive state. =)
Tim
--
Emacs is a nice OS - but it lacks a good text editor.
That's why I am using Vim.
-- Anonymous
------------------------------
Date: Fri, 05 Oct 2001 19:46:48 -0400
From: Benjamin Goldberg <goldbb2@earthlink.net>
Subject: Re: Multiplexing strings - one line only
Message-Id: <3BBE4668.20AFF605@earthlink.net>
Joe Schaefer wrote:
>
> Dave Tweed <dtweed@acm.org> writes:
>
> > I think to have a "proper" one-liner in this context, it needs to be
> > an expression that yields the output value without side-effects.
> > Jean-Philippe's first effort met these criteria, but wasn't fully
> > general.
>
> $n = 2;
> @str = ($str1, $str2, $str3);
>
> $out=(sub{$^A="",formline"^$_"x@_."~~",@_ for"<"x(shift()-1)}
> ->($n, map $_,@str),$^A); # map to avoid side-effects
Surely @{[@str]} would be better than map $_,@str, both for speed, and
because it's fewer letters. [At least, I think it should be faster...]
And have you considered that this destroys $^A ? You need to localize
it, or at least assign back to it it's original value when you're done.
This can be done easily enough with:
($^A, $out) = ($^A, ...);
--
"I think not," said Descartes, and promptly disappeared.
------------------------------
Date: Fri, 05 Oct 2001 22:56:09 GMT
From: Dave Tweed <dtweed@acm.org>
Subject: Re: Multiplexing strings
Message-Id: <3BBE3938.CA6E7259@acm.org>
Jean-Philippe Fauvelle wrote:
> Can you add my version into your benchmark, please ?
> I tested it and it works.
> I'd like to know how fast is the probably most ugly version :-)
~/temp/perl>perl mux.pl
Rate oneline split swrite substr inline
oneline 7304/s -- -34% -73% -78% -80%
split 11072/s 52% -- -59% -66% -70%
swrite 27163/s 272% 145% -- -17% -27%
substr 32603/s 346% 194% 20% -- -13%
inline 37395/s 412% 238% 38% 15% --
~/temp/perl>perl mux.pl 100
Rate oneline split substr swrite inline
oneline 77.5/s -- -33% -79% -88% -88%
split 116/s 50% -- -68% -82% -83%
substr 368/s 374% 216% -- -45% -45%
swrite 662/s 755% 470% 80% -- -1%
inline 672/s 767% 478% 83% 1% --
Definitely the slowest of the lot, but it gets a little better
on long strings.
-- Dave Tweed
------------------------------
Date: Fri, 05 Oct 2001 19:24:37 -0400
From: Benjamin Goldberg <goldbb2@earthlink.net>
Subject: Re: Multiplexing strings
Message-Id: <3BBE4135.3766C8B5@earthlink.net>
Dave Tweed wrote:
>
> Boy, am I confused. I'm getting the same results regardless of the
> length of the strings! Here's my script, modified to include your
> inline example and to support making the strings longer:
[snip]
> 'split' => sub {
> @a1 = split /(..)/, $str1;
> @a2 = split /(..)/, $str2;
> @a3 = split /(..)/, $str3;
> $out = "";
> while (@a1) {
> $out .= shift (@a1) . shift (@a2) . shift (@a3);
> }
> },
Instead of split /(..)/, how about you try:
@a1 = m/(..)/g, $str1;
etc. This should, I think, be a bit faster.
--
"I think not," said Descartes, and promptly disappeared.
------------------------------
Date: Fri, 05 Oct 2001 19:51:13 -0400
From: Benjamin Goldberg <goldbb2@earthlink.net>
Subject: Re: Multiplexing strings
Message-Id: <3BBE4771.DEC62633@earthlink.net>
Benjamin Goldberg wrote:
>
> Dimitri wrote:
> >
> > I have N=3 strings of equal length, and I want to multiplex them by
> > taking M=2 characters from each string (the length of each string is
> > divisible by M). Example :
> >
> > Input:
> >
> > $str1 = "aabbccddeeff";
> > $str2 = "AABBCCDDEEFF";
> > $str3 = "001122334455";
> >
> > Output :
> >
> > $out = "aaAA00bbBB11ccCC22ddDD33eeEE44ffFF55";
>
> while( length $str1 ) {
> $out .= substr( $_, 0, 2, "" )
> for( $str1, $str2, $str3 );
> }
Here's a version which doesn't require pre-initializing $out, and works
for any number of tokens, and any number of strings. It does destroy
@str, though.
my $n = 2;
my @str = ($str1, $str2, $str3);
my $out = join('',
map map(substr($_, 0, $n, ''), @str), 1..length($str[0])/$n
);
This one, sadly, is destructive to @str.
--
"I think not," said Descartes, and promptly disappeared.
------------------------------
Date: Fri, 05 Oct 2001 23:53:09 GMT
From: James Moore <banshee@banshee.com>
Subject: Problem with backticks and passing spaces in quotes
Message-Id: <3BBE47DB.1060605@banshee.com>
I'd like to use the 'convert' utility (part of ImageMagick) from inside
some backquotes. From a shell command line I'm doing :
convert -fill white -pointsize 90 -draw text\ 20,80\ asdf /tmp/dis.jpg -
> /tmp/fo.jpg
I'd like to do something similar from perl:
my $pictureDataCmd = "convert -fill white -font
lucidasanstypewriter-bold-24 -pointsize 90 -draw \"text 20,80
$d->{string}\" imagefile -";
my $pictureData = `$pictureDataCmd`;
Every variant of quoting I've tried so far seems to end up breaking the
"text 20,80 asdf" bit into three seperate arguements passed to convert
itself, and I need it to remain one argument.
Suggestions?
- James Moore
james@banshee.com
------------------------------
Date: Fri, 5 Oct 2001 18:55:52 -0400
From: Blossom Coryat <bac2@duke.edu>
Subject: quasi xml to xml
Message-Id: <Pine.SOL.3.91.1011005101926.18599A-100000@godzilla3.acpub.duke.edu>
I have some files in a quasi xml format that's looks like somthing like
this:
<start>
<publication>
AD
<issue>
March 15, 2001
<volume>
Vol. 343, No. 51
<copyright>
Copyright 2001
<end>
I would like to store tags and and its associted content into an array so
that later I can use this array with XML Generator to create a well
formed xml accoring to my dtd. How should i approach this prblem? Any
insight would be appreciated.
Blossom
bac2@duke.edu
------------------------------
Date: 06 Oct 2001 08:02:20 +0200
From: Thorbjoern Ravn Andersen <thunderbear@bigfoot.com>
Subject: Re: quasi xml to xml
Message-Id: <m23d4xz4pf.fsf@thunderbear.dyndns.dk>
Blossom Coryat <bac2@duke.edu> writes:
> I have some files in a quasi xml format that's looks like somthing like
> this:
>
> <start>
> <publication>
> AD
> <issue>
> March 15, 2001
> <volume>
> Vol. 343, No. 51
> <copyright>
> Copyright 2001
> <end>
>
> I would like to store tags and and its associted content into an array so
> that later I can use this array with XML Generator to create a well
> formed xml accoring to my dtd. How should i approach this prblem? Any
> insight would be appreciated.
This looks like SGML (predecessor to XML). If you can define a DTD
for this format, you can use sx to convert this to XML, which you can
then process.
SP contains sx and is available from http://www.jclark.com/sp/index.htm
--
Thorbjoern Ravn Andersen "...plus...Tubular Bells!"
http://bigfoot.com/~thunderbear
------------------------------
Date: Fri, 05 Oct 2001 17:17:05 -0700
From: Jeff Zucker <jeff@vpservices.com>
Subject: Re: quasi xml to xml
Message-Id: <3BBE4D81.38124B39@vpservices.com>
Blossom Coryat wrote:
>
> I have some files in a quasi xml format that's looks like somthing like
> this:
A "format that looks something like this" is a very bad problem
description. If you ever want to be good at programming, you're going
to have to learn to describe the problem you are facing.
> <start>
> <publication>
> AD
> <issue>
> March 15, 2001
> <volume>
> Vol. 343, No. 51
> <copyright>
> Copyright 2001
> <end>
>
> I would like to store tags and and its associted content into an array so
> that later I can use this array with XML Generator to create a well
> formed xml accoring to my dtd. How should i approach this prblem? Any
> insight would be appreciated.
The array is a good idea for storing the order of things but a hash is
better for associating a list of tags with their content. So, guessing
at some of the things about your format you didn't specify (e.g. that
there are no '<' in the content, and that except for 'start' and 'end'
there is no nesting of tags, that there isn't more than one line of
content per tag, ...) this will work:
my $key;
my %hash;
my @array;
while (<DATA>) {
chomp;
next if /<start>/;
last if /<end>/;
if (/<(.+)>/) {
$key = $1;
push @array, $key;
next;
}
$hash{$key} = $_;
}
print "<start>\n";
for $key(@array) {
print " <$key>$hash{$key}</$key>\n"
}
print "<end>\n";
Or you could make a single array that contained hashrefs as values.
--
Jeff
------------------------------
Date: Sat, 6 Oct 2001 02:25:05 +0200
From: Anette Stegmann <anette_stegmann_@gmx.de>
Subject: Re: quasi xml to xml
Message-Id: <Xns91321863127B2VonAnetteStegmann@news.t-online.de>
{2001-10-06 08:02} "Thorbjoern Ravn Andersen":
>> <start>
>> <publication>
>> AD
>> <issue>
>> March 15, 2001
>> <volume>
>> Vol. 343, No. 51
>> <copyright>
>> Copyright 2001
>> <end>
> This looks like SGML (predecessor to XML). If you can
> define a DTD for this format, you can use sx to convert this
> to XML, which you can then process.
The information can be stored in perl as:
{ 'publication', 'AD',
'issue', 'March 15, 2001'
'volume', 'Vol. 343, No. 51',
'copyright', 'Copyright 2001' }
Ie., a hash.
To write XML from this hash some print statements suffice.
Parsing the original data in the SGML notation could be done
with an SGML tool. But If it is always as simple as above (i.e.
no other more complicated notations, every tag on a line of its
own), some lines of perl will suffice to create the hash from
the source.
--
Es ist bewußtes tiefes Zeug, das es erfand, in ihrem Verstand.
Von ihrem verschworenen ausgezeichneten Zeug;
noch wenn einmal der Atem. Von ihrem richtigen Zeug.
Das, was sie davon überspringen kann.
------------------------------
Date: Sat, 6 Oct 2001 00:32:58 +0000 (UTC)
From: efflandt@xnet.com (David Efflandt)
Subject: Re: sending AT commands to a modem
Message-Id: <slrn9rsk9p.qf2.efflandt@typhoon.xnet.com>
On 5 Oct 2001 12:36:16 -0700, costa <costa.asti@tiscalinet.it> wrote:
> I'd like to control my serial modem from a perl script.
> Do you know if there are any modules around?
> I've read somewhere to use system calls (on Unix) but I wouldn't like
> to use them because I'd like my script to run on non-Unix platforms
> such us MacOS (using MacPerl)
There is Device::SerialPort module which is a Linux (Unix) port of
Win32::SerialPort, but I do not know if it has been ported to Mac.
My first computer and last Apple was a ][+.
--
David Efflandt - All spam is ignored - http://www.de-srv.com/
http://www.autox.chicago.il.us/ http://www.berniesfloral.net/
http://cgi-help.virtualave.net/ http://hammer.prohosting.com/~cgi-wiz/
------------------------------
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.
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 1882
***************************************
