[16779] in Perl-Users-Digest
Perl-Users Digest, Issue: 4191 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Aug 31 14:10:36 2000
Date: Thu, 31 Aug 2000 11:10:22 -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: <967745421-v9-i4191@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Thu, 31 Aug 2000 Volume: 9 Number: 4191
Today's topics:
Re: legal date <bart.lateur@skynet.be>
Mail::MH -- Dead or merely sleeping? (John Reinhagen)
mod_perl redirection problem asmussen@home.com
Re: output fun <bart.lateur@skynet.be>
Re: pack function <tzz@iglou.com>
Re: pack function <rmore1@my-deja.com>
Re: Parsing a Excell table - or - a "Tab New_Line" text <info@digitaltango.com>
Pattern Matching -- problem with special characters ( dastanle@my-deja.com
Re: Pattern Matching -- problem with special characters <care227@attglobal.net>
Re: Pattern Matching -- problem with special characters nobull@mail.com
Perl/ODBC/SQL Wierdness? <sg@loralskynet.com>
Re: regexp and accentuated letters <bart.lateur@skynet.be>
Re: Removing an entry from a text file (Richard J. Rauenzahn)
Re: Sending mail with Perl for Windows NT?? (PD)
Re: Sorting a Tab Delimited Text File By Second Field nobull@mail.com
Re: Sorting a Tab Delimited Text File By Second Field <rmore1@my-deja.com>
Re: TMTOWTDI - but how best to do this ?? nobull@mail.com
Re: Using SDBM_File to compare large files. (Anno Siegel)
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 31 Aug 2000 15:26:40 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: legal date
Message-Id: <27usqscvrpgmts9r9sd1pbfmnpnfjecolj@4ax.com>
eastking@my-deja.com wrote:
>> Anyway, localtime and Time::Local's timelocal() do that for you:
>But , I can NOT find Time::Locale in CPAN
Is this a joke? You have one too many "e", it is "Time::Local", not
"Time::Locale". "Locale" is a whole different thing.
And Time::Local is part of the standard distribution. You ought to have
it already.
--
Bart.
------------------------------
Date: Thu, 31 Aug 2000 16:12:51 GMT
From: welcomerain@savageoasis.fc.net (John Reinhagen)
Subject: Mail::MH -- Dead or merely sleeping?
Message-Id: <slrn8qt105.h2u.welcomerain@ct.fowkq>
Hash: SHA1
I'm one of a small group of programmers who would like to implement some
Perl objects to deal with various entities for the MH mail client --
folders, messages, sequences, and so on. Sadly, the existing Mail::MH entry
in CPAN gives every appearance of being an orphan; the author link doesn't
work (who's this MRG chap?), the code isn't available, and it doesn't
promise to support OO. These facts make it less than useful for our purposes.
Is MRG around, and if so, could I get his contact information? Failing
that, is there a procedure for adopting CPAN orphans?
JCR
Version: GnuPG v1.0.0 (GNU/Linux)
Comment: http://www.gnupg.org/ -- GPLed OpenPGP-compatible encryption
iD8DBQE5roQDf/nQEa9cIUsRAuJhAKCypsn6nxSsa3KcfAOQOAy0F82ihQCfQV5H
drQyqvfAXEWRDUPtJ32etQY=
=d/Fo
-----END PGP SIGNATURE-----
------------------------------
Date: Thu, 31 Aug 2000 16:43:39 GMT
From: asmussen@home.com
Subject: mod_perl redirection problem
Message-Id: <%Wvr5.13498$Sh4.118791@news1.rdc1.ne.home.com>
We are moving several web sites off of servers running Apache 1.3.6/mod_perl
1.20, onto Stronghold 3 servers (Apache 1.3.12/mod_perl 1.22) but we're having
problems with some code that isn't working the same way under the new web
servers. It doesn't seem to be a Stronghold problem because I also tried
running the code on my RedHat 6.2 box with Apache 1.3.12/mod_perl 1.21 and
I get the same problem. I'm not sure if my problem is Apache or perl related
so I'm crossposting this to newsgroups relevant for both.
I won't put up the live code that is having problems, but here is an example
program that suffers the exact same symptoms:
#!/usr/local/bin/perl
print "Location: http://name.of.test.box/index.html"
(name.of.test.box obviously being replaced by the hostname of the box the
code is being tested on at the time.)
Now, on the old server this code would redirect you to the main index.html
page of the site whether it was run out of cgi-bin or out of a directory
set up to use mod_perl. On the new servers the code works if it is run
as a normal cgi program, but if it is run from a directory using mod_perl
then my web browser wants to save a file called 'test.pl' and the contents
of the file end up being just 'Location: http://name.of.test.box/index.html'
Telneting to port 80 and doing a 'GET /cgi-bin/test.pl' and a 'GET
/perl/test.pl' shows that the one run out of cgi-bin produces:
GET /cgi-bin/test.cgi
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 2.0//EN">
<HTML><HEAD>
<TITLE>302 Found</TITLE>
</HEAD><BODY>
<H1>Found</H1>
The document has moved <A HREF="http://localhost/index.html">here</A>.<P>
<HR>
<ADDRESS>Apache/1.3.12 Server at cx136278-g.omhaw1.ne.home.com Port 80</ADDRESS>
</BODY></HTML>
but the one run out of perl produces:
GET /perl/test.pl
Location: http://localhost/index.html
Now I'm a unix administrator, not a web/perl programmer (although I do
program some perl), but unfortunately the guys that originally set up the
code are not with us, and the current maintainers are more windows guys
who develop other things and know just enough perl to maintain the existing
code, so I've ended up being the one troubleshooting this. Therefore if it's
something really obvious, that's why we have no clue on this.
I'm hoping this is some sort of configuration issue, or perl module that needs
to be tweaked or something like that so we don't have to change the existing
web code, but any insight at all into this problem would be helpful. Thanks.
Shawn Asmussen
------------------------------
Date: Thu, 31 Aug 2000 17:31:56 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: output fun
Message-Id: <c45tqs4s68qc66vgcl45b5djsbvjnudu9p@4ax.com>
ankban4@my-deja.com wrote:
>Without using the formatting features , how do i print an output like
>this . i tried but my code is too huge and ugly.
>
> ABCDEFGFEDCBA
> ABCDEF FEDCBA
> ABCDE EDCBA
> ABCD DCBA
> ABC CBA
> AB BA
> A A
$_ = 'ABCDEFG';
while(length) {
printf "%-7s%6s\n", $_, scalar reverse substr $_, 0, 6;
chop;
}
--
Bart.
------------------------------
Date: 31 Aug 2000 13:13:01 -0500
From: Ted Zlatanov <tzz@iglou.com>
Subject: Re: pack function
Message-Id: <967741729.4971@iglou.com>
In article <8olpi9$p3d$1@news.netmar.com>, mgopi@csa.iisc.ernet.in wrote:
>can anybody explain what exactly a perl function does. does it find the bit
>pattern of the argument and puts them in an array or what.
You can type "perldoc -f pack" (look up the 'pack' function) at the command
line on most systems, and see the relevant documentation. HTML
documentation may also be available.
Pack and its companion unpack allow you to put data in your favorite format
in a string before sending it off somewhere, and to extract data from that
string later. There are many examples of their use in the documentation.
--
Teodor Zlatanov <tzz@iglou.com>
"Brevis oratio penetrat colos, longa potatio evacuat ciphos." -Rabelais
------------------------------
Date: Thu, 31 Aug 2000 17:47:54 GMT
From: Rich More <rmore1@my-deja.com>
Subject: Re: pack function
Message-Id: <8om5o1$f4$1@nnrp1.deja.com>
In article <967741729.4971@iglou.com>,
Ted Zlatanov <tzz@iglou.com> wrote:
> In article <8olpi9$p3d$1@news.netmar.com>, mgopi@csa.iisc.ernet.in
wrote:
> >can anybody explain what exactly a perl function does. does it find
the bit
> >pattern of the argument and puts them in an array or what.
>
> You can type "perldoc -f pack" (look up the 'pack' function) at the
command
> line on most systems, and see the relevant documentation. HTML
> documentation may also be available.
>
> Pack and its companion unpack allow you to put data in your favorite
format
> in a string before sending it off somewhere, and to extract data from
that
> string later. There are many examples of their use in the
documentation.
Here is some sample code....
#!/usr/local/bin/perl
my $value;
$value = pack('C*', 255 );
print unpack('C*',$value),"\n";
print unpack('B*',$value),"\n";
print unpack('H*',$value),"\n";
print "=" x 15 ,"\n";
$value = pack('H*', "FF" );
print unpack('C*',$value),"\n";
print unpack('B*',$value),"\n";
print unpack('H*',$value),"\n";
=============== OUTPUT =====================
255
11111111
ff
===============
255
11111111
ff
--
=============================
Richard More
http://www.richmore.com/
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 31 Aug 2000 15:18:43 GMT
From: "Etienne Laverdiere" <info@digitaltango.com>
Subject: Re: Parsing a Excell table - or - a "Tab New_Line" text file?
Message-Id: <nHur5.208587$Gh.4113685@news20.bellglobal.com>
Hi, I finaly found the way to parse a field having more than 255 characters.
Thanks.
Still looking to pase the right DATATYPE.
-- Etienne Laverdiere
"Etienne Laverdiere" <info@digitaltango.com> wrote in message
news:R3tr5.208502$Gh.4105314@news20.bellglobal.com...
> Hi all,
> Thanks Bob and Jeff,
>
> I read the last post of Jeff Zucker about the OBDC configuration to avoid
a
> strange Data Typing. However I did not understood many things. I still
would
> rather prefer to use the DBI: OBDC package.
> I didn't correct my datatyping bug right now (neither the fact that it
> cannot read more than 255 characters, plus all my "number fields" are
> interpreted with a additional 0 following a dot.)
>
> I am designing a quite large Intranet and I already use DBI:OBDC for the
> entire query to a database. (My prototype is working on Access right now).
> For a reason of portability, it would be better to minimize the ways I
query
> my database.
>
> Anyway. I will try the WIN32 solution if you think that the only way.
>
>
> Best Regards for all,
>
> Etienne Laverdiere
> Montreal
>
>
> Here's the code I am working on :
>
>
> #example of using DBI with Excel
> use DBI;
> #use Data::Dumper;
>
> my $drv = 'ODBC:driver=Microsoft Excel Driver (*.xls)';
> my $dir = 'd:/data/base_prod.xls'; #an Excel file
> my $table = '[Sheet1$]'; #a range name
> my $dbh = DBI->connect( "dbi:$drv;Dbq=$dir",,,{RaiseError=>1} )
> or die $DBI::errstr;
> $dbh->{LongReadLen}=100000; # I tried that
> $sth->{LongReadLen} =100000; # and that
> my $sth = $dbh->prepare("select * from $table");
> my $names=$sth->{NAME};
>
> ... # printing @$names
>
> print "dbh: " . $dbh->{LongReadLen} . "\n<br><br><br><br>";
> print "sth: " . $sth->{LongReadLen} . "\n<br><br><br><br>";
> my $array_ref = $dbh->selectall_arrayref($sth);
>
> ## and printing everything.. to field larger than 255 can be viewed. And
it
> stops the databases' parsing.
>
>
>
> "Bob Walton" <bwalton@rochester.rr.com> wrote in message
> news:39ADB61E.9F4E4AC@rochester.rr.com...
> > Etienne Laverdiere wrote:
> > >
> > > Yes you are right. I have the same problem now.
> > > "Mixed numbers and text in a given column don't work.!"
> > > I must find a way to import any data of any type, like reading for all
> field
> > > 'type=>text' for a number or a real text.
> > > I will continue searching. If you have a solution don't hesitate to
> write it
> > > here.
> > >
> > > Best Regards,
> > >
> > > Etienne Laverdiere
> > > Montreal
> > >
> > ...
> > Etienne, please see my reply to your note time-stamped Saturday at 11:51
> > PM EDT for how to do what you want to do using OLE. That method returns
> > whatever the contents of each cell is. If you can't find that note,
> > here is the code:
> >
> > use Win32::OLE;
> > use Data::Dumper;
> > # use existing instance if Excel is already running
> > eval {$ex = Win32::OLE->GetActiveObject('Excel.Application')};
> > die "Excel not installed" if $@;
> > die "Excel not running" unless defined $ex;
> > $wb=$ex->Workbooks(1);
> > $ws=$wb->Worksheets(1);
> > $ref=$ws->Range("B2:E10")->Value;
> > print Dumper($ref);
> >
> > That uses the first worksheet of the first workbook.
> > --
> > Bob Walton
>
>
------------------------------
Date: Thu, 31 Aug 2000 14:56:43 GMT
From: dastanle@my-deja.com
Subject: Pattern Matching -- problem with special characters (
Message-Id: <8olrmv$jdh$1@nnrp1.deja.com>
I am somewhat new to perl and would greatly
appreciate your help...
I am reading a column of input line by line. I
want to do something like:
if ($value =~ /$input_column_value/) {
}
but I keep getting an error because my
$input_column_value has a left parenthesis (
and it seems to be looking for the other ) to
match in the code. Is there an easy way (a
modifier perhaps) that will ignore the special
characters in the pattern match OR is there some
way to consider $input_column_value as a literal?
Thanks in advance!!!!
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 31 Aug 2000 11:28:52 -0400
From: Drew Simonis <care227@attglobal.net>
Subject: Re: Pattern Matching -- problem with special characters (
Message-Id: <39AE79B4.BEC80EFF@attglobal.net>
dastanle@my-deja.com wrote:
>
> I am somewhat new to perl and would greatly
> appreciate your help...
> I am reading a column of input line by line. I
> want to do something like:
>
> if ($value =~ /$input_column_value/) {
>
> }
>
> but I keep getting an error because my
> $input_column_value has a left parenthesis
$ perldoc perlre (look for the \Q doohickey)
$ perldoc -f quotmeta
------------------------------
Date: 31 Aug 2000 17:54:50 +0100
From: nobull@mail.com
Subject: Re: Pattern Matching -- problem with special characters (
Message-Id: <u9u2c1weud.fsf@wcl-l.bham.ac.uk>
dastanle@my-deja.com writes:
> I am somewhat new to perl and would greatly
> appreciate your help...
Please don't just dive in without lurking first.
> if ($value =~ /$input_column_value/) {
> Is there an easy way (a modifier perhaps) that will ignore the
> special characters in the pattern match
You don't mean "in the pattern match" you mean "in the interpolated
variable".
\Q
> OR is there some way to consider $input_column_value as a literal?
You don't mean a "literal". To simply find out if one string contains
another use the index() function.
Are you sure you don't want to just be checking equality? You can
check if two strings are equal with the eq operator.
> Thanks in advance!!!!
If you are going to do something in advance it should be "read the
newsgroup". This question is asked just about every week.
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
Date: Thu, 31 Aug 2000 11:09:18 -0400
From: Stephan Gross <sg@loralskynet.com>
Subject: Perl/ODBC/SQL Wierdness?
Message-Id: <9dssqskgv5anbb3lf98jtr712bhm8523vv@4ax.com>
Problem: my perl program returns different data than Access does
running the same SQL statement.
I have two tables in Access. Each contains a field with same name
(FIELD1) but different values. The tables are joined by another
common field (COMMON). I use the Access Query Design to get rows I
want, then switch to the SQL view and get the SQL statement, which
looks something like this:
"SELECT TABLE1.CUSTOMER, TABLE1.FIELD1, TABLE2.FIELD1
FROM TABLE1 INNER JOIN TABLE2 ON TABLE1.COMMON = TABLE2.COMMON"
When I run this in Access, I get unique values for TABLE1.FIELD1 and
TABLE2.FIELD1.
I then cut and paste the exact same SQL statement into my perl ODBC
program. When I run the program, TABLE1.FIELD1 returns the same value
as TABLE2.FIELD1.
Any ideas on what to do about this?
================================================================
Stephan Gross Loral Skynet sg@loralskynet.com
Senior Software Engineer 908-470-2388
------------------------------
Date: Thu, 31 Aug 2000 17:38:35 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: regexp and accentuated letters
Message-Id: <mn5tqs4cr75dv4v7h72tc9rijhv5bacm9p@4ax.com>
Stéphane BAUSSON wrote:
>I would like to know if it is possible in perl to grep a file with word
>with accentuated letter but without giving accentuated word in the
>regexp
>
>Exemple: with pattern e, the result should be e, e acute accent, e grave
>accent, et ...
I've done that. Convert your search word into a pattern but replace "e"
with "[eéêèë]" for example. The pattern for "eleve" becomes
"[eéêèë]l[eéêèë]ve", which will match "élève". A hash for the
replacement works nicely.
%accented = ( a => "aáâàãäå", e => "éêèë", ... );
$pattern =~ s/([aeiouy])/[$accented{$1}]/g;
You probably want case independent searching as well.
--
Bart.
------------------------------
Date: 31 Aug 2000 17:36:01 GMT
From: nospam@hairball.cup.hp.com (Richard J. Rauenzahn)
Subject: Re: Removing an entry from a text file
Message-Id: <967743329.449706@hpvablab.cup.hp.com>
"Dave Labbett" <dave.labbett@intelliware-systems.com> writes:
>I'm a PERL beginner so please bear with me if this is a simple question.
Welcome! Minor nit -- Larry named the language "Perl," not "PERL".
>However, from an ADMIN script, I want to be able to delete an entry from
>this text file based on the ID number. I type in this ID and the script
>reads through the text file, line by line until it gets a match. It should
>then delete this line from the file - leaving all the rest intact.
If there's a chance that more than one person will be running this ADMIN
script at once, then you'll also want to consider file locking.
'perldoc -f flock' and 'perldoc perlfaq5' for more info.
It's not just for CGI anymore =-).
Rich
--
Rich Rauenzahn ----------+xrrauenza@cup.hp.comx+ Hewlett-Packard Company
Technical Consultant | I speak for me, | 19055 Pruneridge Ave.
Development Alliances Lab| *not* HP | MS 46TU2
ESPD / E-Serv. Partner Division +--------------+---- Cupertino, CA 95014
------------------------------
Date: Thu, 31 Aug 2000 15:22:29 GMT
From: ng@attiks.com (PD)
Subject: Re: Sending mail with Perl for Windows NT??
Message-Id: <8FA1BD30FPDAttiksCoorporation@195.130.132.65>
Stuntman@koan.com (Robert Leonard III) wrote in
<sqssafgnc5d7@corp.supernews.com>:
>I'm trying to write a little program to fire off an e-mail... but can't
>seem to find any method to do this.
>
>I am using the latest and greatest from ActiveState on my Windows 2000
>server...
>
>Any ideas would be GREATLY appreciated!
>
>
>
>
You can use Mime::Lite as follows
my $msg = build MIME::Lite
To => 'ng@attiks.com',
From =>'ng@attiks.com',
Reply-to => 'ng@attiks.com',
Subject =>'Email',
Type =>'TEXT',
Data =>$mesg_text;
# Use this if you don't have sendmail installed !!!
MIME::Lite->send('smtp', "192.168.0.1", Timeout=>60);
$msg->send;
Peter
------------------------------
Date: 31 Aug 2000 18:09:27 +0100
From: nobull@mail.com
Subject: Re: Sorting a Tab Delimited Text File By Second Field
Message-Id: <u9vgwhwew6.fsf@wcl-l.bham.ac.uk>
"Shawn M. Crowley" <smc150@buffnet.net> writes:
> What is the best way to sort a tab delimited file with many records by the
> second field, in this situation a date?
Please specify your quality metric in terms of maintainability,
simplicity, speed, memory usage and so on. Without this information
"best" is meaningless.
Since you plan to sort by it I hope you've used a date format that sorts
properly such as YYYYMMDD. If not you'll need a function to convert
it.
See the perlfunc and perlfaq4 entries on sort. Come back here if you
still have questions.
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
Date: Thu, 31 Aug 2000 17:52:41 GMT
From: Rich More <rmore1@my-deja.com>
Subject: Re: Sorting a Tab Delimited Text File By Second Field
Message-Id: <8om60v$r6$1@nnrp1.deja.com>
In article <u9vgwhwew6.fsf@wcl-l.bham.ac.uk>,
nobull@mail.com wrote:
> "Shawn M. Crowley" <smc150@buffnet.net> writes:
>
> > What is the best way to sort a tab delimited file with many records
by the
> > second field, in this situation a date?
>
> Please specify your quality metric in terms of maintainability,
> simplicity, speed, memory usage and so on. Without this information
> "best" is meaningless.
>
> Since you plan to sort by it I hope you've used a date format that
sorts
> properly such as YYYYMMDD. If not you'll need a function to convert
> it.
>
> See the perlfunc and perlfaq4 entries on sort. Come back here if you
> still have questions.
You might even be able to just use the unix sort program...
From: man sort
-t char Use char as the field separator character. char is
not considered to be part of a field (although it
can be included in a sort key). Each occurrence
of char is significant (for example, <char><char>
delimits an empty field). If -t is not specified,
blank characters are used as default field separa-
tors; each maximal non-empty sequence of blank
characters that follows a non-blank character is a
field separator.
Either of the following commands sorts the contents of
infile with the second field as the sort key:
example% sort -k 2,2 infile
example% sort +1 -2 infile
--
=============================
Richard More
http://www.richmore.com/
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 31 Aug 2000 17:55:36 +0100
From: nobull@mail.com
Subject: Re: TMTOWTDI - but how best to do this ??
Message-Id: <u9snrlwet3.fsf@wcl-l.bham.ac.uk>
reg_exp@my-deja.com writes:
> i thought the => operator was used only for hashes....
Nope it can be used just about anywhere you'd use a comma.
> i cant understand it's usage here, is it documented in the faqs ??
Probably not. FAQs are not the primary source of documentation.
The => operator is an operator and is, of course, documented in
perldoc perlop.
The => digraph is mostly just a synonym for the comma
operator. It's useful for documenting arguments that come
in pairs. As of release 5.001, it also forces any word to
the left of it to be interpreted as a string.
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
Date: 31 Aug 2000 16:26:20 -0000
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: Using SDBM_File to compare large files.
Message-Id: <8om0vc$lge$1@lublin.zrz.tu-berlin.de>
<c_j_marshall@my-deja.com> wrote in comp.lang.perl.misc:
>
>>
>> You may be able to use that feature when you combine it with a hash
>> that associates each key with the corresponding record number in the
>> file. That way you can randomly hop around your data based on
>> keys.
>>
>> Anno
>>
>
>
>Ah - so I guess it does the exact opposite of what I want. It takes a
>hash and pushes it onto a file - I want to take a file and push it into
>a hash.
Well, basically you'd do that like this
while ( <IN> ) {
my( $key, $data) = extract_key( $_);
$hash{ $key} = $data;
}
You'd have to supply the sub extract_key that takes a record from your
file and returns the key and data portions of that record. Of course,
that loads all the data into memory.
>Oh well, cheers anyway.
>
>The build_index() on recipe 8.8 of the cookbook seems to be my best way
Oh. Probably more specific than the outline above. Books have a
way to be where you aren't, so I haven't looked.
>forward. There is after all, alledgedly, more than one way to do it.
Way to go.
Anno
------------------------------
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 4191
**************************************
