[15527] in Perl-Users-Digest
Perl-Users Digest, Issue: 2937 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed May 3 18:10:34 2000
Date: Wed, 3 May 2000 15:10:24 -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: <957391823-v9-i2937@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Wed, 3 May 2000 Volume: 9 Number: 2937
Today's topics:
Re: how do I catch user's input? <rootbeer@redcat.com>
Re: how do I catch user's input? <UlleAckermann@t-online.de>
Re: how do I catch user's input? (Tad McClellan)
Re: how do I catch user's input? <occitan@esperanto.org>
Re: http:request et Firewall <abarb@nmg.fr>
Re: if file already exists then remove... (Bart Lateur)
Re: if file already exists then remove... <htp@mac.com>
Re: If slices are so great... <mjcarman@home.com>
Re: Installing modules with CPAN <rootbeer@redcat.com>
Re: migrate modules to perl5.6.0 <rootbeer@redcat.com>
Oct function does not work with binary <cradley@nai.com>
Re: Parse a String <lr@hpl.hp.com>
Re: Parse a String <lr@hpl.hp.com>
Re: Parse a String <sariq@texas.net>
Perl & delivering Databases? ammar_aganovic@my-deja.com
Re: Perl & delivering Databases? <jeff@vpservices.com>
Re: Perl 5.6.0/Solaris: ok to compile with [but not use <dan@tuatha.sidhe.org>
Re: Perl CGI Script Crashes on Win2K but not at Command <KidRockYou@yahoo.com>
Re: program that prints itself (Tad McClellan)
Re: PS <dburch@teleport.com>
Re: Q: search/replace and pattern matching <lr@hpl.hp.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 3 May 2000 11:24:13 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: how do I catch user's input?
Message-Id: <Pine.GSO.4.10.10005031122310.13677-100000@user2.teleport.com>
On Wed, 3 May 2000 bing-du@tamu.edu wrote:
> If I want to make an interactive perl to prompt user questions for
> answers, such as:
>
> # test.pl
> what's your name: <user's input>
> what's your major: <user's input>
> ...
>
> How should I refer those user's input in my script?
Your introductory-level book on Perl should cover this. Many people here
recommend Learning Perl from O'Reilly.
But you want the line-input operator:
print "What's your name? ";
chomp(my $name = <STDIN>);
print "Hello, $name.\n";
Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Wed, 03 May 2000 19:24:18 +0200
From: Ulrich Ackermann <UlleAckermann@t-online.de>
Subject: Re: how do I catch user's input?
Message-Id: <391060C2.ECDD830@t-online.de>
bing-du@tamu.edu wrote:
>
> Greetings...
>
> Here is a newbie question. If I want to make an interactive perl to
> prompt user questions for answers, such as:
>
> # test.pl
> what's your name: <user's input>
> what's your major: <user's input>
print "Your name: ";
my $name = <>; # long version: <STDIN> instead of <>
chomp $name
Hope this helps.
Ulrich
------------------------------
Date: Wed, 3 May 2000 13:28:45 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: how do I catch user's input?
Message-Id: <slrn8h0oed.81q.tadmc@magna.metronet.com>
On Wed, 03 May 2000 16:29:27 GMT, bing-du@tamu.edu <bing-du@tamu.edu> wrote:
>I want to make an interactive perl to
>prompt user questions for answers, such as:
> what's your name: <user's input>
>How should I refer those user's input in my script?
With meaningful variable names.
print q/what's your name: /;
chomp(my $name = <STDIN>);
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 03 May 2000 20:52:59 GMT
From: Daniel Pfeiffer <occitan@esperanto.org>
Subject: Re: how do I catch user's input?
Message-Id: <8eq3j3$sk2$1@nnrp1.deja.com>
In article <m1zoq72zmb.fsf@halfdome.holdit.com>,
merlyn@stonehenge.com (Randal L. Schwartz) wrote:
>> "Ulrich" == Ulrich Ackermann <UlleAckermann@t-online.de> writes:
Ulrich> print "Your name: ";
Ulrich> my $name = <>; # long version: <STDIN> instead of <>
Randal> My rule of thumb - NEVER read from <> if you are prompting for
Randal> an answer. If you are using <> to either be STDIN or the @ARGV
Randal> files, then your prompt is likely being lost in some output
Randal> mess. If you are prompting, you need to be reading just from
Randal> STDIN.
Sorry to disagree, but that should read NEVER prompt unless reading from
a terminal:
print "Your name: " if -t;
my $name = <>;
That way you can feed the same script from a file or pipe, if you don't
want interaction! N.b.: this is inspired by Korn shell's useful
read var?'Prompt: '
--
Bring text-docs to life! Erwecke Textdokumente zum Leben!
http://beam.to/iPerl/
Vivigu tekstodokumentojn!
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Wed, 03 May 2000 23:43:10 +0200
From: Alain BARBET <abarb@nmg.fr>
Subject: Re: http:request et Firewall
Message-Id: <39109D6E.5AEBE079@nmg.fr>
Bonsoir,
> A mon bureau, je dois avant de me connecter utiliser socksCap32. Mais je
> ne sais pas faire fonctionner perl avec ce programme. Perl ne peut plus
> se connecter à internet. Pouvez-vous m'aider ? (peut-on configurer le
> port de sortie ?)
Si socksCap32 est un proxy comme une recherche rapide me semble faire
croire, il faut dire au module LWP de l'utiliser via la méthode proxy
> $ua = new LWP::UserAgent;
$ua->proxy(['http', 'ftp'], 'http://adresse.de.socksCap32:<no port>/')
HTH,
--
Alain & Estelle BARBET
http://www.alianwebserver.com
------------------------------
Date: Wed, 03 May 2000 18:45:41 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: if file already exists then remove...
Message-Id: <39117353.520798@news.skynet.be>
Marco Natoni wrote:
> if (-e $filename) unlink $filename;
Perl ne C. You need a block if you write it like this. You can reverse
the ordering, and drop the braces:
unlink $filename if -e $filename;
or
if(-e $filename) {
unlink $filename;
}
But actually, unlink doesn't mind a failure, so simply drop the test.
unlink $filename;
--
Bart.
------------------------------
Date: Thu, 04 May 2000 06:21:03 +0930
From: Henry <htp@mac.com>
Subject: Re: if file already exists then remove...
Message-Id: <htp-C2AD71.06210304052000@news.metropolis.net.au>
In article <39117353.520798@news.skynet.be>, bart.lateur@skynet.be
(Bart Lateur) wrote:
> But actually, unlink doesn't mind a failure, so simply drop the test.
>
> unlink $filename;
:^)
Better watch out - when Larry wakes up, he'll have you for that!
Henry.
------------------------------
Date: Wed, 03 May 2000 15:20:21 -0500
From: Michael Carman <mjcarman@home.com>
Subject: Re: If slices are so great...
Message-Id: <39108A05.7270CDC4@home.com>
Larry Rosler wrote:
>
> Michael Carman <mjcarman@home.com> says...
>
> > @keep = $string =~ /(?:[^,]*,){2}?(.+)/ ? split /,/ => $1 : ();
> ^
> Why the quantifier there?
Hrm. It was to prevent the regex from getting greedy, but in hindsight
it's not needed because of the negative character class. Drop it and
reduce your handicap by 1. :-)
-mjc
------------------------------
Date: Wed, 3 May 2000 12:31:21 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Installing modules with CPAN
Message-Id: <Pine.GSO.4.10.10005031227480.13677-100000@user2.teleport.com>
On Wed, 3 May 2000 rscrane@my-deja.com wrote:
> On an SGI with perl and gcc installed in /usr/freeware, the make called
> from a CPAN install tries to use "cc" -- how can I get it to use gcc?
It gets this from your Config.pm. But if you change that, you may need to
change some other values in Config.pm to make it all work. It may be
simpler to compile Perl from scratch. (I'm presuming that you got your
binary from someone else, since your Config doesn't match what you have.)
On the other hand, it may be as simple as setting up a symbolic link to
point to your gcc. Good luck with it!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Wed, 3 May 2000 11:52:04 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: migrate modules to perl5.6.0
Message-Id: <Pine.GSO.4.10.10005031145200.13677-100000@user2.teleport.com>
On 3 May 2000, Danny Aldham wrote:
> I have just upgraded to perl5.6.0 . Maybe it was wishful thinking, but
> I thought this version was going to allow me to upgrade perl without
> having to reinstall all my CPAN modules.
Did you choose the option for binary compatibility? That won't solve
everything, but it can help.
> How can I get a list of modules installed on my old perl suitable for
> feeding to the CPAN module to reinstall for me?
This isn't trivial. Alas. But you can find all the .pm files along the old
@INC, using a technique like the one shown here:
http://www.perlfaq.com/faqs/id/205
Then you can check to see which of those modules is already available
along the new @INC using a similar technique. After that, it shouldn't be
too hard to run CPAN to install the module.
But this should all be automated. And the program should be included in
the perl distribution. I heartily encourage you to make such a utility!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Wed, 3 May 2000 12:42:29 -0700
From: "Charles F. Radley" <cradley@nai.com>
Subject: Oct function does not work with binary
Message-Id: <8epukq$o02$1@zeitung.ngc.com>
Here is what the Activestate perl doc says about the oct function (I am
using v 522):
oct EXPR
Interprets EXPR as an octal string and returns the corresponding value. (If
EXPR happens to start off with 0x, interprets it as a hex string. If EXPR
starts off with 0b, it is interpreted as a binary string.)
========
$output = oct("$string");
Here is what I get:
$string $output
0x010 16
010 8
0b010 0
Why does it not work with binary (I expected to get 2) ?
I note that the camel book (1996 edition) makes no mention of the 0b binary
behavior at all.
------------------------------
Date: Wed, 3 May 2000 11:05:36 -0700
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: Parse a String
Message-Id: <MPG.137a0a485394d66798a9d8@nntp.hpl.hp.com>
In article <8epcth$1j9$1@nnrp1.deja.com> on Wed, 03 May 2000 14:26:17
GMT, Ilja <billy@arnis-bsl.com> says...
...
> Try something like: $x =~ s/^\s*//;
This seems to be an epidemic. 'Try something like' indeed! Like this:
$x =~ s/^\s+//;
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Wed, 3 May 2000 11:03:36 -0700
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: Parse a String
Message-Id: <MPG.137a09d39cafb22e98a9d7@nntp.hpl.hp.com>
In article <Pine.GSO.4.10.10005030857080.13677-
100000@user2.teleport.com> on Wed, 3 May 2000 09:05:35 -0700, Tom
Phoenix <rootbeer@redcat.com> says...
> On 3 May 2000, Ilmari Karonen wrote:
...
> > sub trim { for (@_ ? @_ : $_) { s/^\s+//; s/\s+$//; } }
...
> It looks as if you're wanting this to work on $_ by default, but this
> won't always work right. If you pass it an array which (by mistake or
> design) may be empty, instead of processing that array, your code may
> modify $_ unexpectedly. That's the kind of action-at-a-distance that can
> be very difficult to debug. :-P
...
> Alas, there's no way yet to safely write code which behaves just like many
> built-ins. Cheers!
I tried to address this by using the otherwise-undocumented fifth
argument for caller(), $hasargs:
($package, $filename, $line, $subroutine, $hasargs,
$wantarray, $evaltext, $is_require, $hints, $bitmask) = caller($i);
But that always has the value 1, no matter how the subroutine is called.
#!/usr/bin/perl -wl
use strict;
sub trim { s/^\s+//, s/\s+$// for (caller 0)[4] ? @_ : $_ }
$_ = ' foo ';
trim;
print;
$_ = ' foo ';
trim();
print;
$_ = ' foo ';
trim(@ARGV);
print;
__END__
Each of these attempts leaves $_ alone, and the third case operates on
@ARGV.
What does $hasargs mean, if not 'The call to this subroutine has
arguments.'? I tried encasing the calls to trim() within another
subroutine called with or without arguments, but nothing changed.
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Wed, 03 May 2000 14:00:07 -0500
From: Tom Briles <sariq@texas.net>
Subject: Re: Parse a String
Message-Id: <39107737.FB09D9B7@texas.net>
Larry Rosler wrote:
>
> In article <Pine.GSO.4.10.10005030857080.13677-
> 100000@user2.teleport.com> on Wed, 3 May 2000 09:05:35 -0700, Tom
> Phoenix <rootbeer@redcat.com> says...
> > On 3 May 2000, Ilmari Karonen wrote:
>
> ...
>
> > > sub trim { for (@_ ? @_ : $_) { s/^\s+//; s/\s+$//; } }
>
> ...
>
> > It looks as if you're wanting this to work on $_ by default, but this
> > won't always work right. If you pass it an array which (by mistake or
> > design) may be empty, instead of processing that array, your code may
> > modify $_ unexpectedly. That's the kind of action-at-a-distance that can
> > be very difficult to debug. :-P
>
> ...
>
> > Alas, there's no way yet to safely write code which behaves just like many
> > built-ins. Cheers!
>
> I tried to address this by using the otherwise-undocumented fifth
> argument for caller(), $hasargs:
>
> ($package, $filename, $line, $subroutine, $hasargs,
> $wantarray, $evaltext, $is_require, $hints, $bitmask) = caller($i);
>
> But that always has the value 1, no matter how the subroutine is called.
>
> #!/usr/bin/perl -wl
> use strict;
>
> sub trim { s/^\s+//, s/\s+$// for (caller 0)[4] ? @_ : $_ }
>
> $_ = ' foo ';
> trim;
> print;
>
> $_ = ' foo ';
> trim();
> print;
>
> $_ = ' foo ';
> trim(@ARGV);
> print;
> __END__
>
> Each of these attempts leaves $_ alone, and the third case operates on
> @ARGV.
>
> What does $hasargs mean, if not 'The call to this subroutine has
> arguments.'? I tried encasing the calls to trim() within another
> subroutine called with or without arguments, but nothing changed.
It's a bug as far as I can tell.
From 'The Perl Cookbook':
"$hasargs
Whether the function was called with arguments."
I don't know how that got left out of the manpage for caller().
Changing your program to use '&trim;' and '&trim(@ARGV);' gave me the
expected result.
- Tom
------------------------------
Date: Wed, 03 May 2000 18:25:48 GMT
From: ammar_aganovic@my-deja.com
Subject: Perl & delivering Databases?
Message-Id: <8epqus$i1p$1@nnrp1.deja.com>
I need to make a database residing on MySQL available to custom
developed software which would be able to access the database directly.
The most elegant solution would be to simply add a System DSN in ODBC
sources with MySQL driver, and access the database through DSN. The
problem is the proveider would not let a user to connect from host
other then localhost (security reasons). So I need to improvise.
I am thinking of delivering a DB through HTTP. I though a perl script
would be able to read the MySQL tables, and output them to for example
access file. The file would be then send via http protocol, and the
software at the client side would then process the access db, make the
changes, modify the access file and send back. Or I could even do some
streaming (both Client & Server side). I thought of using Perl & Delphi
to accomplish that, but would be very gratefull if U could help me with
some modules & units I could search for.
P.S. does anyone know how to drive a ODBC connection through secure
channel? I did manage to use a portmapper (or something like that) to
reroute the connection through previously established secure line (with
TTerm & TTsh), but I found no way to automatise the process.
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Wed, 03 May 2000 12:05:26 -0700
From: Jeff Zucker <jeff@vpservices.com>
Subject: Re: Perl & delivering Databases?
Message-Id: <39107876.F9D3FC49@vpservices.com>
ammar_aganovic@my-deja.com wrote:
>
> I need to make a database residing on MySQL available to custom
> developed software which would be able to access the database directly.
The slightest search of Perl materials for "MySQL" or of MySQL materials
for "Perl" would lead you to the Perl DBI module and its DBD::mysql
driver. It is a complete solution for accessing MySQL (with or without
ODBC) from Perl and also works with just about every other database
under the sun.
> ... Or I could even do some streaming (both Client & Server side) ...
The DBD::MySQL module can work with either local or remote databases
without having to reinvent the wheel.
More materials are available at
http://www.symbolstone.org/technology/perl/DBI/
--
Jeff
------------------------------
Date: Wed, 03 May 2000 21:54:45 GMT
From: Dan Sugalski <dan@tuatha.sidhe.org>
Subject: Re: Perl 5.6.0/Solaris: ok to compile with [but not use] 5.005 threads?
Message-Id: <Fe1Q4.76722$hT2.327466@news1.rdc1.ct.home.com>
Eryq <eryq@zeegee.com> wrote:
> Suppose that none of my production scripts *use* threads; I just
> want the Thread support in there for a few non-production scripts.
> Will this setup be okay, or does compiling with 5.005 support
> somehow comprimise unrelated parts of Perl?
The big difference is that $_ and @_ are lexical instead of globals, so
local() on them will fail with an error. Other than that you're OK. (Well,
there's the speed hit, but...)
Dan
------------------------------
Date: Wed, 03 May 2000 21:18:09 GMT
From: "John" <KidRockYou@yahoo.com>
Subject: Re: Perl CGI Script Crashes on Win2K but not at Command
Message-Id: <lI0Q4.23498$x4.718670@newsread1.prod.itd.earthlink.net>
The Database is set up as a system DSN. I'm really kinda stumped on this
one. It occured to me that I could buy a book on Windows 2000 Web Servers,
so, that's where I'm off to right now. I would still apprectiate any help.
John
------------------------------
Date: Wed, 3 May 2000 13:52:08 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: program that prints itself
Message-Id: <slrn8h0pq8.81q.tadmc@magna.metronet.com>
On Mon, 01 May 2000 06:16:50 GMT, Philip 'Yes, that's my address' Newton <nospam.newton@gmx.li> wrote:
>On Sat, 29 Apr 2000 15:57:46 +0800, "John Lin" <johnlin@chttl.com.tw>
>wrote:
>
>>I wonder what the program would be like in Perl.
>>Will you try to solve it?
>
>My favourite prints itself to STDERR, not STDOUT:
^^^^^^
>
>Create a file called /tmp/quine.pl, containing the following line:
>
>Illegal division by zero at /tmp/quine.pl line 1.
>
>When run, it will produce itself as output. (This even works under
^^^^^^^^^^^^^^
But it does not do that.
It produces the _same output_ as the source, but it is not
the _source itself_.
Easily seen by doing s/quine\.pl/FOO/ in the program,
and running it as before.
Or, leaving the program as-is and changing the filename.
It is rather cool, nonetheless :-)
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 03 May 2000 13:56:43 -0700
From: Dan Burch <dburch@teleport.com>
Subject: Re: PS
Message-Id: <3910928B.581881F2@teleport.com>
Larry Rosler wrote:
> [Rearranged and trimmed for readability. Please respond to what you are
> quoting *after* you quote it, as I do here.]
>
>
> In article <Ftzq0I.LHy@news.boeing.com> on Wed, 3 May 2000 15:36:16 GMT,
> Jeff Susanj <jeffrey.l.susanj@boeing.com> says...
> > >> David Featley wrote:
> > >>
> > >> > I am trying to run perl scripts via an apache web server on my local PC
> > >> > running windows 98 for local testing. I appear to be unable to get the
> > >> > script to output to my browser. All output is coming out in a dos text
> > >> > window.
> > >> >
> > >> > The simple script I am executing is:
> > >> >
> > >> > #!c:\perl\bin\perl.exe
> >
> > I am just learning Perl but my understanding from "Learning Perl on Win32"
> > is that the Win32 version ignores that line as just another comment. It is
> > only file associations that determine how to execute a file.
>
> This is not the case for the Apache web server, which was specified in
> the otiginal post. An absolute path to the perl executable must be
> specified. Either orientation of slashes is acceptable.
Just quoting what works on my practice box ( win98 running apache), and #!perl
works(after I put "SET PATH=C:\Perl\bin\perl" in my autoexec.bat) . When I load
the scripts to the unix server then I change it to #!/usr/bin/perl
>
>
> --
> (Just Another Larry) Rosler
> Hewlett-Packard Laboratories
> http://www.hpl.hp.com/personal/Larry_Rosler/
> lr@hpl.hp.com
------------------------------
Date: Wed, 3 May 2000 11:14:14 -0700
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: Q: search/replace and pattern matching
Message-Id: <MPG.137a0c4d4cf252d398a9d9@nntp.hpl.hp.com>
In article <7aem7jr8q4.fsf@Merlin.i-did-not-set--mail-host-address--so-
shoot-me> on Wed, 03 May 2000 14:47:47 GMT, Ala Qumsieh
<aqumsieh@hyperchip.com> says...
>
> Brock Gunter-Smith <brock@gbgraphics.com> writes:
>
> > I'm trying to write a VERY basic routine to parse a file of e-mail
> > addresses, clean up the addresses and discard addresses that are an invalid
> > format...but I'm having trouble. When I read in each line I do:
> >
> > $address =~ s/[^\w\.-@]//g;
> >
> > I want to remove all characters that do NOT belong to the set [a-z A-Z 0-9 -
> > . @] This seems to be working ok...if there is a better way I would gladly
> > use it.
>
> Your way if fine, except that I would not backwach the dot, since
> there is no need for it. Also, note that the above will keep any
> underscores as they are part of \w.
>
> Call me paranoid, but I would also rearrange those a bit:
>
> $address =~ s/[^\w.@-]//g;
It isn't paranoia, just correctness. The original regex would leave any
character between ASCII 46 ('.') and ASCII 64 ('@'), and would remove
'-' (ASCII 45).
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
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: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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 V9 Issue 2937
**************************************
