[18884] in Perl-Users-Digest
Perl-Users Digest, Issue: 1052 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Jun 4 09:07:38 2001
Date: Mon, 4 Jun 2001 06:05:13 -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: <991659913-v10-i1052@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Mon, 4 Jun 2001 Volume: 10 Number: 1052
Today's topics:
Re: "The Camel Book", "The Ram Book" or "Perl : The Pro (Martin Vorlaender)
Re: "The Camel Book", "The Ram Book" or "Perl : The Pro (Markus Gyger)
Re: "The Camel Book", "The Ram Book" or "Perl : The Pro (Randal L. Schwartz)
ANNOUNCE: tclperl-2.3 <jfontain@free.fr>
Bijeenkomst Amsterdam Perl Mongers, Dinsdag 5 Juni 2001 (Jan-Pieter Cornet)
Connection Pooling... <N.Hirani@hgmp.mrc.ac.uk>
Re: Fcntl usage with tie? <m.grimshaw@salford.ac.uk>
format/write with alternate linefeeds ? <webmaster@webdragon.unmunge.net>
Re: format/write with alternate linefeeds ? (Eric Bohlman)
Re: Frustrated people (not) answering questions <ryantate@OCF.Berkeley.EDU>
Re: Frustrated people (not) answering questions <comdog@panix.com>
Re: Frustrated people (not) answering questions (Martien Verbruggen)
Re: Frustrated people (not) answering questions <somewhere@in.paradise.net>
Re: help with hashes (Martien Verbruggen)
how to dynamic append row in table with perl CGI modul <jck1@mail2000.com.tw>
Re: How to force CPAN installation configuration <abe@ztreet.demon.nl>
locking files before writing data (?) <muddycat@hotmail.com>
Re: locking files before writing data (?) <bart.lateur@skynet.be>
Re: locking files before writing data (?) <muddycat@hotmail.com>
Re: Perl on Windows question <simon.andrews@bbsrc.ac.uk>
Re: perl/cgi and dynamic hyperlink <peb@bms.umist.ac.uk>
Re: perlre: delete content of $1 <webmaster@webdragon.unmunge.net>
Re: perlre: delete content of $1 <johnlin@chttl.com.tw>
Re: Problem with Capturing Program Output under Win98 (David Efflandt)
Reading mail <david@datajo.no>
Re: Recursing a directory tree (Martien Verbruggen)
Re: Seek and destroy ! - s/// problems <07950232225@one2one.net>
SHTML in CGI files <philip@p6m7g82k.student.umd.edu>
Re: SHTML in CGI files <somewhere@in.paradise.net>
Re: substing and locating <bart.lateur@skynet.be>
Re: taint + netstat = error <joe+usenet@sunstarsys.com>
Re: use Module (if it exists) nobull@mail.com
Which nmake?? <timster@worldnet.att.net>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 04 Jun 2001 06:46:22 +0200
From: martin@radiogaga.harz.de (Martin Vorlaender)
Subject: Re: "The Camel Book", "The Ram Book" or "Perl : The Programmer's Companion - Nigel Chapman"
Message-Id: <3b1b129e.524144494f47414741@radiogaga.harz.de>
Philip Newton (pne-news-20010602@newton.digitalspace.net) wrote:
> If you like HTML versions, you could try for the Bookcase (don't recall
> the exact name), which includes several Perl books on CD-ROM.
"The Perl CD Bookshelf", O'Reilly, ISBN 1-56592-462-2, US$ 60
includes
Perl In A Nutshell (printed and on CD)
Learning Perl, 2nd edition
Learning Perl On Win32 Systems
Programming Perl, 2nd edition
Advanced Perl Programming
Perl Cookbook
and a Java search engine. I like it.
cu,
Martin
Disclaimer: My only connection to O'Reilly so far has been proofreading
german translations of Perl books.
--
So long, and thanks | Martin Vorlaender | VMS & WNT programmer
for all the fish... | work: mv@pdv-systeme.de
In Memoriam Douglas Adams | http://www.pdv-systeme.de/users/martinv/
1952-2001 | home: martin@radiogaga.harz.de
------------------------------
Date: 4 Jun 2001 05:34:27 GMT
From: mgyger@gmu.edu (Markus Gyger)
Subject: Re: "The Camel Book", "The Ram Book" or "Perl : The Programmer's Companion - Nigel Chapman"
Message-Id: <9ff6l3$vn7@portal.gmu.edu>
martin@radiogaga.harz.de (Martin Vorlaender) writes:
> "The Perl CD Bookshelf", O'Reilly, ISBN 1-56592-462-2, US$ 60
>
> Perl In A Nutshell (printed and on CD)
> Learning Perl, 2nd edition
> Learning Perl On Win32 Systems
> Programming Perl, 2nd edition
> Advanced Perl Programming
> Perl Cookbook
Actually, now: "The Perl CD Bookshelf, Version 2.0", ISBN 0-596-00164-9,
US$ 79.95, http://www.oreilly.com/catalog/perlcdbs2/ which includes:
- Perl in a Nutshell
- Programming Perl, 3rd Edition
- Advanced Perl Programming
- Perl Cookbook
- Perl for System Administration
Markus
------------------------------
Date: 04 Jun 2001 00:28:09 -0700
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: "The Camel Book", "The Ram Book" or "Perl : The Programmer's Companion - Nigel Chapman"
Message-Id: <m1ae3ou2k6.fsf@halfdome.holdit.com>
>>>>> "Markus" == Markus Gyger <mgyger@gmu.edu> writes:
Markus> Actually, now: "The Perl CD Bookshelf, Version 2.0", ISBN 0-596-00164-9,
Markus> US$ 79.95, http://www.oreilly.com/catalog/perlcdbs2/ which includes:
Markus> - Perl in a Nutshell
Markus> - Programming Perl, 3rd Edition
Markus> - Advanced Perl Programming
Markus> - Perl Cookbook
Markus> - Perl for System Administration
Yeah, sadly, Learning Perl 3rd ed was not quite ready for this CD,
although Learning Perl 2ed was outdated. Oh well, you can still get
Learning Perl 3rd ed in a searchable online form through the Safari
service the moment it comes out.
--
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: Mon, 04 Jun 2001 11:24:05 GMT
From: Jean-Luc Fontaine <jfontain@free.fr>
Subject: ANNOUNCE: tclperl-2.3
Message-Id: <3B1B6FBE.29CA6034@free.fr>
### CHANGES ###
--- version 2.3 ---
Windows support (with stubs) added (thanks to David Gravereaux)
stubs compatibility added (thanks again David)
### README ###
tclperl version 2.3: a Perl package for Tcl
This package allows the execution of Perl code from a Tcl interpreter,
as in:
package require tclperl
set interpreter [perl::interp new]
$interpreter eval {print "Hello World\n"}
perl::interp delete $interpreter
You can actually create several Perl interpreters this way, if the
tclperl package was linked against a Perl library compiled with
-DMULTIPLICITY, otherwise only 1 Perl interpreter can exist at a time.
This package works on UNIX machines (Redhat Linux rpms available at
http://jfontain.free.fr/) and Windows (thanks to David Gravereaux,
DLL also available). See INSTALL file for more information.
This library is free software; you can redistribute it and/or modify
it under the terms of the GNU Library General Public License as
published by the Free Software Foundation; either version 2 of the
License, or (at your option) any later version.
This library is distributed in the hope that it will be useful, but
WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
###
you may find it now at my homepage:
http://jfontain.free.fr/tclperl-2.3.tar.gz
http://jfontain.free.fr/tclperl-2.3-1.i386.rpm
http://jfontain.free.fr/tclperl-2.3-1.spec
http://jfontain.free.fr/tclperl23.zip
http://jfontain.free.fr/tclperl.htm
Enjoy and please let me know what you think.
--
Jean-Luc Fontaine mailto:jfontain@free.fr http://jfontain.free.fr/
------------------------------
Date: 4 Jun 2001 10:40:13 GMT
From: johnpc@xs3.xs4all.nl (Jan-Pieter Cornet)
Subject: Bijeenkomst Amsterdam Perl Mongers, Dinsdag 5 Juni 2001
Message-Id: <9ffoid$3gk$1@news1.xs4all.nl>
[English version follows the dutch text]
Amsterdam.pm staat voor de "Amsterdamse Perl Mongers", een groep van
gebruikers van Perl. In tegenstelling tot wat de naam suggereert is
Amsterdam.pm niet beperkt tot alleen Amsterdam, maar functioneert, tot
er meer gebruikersgroepen in Nederland zijn, als Nederlandse
gebruikersgroep.
Amsterdam.pm organiseert informele bijeenkomsten waar Perl gebruikers
kunnen samenkomen en informatie en gebruikservaringen met betrekking
tot Perl kunnen uitwisselen. Deze bijeenkomsten vinden normaliter
plaats op elke eerste dinsdag van de maand. De voertaal binnen
Amsterdam.pm is in pricipe Nederlands, maar indien nodig zal Engels
worden gebruikt, b.v. om te communiceren met niet-Nederlandssprekende
aanwezigen.
De eerstvolgende bijeenkomst vindt plaats op dinsdag 5 juni 2001 van
20:00 tot 22:00 uur op het kantoor van XS4ALL, Eekholt 42,
Diemen. Voor een routebeschrijving, zie
http://www.xs4all.nl/contact/routebeschrijving.html
Liefhebbers van een etentje vooraf kunnen tussen 17:45 en 18:15
verzamelen bij XS4ALL. Om 18:15 (écht om 18:15!) zoeken we een
restaurantje in de buurt om een hapje te eten.
Bezoek onze Web site http://www.Amsterdam.pm.org voor meer details.
[English version]
Amsterdam.pm stands for the Amsterdam Perl Mongers. We're basically a
Perl user group. Despite its name, it is not local to the Amsterdam
environment, but it welcomes Perl mongers from all over the
Netherlands.
Amsterdam.pm organises informal meetings where Perl users can meet,
and exchange information and experiences with regard to using Perl.
The meetings are normally held every first Tuesday of the month.
Although the preferred language for communication is Dutch, English
will be spoken if necessary.
Our next meeting is Tuesday June 5th, from 20:00 till 22:00 at the
office of XS4ALL, Eekholt 42, Diemen. See
http://www.xs4all.nl/contact/routebeschrijving.html for the directions
to get there.
Should you want to join some of us for dinner, please gather between
17:45 and 18:15 at XS4ALL. At 18:15 sharp we'll leave for a
restaurant somewhere nearby for dinner.
See http://www.Amsterdam.pm.org for more details.
--
#!perl -pl # This kenny-filter is virus-free as long as you don't copy it
$p=3-2*/[^\W\dmpf_]/i;s.[a-z]{$p}.vec($f=join('',$p-1?chr(sub{$_[0]*9+$_[1]*3+
$_[2]}->(map{/p|f/i+/f/i}split//,$&)+97):('m',p,f)[map{((ord$&)%32-1)/$_%3}(9,
3,1)]),5,1)='`'lt$&;$f.eig; # Jan-Pieter Cornet
------------------------------
Date: Mon, 04 Jun 2001 12:50:37 +0100
From: Naran Hirani <N.Hirani@hgmp.mrc.ac.uk>
Subject: Connection Pooling...
Message-Id: <3B1B760D.B21BF7F@hgmp.mrc.ac.uk>
--------------0CDF292D028E22BC207866DC
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Hi,
Is there a module which does connection pooling to a sybase database in
perl?
I have tried looking in the usual places and found nothing suitable.
If not can someone give me some hints on how best to go about
implementing such a
thing in perl. Some template example would be brilliant.
Please could you CC your replies to me as well as posting to this fine
NG.
My e-mail: N.Hirani@hgmp.mrc.ac.uk
Many thanks,
Naran Hirani.
--------------0CDF292D028E22BC207866DC
Content-Type: text/html; charset=us-ascii
Content-Transfer-Encoding: 7bit
<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>
Hi,
<p>Is there a module which does connection pooling to a sybase database
in perl?
<p>I have tried looking in the usual places and found nothing suitable.
<p>If not can someone give me some hints on how best to go about implementing
such a
<br>thing in perl. Some template example would be brilliant.
<p>Please could you CC your replies to me as well as posting to this fine
NG.
<p>My e-mail: <a href="mailto: N.Hirani@hgmp.mrc.ac.uk">N.Hirani@hgmp.mrc.ac.uk</a>
<br>
<p>Many thanks,
<p>Naran Hirani.</html>
--------------0CDF292D028E22BC207866DC--
------------------------------
Date: Mon, 04 Jun 2001 10:32:53 +0100
From: Mark Grimshaw <m.grimshaw@salford.ac.uk>
Subject: Re: Fcntl usage with tie?
Message-Id: <3B1B55C5.F09DB265@salford.ac.uk>
ahhhh - ultimately simple. Thanks very much.
Martien Verbruggen wrote:
>
> On Sat, 02 Jun 2001 11:28:34 +0100,
> Mark Grimshaw <m.grimshaw@salford.ac.uk> wrote:
> > Hi Martien, (hoping the other thread dies a natural death)
>
> :)
>
> > 1st. EXAMPLE:
> > This works:
> >
> > #!/usr/local/bin/perl -w
> >
> > use VH;
> > use strict; use diagnostics;
> > use Fcntl;
> >
> > my $db = new DB;
> > my %DB;
> > if(!(%DB = $db->open_db('test.db', O_RDONLY)))
>
> Yes, once I created a db file with an element with key 0, this all
> works fine, as it should.
>
> [EXAMPLE 2]
>
> > use Fcntl; use DB_File;
> > package TEST;
>
> Change the order of this. You're importing what Fcntl exports into the
> main name space. In short: imports happen in the name space that is
> currently active. The following should fix it:
>
> package TEST;
> use Fcntl;
> use DB_File;
>
> > The QUESTION:
> > What is the distinguishing feature between the 2 examples that allows me
> > to use O_RDONLY (without quotes) without complaints in EXAMPLE 1 but not
> > in EXAMPLE 2?
>
> The distinguishing feature is that you change name spaces in one example
> _after_ the import, and not in the other.
>
> Martien
> --
> Martien Verbruggen | The Second Law of Thermodenial: In
> Interactive Media Division | any closed mind the quantity of
> Commercial Dynamics Pty. Ltd. | ignorance remains constant or
> NSW, Australia | increases.
------------------------------
Date: 4 Jun 2001 05:33:39 GMT
From: "Scott R. Godin" <webmaster@webdragon.unmunge.net>
Subject: format/write with alternate linefeeds ?
Message-Id: <9ff6jj$3or$0@216.155.33.105>
Is it possible to do a format/write using alternat (DOS) linefeeds, on a
unix box? (the file, while generated on unix will be used on Windows)
without having to re-slurp the file and change the linefeeds afterwards?
--
unmunge e-mail here:
#!perl -w
print map {chr(ord($_)-3)} split //, "zhepdvwhuCzhegudjrq1qhw";
# ( damn spammers. *shakes fist* take a hint. =:P )
------------------------------
Date: 4 Jun 2001 06:20:33 GMT
From: ebohlman@omsdev.com (Eric Bohlman)
Subject: Re: format/write with alternate linefeeds ?
Message-Id: <9ff9bh$n4h$3@bob.news.rcn.net>
Scott R. Godin <webmaster@webdragon.unmunge.net> wrote:
> Is it possible to do a format/write using alternat (DOS) linefeeds, on a
> unix box? (the file, while generated on unix will be used on Windows)
> without having to re-slurp the file and change the linefeeds afterwards?
Binmode the file handle and explicitly terminate lines with "\015\012"
rather than "\n".
Note that if the file is going to be transferred to a Windows system over
FTP, the FTP process itself should take care of the conversion. In fact,
if you did what I suggested, you'd need to make sure that any FTP
transfers took place in binary mode or else you're likely to get CRLF
turned into CRLFLF.
------------------------------
Date: Mon, 4 Jun 2001 04:07:44 +0000 (UTC)
From: Ryan Travis Tate <ryantate@OCF.Berkeley.EDU>
Subject: Re: Frustrated people (not) answering questions
Message-Id: <9ff1ig$vp2$3@agate.berkeley.edu>
brian d foy <comdog@panix.com> wrote:
| you'd have to go a long way to support either of those. Outlook
| cost the business sector billions of dollars in damages last
| year said the New York Times. that doesn't sound like a better
| world.
i think we've identified the most central point of disagreement :-)
many businesses continue to run Outlook because -- in my opinion --
they find those costs, and the risk of greater costs in the future,
are outweighed by the benefits.
it could also be argued that most companies aren't very good at
weighing costs and benefits when it comes to IT decisions. and that
would be a strong argument.
of course, your statement could be rewritten, "Apache cost the business
sector billions of dollars in damages last year." unpatched copies of
Outlook are a problem; unpatched Unix OSes and webservers are
problems, too.
unpatched Things are also all solutions (ala Matt's) ...
cheers
r
------------------------------
Date: Mon, 04 Jun 2001 01:33:30 -0400
From: brian d foy <comdog@panix.com>
Subject: Re: Frustrated people (not) answering questions
Message-Id: <comdog-B305AB.01333004062001@news.panix.com>
In article <9ff1ig$vp2$3@agate.berkeley.edu>, Ryan Travis Tate
<ryantate@OCF.Berkeley.EDU> wrote:
> brian d foy <comdog@panix.com> wrote:
> | you'd have to go a long way to support either of those. Outlook
> | cost the business sector billions of dollars in damages last
> | year said the New York Times. that doesn't sound like a better
> | world.
> of course, your statement could be rewritten, "Apache cost the business
> sector billions of dollars in damages last year."
no it couldn't. the NYT reported no such thing. indeed, the
Economist has said on many occasions just the opposite.
--
brian d foy <comdog@panix.com>
CGI Meta FAQ - http://www.perl.org/CGI_MetaFAQ.html
Troubleshooting CGI scripts - http://www.perl.org/troubleshooting_CGI.html
------------------------------
Date: Mon, 4 Jun 2001 20:25:17 +1000
From: mgjv@tradingpost.com.au (Martien Verbruggen)
Subject: Re: Frustrated people (not) answering questions
Message-Id: <slrn9hmogc.tjn.mgjv@martien.heliotrope.home>
[This is a bit too offtopic, followups set]
\begin{offtopic]
On Mon, 4 Jun 2001 04:07:44 +0000 (UTC),
Ryan Travis Tate <ryantate@OCF.Berkeley.EDU> wrote:
> brian d foy <comdog@panix.com> wrote:
> | you'd have to go a long way to support either of those. Outlook
> | cost the business sector billions of dollars in damages last
> | year said the New York Times. that doesn't sound like a better
> | world.
>
> i think we've identified the most central point of disagreement :-)
>
> many businesses continue to run Outlook because -- in my opinion --
> they find those costs, and the risk of greater costs in the future,
> are outweighed by the benefits.
>
> it could also be argued that most companies aren't very good at
> weighing costs and benefits when it comes to IT decisions. and that
> would be a strong argument.
Yep. Business in general is very bad at weighing costs and benefits in
IT. Also in many other areas, but that's a different story.
> of course, your statement could be rewritten, "Apache cost the business
> sector billions of dollars in damages last year." unpatched copies of
> Outlook are a problem; unpatched Unix OSes and webservers are
> problems, too.
No, that is not true, and it isn't the same thing. Outlook is flawed by
design. You can patch tyhe thing all you want, and it will still cost
businesses loads of money. Simply the investment in the necessary
anti-virus software is one such cost. Viruses spreading slightly faster
than the anti-virus is another cost. Many Microsoft products are flawed
in this regard.
Besides that, if Apache had really cost businesses billions of dollars,
we would have heard about it.
Software that is flawed by design costs money. Other software _can_
potentially cost money too, and that can be fixed by simple patches.
> unpatched Things are also all solutions (ala Matt's) ...
I'm sorry, but I don't seem to grok this.
Martien
\end{offtopic}
--
Martien Verbruggen |
Interactive Media Division | The world is complex; sendmail.cf
Commercial Dynamics Pty. Ltd. | reflects this.
NSW, Australia |
------------------------------
Date: Mon, 4 Jun 2001 22:27:24 +1000
From: "Tintin" <somewhere@in.paradise.net>
Subject: Re: Frustrated people (not) answering questions
Message-Id: <g9LS6.14$Xu4.585768@news.interact.net.au>
"Ryan Travis Tate" <ryantate@OCF.Berkeley.EDU> wrote in message
news:9ff1ig$vp2$3@agate.berkeley.edu...
[snipped loads of OT stuff]
>
> of course, your statement could be rewritten, "Apache cost the business
> sector billions of dollars in damages last year." unpatched copies of
> Outlook are a problem; unpatched Unix OSes and webservers are
> problems, too.
The statement could be rewritten as the above, but it would be blatantly
untrue and an absolute lie.
> unpatched Things are also all solutions (ala Matt's) ...
Even Microsoft is pretty responsive in getting patches out the doors these
days. Matt has no time or interest in updating his scripts.
------------------------------
Date: Mon, 4 Jun 2001 20:31:33 +1000
From: mgjv@tradingpost.com.au (Martien Verbruggen)
Subject: Re: help with hashes
Message-Id: <slrn9hmos5.tjn.mgjv@martien.heliotrope.home>
On Sun, 3 Jun 2001 19:44:44 -0400,
Steve Marshall <smarshal@attcanada.ca> wrote:
> Howdy!
> I am trying to parse a text file where I can pull out identical header lines
> that are repeated throughout the file. I also want to retrieve two
> additional lines (Hello and Goodbye) within each record.
I could interpret your question, your code and your data in many
different ways. Instead of trying to write down all those ways, which
would cost me a considerable amount of time, I'm going to ask you to be
more precise.
You say "identical header lines", and, indeed, your data contains these
identical lines. However, your code suggests that they may not all be
identical. Please, show some real data.
You state you have trouble getting the "Hello" and "Goodbye" lines. In
your example, they're the 3rd and 4th line after the header, or the last
and last-but-one line before the next header. They're alos the only line
that contain Hello and Goodbye. They're also the only lines that contain
5 or 7 consecutive alpha characters, both numbers being prime.
What are the real criteria to find those lines? What is your real data?
Martien
--
Martien Verbruggen |
Interactive Media Division | We are born naked, wet and hungry.
Commercial Dynamics Pty. Ltd. | Then things get worse.
NSW, Australia |
------------------------------
Date: Mon, 4 Jun 2001 16:26:58 +0800
From: "jackkon" <jck1@mail2000.com.tw>
Subject: how to dynamic append row in table with perl CGI module?
Message-Id: <9ffh0r$e2p@netnews.hinet.net>
hi all:
I want to read data from access and put it into the table by cgi.
I use the CGI module.
Now, I can read the data correctly.
But I fail to put the data to the table by cgi.
My code is below.
It is the only one method that I can think(I am a newer in cgi).
Dose any better method to make the mission?
Thanks for your help.
============================================================================
==
use CGI;
use Win32::ODBC;
my $cgi=new CGI;
print $cgi->header;
print $cgi->start_html;
my $DSN='myaccess';
my $TABLE='cust';
if(!($dbm=new Win32::ODBC($DSN))){
print "Reason: " . Win32::ODBC::Error(). "\n";
exit;
}
my @data=undef;
my @title=undef;
if(! $dbm->Sql("SELECT * FROM $TABLE")){
@title=$dbm->fieldnames();
while($dbm->fetchrow()){
my %row_hash=$dbm->DataHash();
my @row_array=values %row_hash;
push(@data, \@row_array);
}
}
my $MYTABLE=undef;
$MYTABLE.='
print $cgi->table(
{-border=>2},
$cgi->caption({-align=>top}, "FROM DATABASE",),
$cgi->Tr(
{-align=>center, -valign=>top},
[
$cgi->th(\@title),';
for($i=0; $i<=$#data; $i++){
$MYTABLE.='$cgi->td('.$data[$i].'),';
}
$MYTABLE.='
],
),
);';
eval ($MYTABLE); ## not work
print $cgi->end_html;
------------------------------
Date: Mon, 04 Jun 2001 13:15:13 +0200
From: Abe Timmerman <abe@ztreet.demon.nl>
Subject: Re: How to force CPAN installation configuration
Message-Id: <5brmht0g2p2f0lbi7bfjd1uc6vu4rtq6vv@4ax.com>
On Mon, 04 Jun 2001 02:24:56 GMT, "Ben Kennedy" <bkennedy99@Home.com>
wrote:
>
> "Tim" <timster@worldnet.att.net> wrote in message
> news:3B1B1EE4.5B747B7C@worldnet.att.net...
> > I ran "perl -MCPAN -e shell" once and it asked me a whole bunch of
> > questions which I just casually hit Return to accept the defaults. Now
> > I want to do it again with specific answers, but it doesn't ask me the
> > questions again. How do I force it to go through the configuration ALL
> > over again? On a Linux box, it created ~/.cpan/CPAN/MyConfig.....or
> > some such, but I couldn't figure out where it keeps that info in
> > Windows98. [I'd rather not use the 'o conf' command at the cpan>
> > prompt.]
>
> CPAN.pm creates a file called Config.pm, which gets stored in @INC. See the
> "configuration" section in "perldoc CPAN" to get the details about it. The
> short answer is that you should delete this file to force CPAN.pm to ask all
> the config questions again. Hope this helps--
perl -MCPAN::FirstTime -e CPAN::FirstTime::init
--
Good luck, Abe
Amsterdam Perl Mongers http://amsterdam.pm.org
perl -e '$_=sub{split//,pop;print pop while@_};&$_("rekcah lreP rehtona tsuJ")'
------------------------------
Date: Mon, 4 Jun 2001 11:59:46 +0100
From: "Muddy Cat" <muddycat@hotmail.com>
Subject: locking files before writing data (?)
Message-Id: <thmqf2kcqmi922@corp.supernews.co.uk>
I've got a very simple program that is writing the 'username' and IP address
of a user to a text file when they log onto a certain web page. The code is
something like this:
if ($LogUsers == 1){
&trim_log;
open(USERLOG, ">>log.dat");
seek(USERLOG,0,0);
print USERLOG "$username (" . $ENV{'REMOTE_ADDR'} . ") - " . localtime() .
"\n";
close(USERLOG);
}
the "trim_log" bit just takes away the oldest entry if the file is getting
too big.
Is this safe to use "as is", or are you supposed to 'lock' files to prevent
*bad things* from happening, for example, if two or more people tried to
log-in at exactly the same time? I've read a little about the flock()
function, but am not sure to what extent I need to be locking files. Is it
worth doing for any size of project, or only if you are expecting an awful
lot of traffic?
Thanks.
------------------------------
Date: Mon, 04 Jun 2001 11:19:17 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: locking files before writing data (?)
Message-Id: <2krmhtc48ae2je1li8t9cn0e1l537llk3h@4ax.com>
Muddy Cat wrote:
>&trim_log;
>open(USERLOG, ">>log.dat");
>seek(USERLOG,0,0);
>print USERLOG "$username (" . $ENV{'REMOTE_ADDR'} . ") - " . localtime() .
>"\n";
>close(USERLOG);
>}
>
>the "trim_log" bit just takes away the oldest entry if the file is getting
>too big.
If you think your older data will be moved back in the file, just
because you're printing new data to the beginning of the file, you're
badly mistaking. This will *overwrite* what is already there. So each
new log entry will overwrite the previous entry, minus what was longer
than the new entry.
Putting a new line at the front of a large file is a computer-intensive
operation, because everything in the file needs to be rewritten. It
sounds like a bad idea.
--
Bart.
------------------------------
Date: Mon, 4 Jun 2001 12:23:20 +0100
From: "Muddy Cat" <muddycat@hotmail.com>
Subject: Re: locking files before writing data (?)
Message-Id: <thmrs0pib1ks3c@corp.supernews.co.uk>
"Bart Lateur" <bart.lateur@skynet.be> wrote in message
news:2krmhtc48ae2je1li8t9cn0e1l537llk3h@4ax.com...
> Muddy Cat wrote:
>
> >&trim_log;
> >open(USERLOG, ">>log.dat");
> >seek(USERLOG,0,0);
> >print USERLOG "$username (" . $ENV{'REMOTE_ADDR'} . ") - " . localtime()
.
> >"\n";
> >close(USERLOG);
> >}
> >
> >the "trim_log" bit just takes away the oldest entry if the file is
getting
> >too big.
>
> If you think your older data will be moved back in the file, just
> because you're printing new data to the beginning of the file, you're
> badly mistaking. This will *overwrite* what is already there. So each
> new log entry will overwrite the previous entry, minus what was longer
> than the new entry.
>
> Putting a new line at the front of a large file is a computer-intensive
> operation, because everything in the file needs to be rewritten. It
> sounds like a bad idea.
>
> --
> Bart.
Thanks, but I knew that already. Oddly... the code has just been appending
to the end of the file, rather than overwriting. The "seek" bit has since
been taken out. I originally did want "newest at the top" but, as you say,
it's a bit too much of a chore.
Cheers for your input though.
------------------------------
Date: Mon, 04 Jun 2001 10:58:34 +0100
From: Simon Andrews <simon.andrews@bbsrc.ac.uk>
Subject: Re: Perl on Windows question
Message-Id: <3B1B5BCA.DD51191@bbsrc.ac.uk>
Chas Friedman wrote:
>
> Does anyone know why the following behavior occurs? I have noticed
> that when running various builds of Perl in a DOS window in Windows 98
> that the statement
> $a=`dir`;
> produces different results on different machines.
There are a couple of potential problems with this. Firstly (and I
appreciate this may not be the code you are actually using), it is not a
good idea to use $a as a variable within a script (see perldoc -f sort
for details).
Additionally you might be better off capturing the output into an array
rather than a scalar (@list = `dir`). Each element of the array will be
a line in the output of the command. This will make things easier to
work with afterwards and may help debug where things are going wrong. I
have used this approach on several Win32 systems without problem.
As a slightly separate issue, you don't show this here, but there are
big differences in the way that different flavours of windows handle
path names (for long dir names or ones with spaces) in the shell. Win98
is especially inflexible in this regard - but this shouldn't be an issue
if you are just running dir in the current directory.
Finally, you didn't say what you were doing with the output of dir, but
for most file operations you are probably better off using an internal
glob rather than calling dir, (@files = <*>) and then using standard
file tests to sort out the results. In fact there is even the
File::DosGlob module for enhanced globbing under Win32
(http://search.cpan.org/doc/JHI/perl-5.7.1/lib/File/DosGlob.pm), and is
(I think) even part of the standard distribution now. This uses a
highly parsed call to dos dir commands. Why do it yourself when someone
has already done it for you!? Take a look at C(or
whatever):/perl/bin/perlglob.bat for details.
Hope this helps
Simon.
------------------------------
Date: Mon, 04 Jun 2001 11:43:16 +0100
From: Paul Boardman <peb@bms.umist.ac.uk>
Subject: Re: perl/cgi and dynamic hyperlink
Message-Id: <3B1B6644.5E8AB969@bms.umist.ac.uk>
"Godzilla!" wrote:
>
> buggs wrote:
>
> > krakle wrote:
<snip woman question & support for Godzilla!>
> You are wasting your time although your motivation
> and intent are both good. This is commendable.
>
> After an analysis of his header information upon
> reading his first article, I recognize this one
> for the troll he is. Subsequent articles confirm
> he is known to me via recognizable style and
> troll methodology.
<snip troll rant>
> This is just one aspect of internet anonymity;
> it affords an infinite supply of fake personalities.
This is a recurring theme in your posts Godzilla!. You have accused a
few people here of having many monikers (I seem to remember an
accusation against Anno Siegel fairly recently).
I was just wondering what your reasoning is?
To be perfectly honest, it makes you come across as rather paranoid.
There's no offence meant here, I'm just curious.
Cheers
Paul
------------------------------
Date: 4 Jun 2001 06:22:25 GMT
From: "Scott R. Godin" <webmaster@webdragon.unmunge.net>
Subject: Re: perlre: delete content of $1
Message-Id: <9ff9f1$3or$1@216.155.33.105>
In article <3B19936D.C3AA4FD4@stomp.stomp.tokyo>,
"Godzilla!" <godzilla@stomp.stomp.tokyo> wrote:
[snip]
| #!perl
|
| print "Content-type: text/plain\n\n";
|
| $a='warning';
|
| &one;
|
| sub one
| {
| $a =~/^wa(.*)ng/;
| print "Sub One \$1 is: $1 \n";
| }
|
| &two;
|
| sub two
| {
| $a =~/^Wa(.*)nG/;
| print "Sub Two \$1 is: $1 \n";
| }
[snip]
| exit;
|
|
| PRINTED RESULTS:
| ________________
|
|
| Sub One $1 is: rni
| Sub Two $1 is:
You bring up a good point here and one that's not readily apparent to a
new person.. the fact that the closure surrounding the sub is what
limits the 'life' of $1 above.
To the OP: you might want to use the qr// mechanism if your Perl version
is >5.004 and if you have many regexes to test in the context of your
program ... then you can loop over a @regex array containing your
various quoted regexes, sending your variable and your regex to the same
subroutine, which will, by stint of closure, prevent the $1 from
carrying over.
--
init one, perl two, carry the $1...
------------------------------
Date: Mon, 4 Jun 2001 16:02:37 +0800
From: "John Lin" <johnlin@chttl.com.tw>
Subject: Re: perlre: delete content of $1
Message-Id: <9fff77$a35@netnews.hinet.net>
"Tad McClellan"
> peter pilsl wrote:
> >$a=~/$pre(.*)$post/;
> >
> > If it fails, $1 should be empty, but in fact it is not set
> >and therefore has the value of the preceeding patternmatching-operation.
> Thats how it is _supposed_ to work.
> The dollar-digit variables are only set on successful matches.
> Unsuccessful matches leave them with their previous values.
I had similar problem with pos(). Once I wrote a piece of code like:
$_ = 'Good evening, sir.';
if(/Good/g and /\G morning/g and /\G,/g and /\G sir\./) {
print "Successful\n";
}
else {
print "Mismatch happened near ",pos(),"\n";
}
Eh, the unsuccessful match didn't leave everything with their
previous values, so my code became buggy.
John Lin
------------------------------
Date: Mon, 4 Jun 2001 07:00:42 +0000 (UTC)
From: see-sig@from.invalid (David Efflandt)
Subject: Re: Problem with Capturing Program Output under Win98
Message-Id: <slrn9hmcgp.9mc.see-sig@typhoon.xnet.com>
On Mon, 04 Jun 2001, matessman@yahoo.com <matessman@yahoo.com> wrote:
> i am running activestate perl 5.6 on a win98 2e system and i am trying
> to run a program and capture the output that is otherwise written to
> the screen. my understanding on how to do this from o'reilly's is to
> open a filehandle using a program with a pipe that redirects the
> output:
>
> :
> :
> open (PROCOUTPUT, "programname data.file | ");
>
> $output = <PROCOUTPUT>;
>
> close (PROCOUTPUT);
>
> print $output;
> :
> :
>
> when i do this no output is captured from the program and i get an
> error message saying that $output is uninitialized. the program is
> capable of generating output because when i use the statement
>
> system ("programname data.file");
>
> the output is generated as expected. also, when i use the statement
>
> system ("programname data.file >output.dmp");
>
> the file output.dmp is created but has size 0, indicating that no
> output was captured.
Maybe the output goes to stderr instead of stdout. I am not quite sure of
the proper syntax for DOS/Win, but the Unix way to redirect STDERR to
STDOUT would be:
open (PROCOUTPUT, "programname data.file 2>&1 | ");
But if you expect multiline output, read it as a list
@output = <PROCOUTPUT>; instead of as a scalar (which would only get the
first line).
--
David Efflandt (Reply-To is valid) 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: Mon, 4 Jun 2001 06:26:30 +0200
From: "David Tandberg-Johansen" <david@datajo.no>
Subject: Reading mail
Message-Id: <a3ES6.4912$vu4.514850@news3.oke.nextra.no>
Hello!
I am trying to make a program tha reads mail thrue Mail::POP3.
I can read the mail, but when the sender send the mail in HTML format i can
see all the html stuff and so.
How can I remove that?Any hint wil be preciated
David
------------------------------
Date: Mon, 4 Jun 2001 21:02:24 +1000
From: mgjv@tradingpost.com.au (Martien Verbruggen)
Subject: Re: Recursing a directory tree
Message-Id: <slrn9hmqm0.tjn.mgjv@martien.heliotrope.home>
On Mon, 04 Jun 2001 02:45:03 GMT,
Nan Wang <nwang@shell3.shore.net> wrote:
> Benjamin Goldberg <goldbb2@earthlink.net> wrote:
>> Nan Wang wrote:
>>>
>>> sub traverse {
>>> no strict 'refs';
>>> my ($startdir,$i)=@_;
>>> $i++;
>>> my $FH="FH"."$i";
>>> opendir ("$FH",$startdir) or die "blah";
[I will try not to repeat what the previous poster already said.]
a local(*FH) would have done much better than the fiddling with symrefs.
Also, it's probably a bit misleading to call a directory handle FH.
Under modern Perls, you can just use a lexically scoped variable, like
the previous poster indicated.. The local or lexical will also
automatically close the directory when the scope ends.
Also, it's adviseable to include $! in the error message for a system
call.
>>> my @allfiles=grep !/^\.\.?$/, readdir $FH;
>>> closedir ($FH);
>>> my $file='';
Note that $file is a lexically scoped variable which springs into
existence here, and will be gone at the end of the sub.
>>> foreach $file (@allfiles) {
Why didn't you just do
foreach my $file (@allfiles)
or even leave out the whole temporary array?
>>> chomp $file;
Why chomp this? readdir doesn't magically append newlines to your file
names.
>>> my $file="$startdir/$file";
Note that here you have a _new_ lexically scoped variable $file, whose
existence will end at the end of the foreach loop.
>>> if (-f $file) {
>>> # do whatever
>>> } elsif (-d $file) {
>>> &traverse ($dir,$i);
>>> }
>>> }
>>> }
>
>> And where does $dir come from?
>
> $dir = $file. It's part of a much larger program I did, so I snipped out
> the irrelevant parts and I guess something got lost in the translation.
Not here, it isn't. $dir is not $file. It first of all depends on which
$file you think it is, since there are two. Then I would like you to
point out where in your code $dir gets the value that is stored in the
lexical $file. If $file was a global, you could have fiddled with
aliases, but you haven't done that, so... What is $dir?
I don't think your code ever worked.
> It's possible $i is unnecessary, it's too long ago I can't remember why I
> did it this way.
I'd advise you to severely review your code before submitting it again.
it has some flaws that generally are frowned upon in this newsgroup, and
it doesn't actually do what you say it is supposed to do. Even if the
$dir is fixed to read $file, then the program could still use quite a
bit of cleaning up before being something that you should post here.
If I had to come up with a subroutine that does this, I'd probably write
it more like:
sub traverse
{
my $dir = shift;
opendir (my $dh, $dir) or
warn("Couldn't opendir '$dir': $!\n"), return;
while (my $file = readdir($dh))
{
next if $file eq '.' || $file eq '..';
if (-d "$dir/$file")
{
print "DIR: $dir/$file\n";
traverse("$dir/$file", @_);
}
else
{
print "NONDIR: $dir/$file\n";
}
}
}
But I wouldn't actually use this in production code. You see, it doesn't
take any symbolic links into account, and it doesn't atke care of
circularities in the file systems in any way. A set of symlinks pointing
in the wrong direction could set up an infinite loop.
File::Find takes better care of that. While it isn't perfect, it is
generally much better than anything you quickly can write yourself.
Martien
--
Martien Verbruggen |
Interactive Media Division |
Commercial Dynamics Pty. Ltd. | Curiouser and curiouser, said Alice.
NSW, Australia |
------------------------------
Date: Mon, 04 Jun 2001 09:31:40 +0100
From: John Imrie <07950232225@one2one.net>
Subject: Re: Seek and destroy ! - s/// problems
Message-Id: <3B1B476B.1DAF264D@one2one.net>
>
> Sorry, I realized what I did wrong.
> $filename =~ s/^the//i;
>
> Typo error, my morning coffee hadn't kicked in yet.
>
> Thanks,
> Matt
The reasion why this works and the OP's version don't is because of the ~ after the =
without the ~ the s/// operator does the substitution on the $_ variable with the ~ it bindes to the $filename
variable. Hence the substitution is done on $filename.
In both cases the s/// operator returnes the number of substitutions which is why the OP was getting a number back
------------------------------
Date: 4 Jun 2001 06:35:53 GMT
From: "Philip M. Gollucci" <philip@p6m7g82k.student.umd.edu>
Subject: SHTML in CGI files
Message-Id: <9ffa89$mht$1@hecate.umd.edu>
I have a PERL file /cgi-bin/Administration/file.cgi which does a task. I would like to be able to do
<!--#include virtual=\"/cgi-bin/Calendar/print.cgi\"--> in this file. This doesn't work, because apache doesn't realize that its
a file which needs to be handled by server_parse (ie .shtml).
Does anybody know any simple ways of getting around this ? I do have root access to the server, so I can change httpd.conf if necessary.
Please respond to me via philip@p6m7g8.com. This is not the from address. Thanks !
--
*****************************************************************************
Philip M. Gollucci (p6m7g8)
Web-site : http://www.p6m7g8.com
: http://test.p6m7g8.com
: http://database.p6m7g8.com
E-mail : gollucci@wam.umd.edu
philip@p6m7g8.com
Phone : 301.249.6261 (Home)
301.314.3118 (College Fall, Winter, Spring)
301.314.3445 (College Summer)
Major : Computer Science
Minor : Classical & Jazz Performance
Current Jobs : Science, Discovery, & the Universe
Webmaster
URL: http://www.sdu.umd.edu
DEVEL: http://www.test.p6m7g8.com
EJPress.com
Database/PERL Programmer & System Admin
URL : http://www.ejpress.com
Resume : http://www.p6m7g8.com/resume-20010424-170825.txt
Mirrors of : http://apache.org at http://www.p6m7g8.com/mirrors/apache
http://mysql.com at http://www.p6m7g8.com/mirrors/mysql
http://cpan.org at http://www.p6m7g8.com/mirrors/CPAN
http://xemacs.org at http://www.p6m7g8.com/mirrors/xemacs
ftp://xemacs.org at ftp://p6m7g8.com/pub/mirrors/xemacs
*****************************************************************************
------------------------------
Date: Mon, 4 Jun 2001 22:32:39 +1000
From: "Tintin" <somewhere@in.paradise.net>
Subject: Re: SHTML in CGI files
Message-Id: <beLS6.15$or4.494683@news.interact.net.au>
"Philip M. Gollucci" <philip@p6m7g82k.student.umd.edu> wrote in message
news:9ffa89$mht$1@hecate.umd.edu...
> I have a PERL file /cgi-bin/Administration/file.cgi which does a task. I
would like to be able to do
> <!--#include virtual=\"/cgi-bin/Calendar/print.cgi\"--> in this file.
This doesn't work, because apache doesn't realize that its
> a file which needs to be handled by server_parse (ie .shtml).
>
> Does anybody know any simple ways of getting around this ? I do have root
access to the server, so I can change httpd.conf if necessary.
So you know this is OT and not a Perl question, but still post it to
comp.lang.perl.misc, plus it is a FAQ, see:
http://httpd.apache.org/docs/misc/FAQ.html#ssi-part-i
[snipped the longest sig I've ever seen in my life]
------------------------------
Date: Mon, 04 Jun 2001 08:28:15 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: substing and locating
Message-Id: <ukhmhtohh29ko3atinprpdhk26jrd1kshv@4ax.com>
Tom Bowes wrote:
>I am making a simple databasing program and have concluded that it should be
>easy if only I can get someone to explain to me how to do two things.
>First off how to find the location(as a numerica value) of a particular
>character in a string?
>and secondly how only take part of a string for instance the last three
>characters. As an extension of that is thier a command to find the length of
>a string
If those are your questions, then I believe that creating a database
program is still a bit out of your league. All three are basic perl
functions: ord, substr, index.
--
Bart.
------------------------------
Date: 04 Jun 2001 02:21:56 -0400
From: Joe Schaefer <joe+usenet@sunstarsys.com>
Subject: Re: taint + netstat = error
Message-Id: <m3itickbnf.fsf@mumonkan.sunstarsys.com>
Ryan Travis Tate <ryantate@OCF.Berkeley.EDU> writes:
> has anyone formally reported this bug?
No, but there's some related ones already reported,
and I think it would be a good idea to report yours also.
Do a search for "taint" bugs at
http://bugs.perl.org/
to see a list of what taint-related bugs are still open.
> i don't know how that
> works, if anyone else does and has time, please do, or post how it is
> done.
See the perlbug documentation for the reporting instructions:
% perldoc perlbug
[...]
If you're going to use the code below, I'd recommend adding
a comment to explain why you wrote it like this way:
> #!/opt/local/bin/perl5.005 -wT
>
> use strict;
>
> $ENV{PATH}='/usr/bin';
>
> unique_id();
>
>
>
> sub unique_id{
> my $id = join("." => (
> $0,
> $$,
> time(),
> unpack("%32L*", `ps -al`)
> ));
# uses idio-matic Perl to avoid a taint bug
# details in clpm article <9f9sr6$1k64$1@agate.berkeley.edu>
# Subject: taint + netstat = error
> $id .= "." . unpack("%32L*", `netstat -in`);
> $id;
> }
HTH
--
Joe Schaefer "Life is just one damn thing after another."
--Mark Twain
------------------------------
Date: 04 Jun 2001 12:36:08 +0100
From: nobull@mail.com
Subject: Re: use Module (if it exists)
Message-Id: <u9n17omq8n.fsf@wcl-l.bham.ac.uk>
"Todd Smith" <todd@designsouth.net> writes:
> <nobull@mail.com> wrote in message news:u9d78qdb3s.fsf@wcl-l.bham.ac.uk...
>
> > Better still, since this is in BEGIN{}, why not keep it as use() and
> > wrap it in eval?
> >
> BEGIN{
>
> $cgi = eval 'use CGI' ? 1 : 0;
> $s = eval 'use sdsdsd' ? 1 : 0;
>
> }
>
> print "cgi($cgi), s($s)\n";
>
> prints: cgi(0), s(0)
So? Don't throw the baby out with the bathwater:
BEGIN{
$cgi = eval 'use CGI; 1';
$s = eval 'use sdsdsd; 1';
}
print "cgi($cgi), s($s)\n";
prints:
Use of uninitialized value in concatenation (.) at - line 6.
cgi(1), s()
If you don't like using undef to represent false then put '!!' in front
of the calls to eval() (or '|| 0' after).
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
Date: Mon, 04 Jun 2001 06:16:51 GMT
From: Tim <timster@worldnet.att.net>
Subject: Which nmake??
Message-Id: <3B1BCFCB.BA07FB56@worldnet.att.net>
I installed the Expat module from sourceforge.com. Then I did: "perl
-MCPAN -e shell" and then "force install XML::Parser". After a bunch of
output, I got:
Writing Makefile for XML::Parser::Expat
Writing Makefile for XML::Parser
Microsoft (R) Program Maintenance Utility Version 1.50
Copyright (c) Microsoft Corp 1988-94. All rights reserved.
makefile(475) : fatal error U1035: syntax error : expected ':' or '='
separator
Stop.
C:\GNU\bin\nmake.exe -- NOT OK
Running make test
Can't test without successful make
Running make install
make had returned bad status, install seems impossible
Am I using the right nmake?? I can't remember which site I got
nmake.exe from, but I just stuck it in C:\GNU\bin even though it wasn't
from the GNU site. Where did you guys get your nmake.exe? [Oh, I am
running Windows98SE.]
------------------------------
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 1052
***************************************
