[10381] in Perl-Users-Digest
Perl-Users Digest, Issue: 3974 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Oct 14 16:17:20 1998
Date: Wed, 14 Oct 98 13:00:25 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Wed, 14 Oct 1998 Volume: 8 Number: 3974
Today's topics:
Activestate != standard distribution? [Was Re: Win32 Ne (William D. Reardon)
Re: comp.lang.perl.win32?? (Ethan H. Poole)
Re: Continuing s/// from the last position. <uri@camel.fastserv.com>
Re: Continuing s/// from the last position. <uri@camel.fastserv.com>
Re: Cool company has Perl jobs! (David Alan Black)
Re: Cool company has Perl jobs! <uri@camel.fastserv.com>
Re: Cool company has Perl jobs! (Rufus Xavier Sarsaparilla)
Deleteing a line <miller@bigsky.net>
Deleteing a line <miller@bigsky.net>
Deleteing a line <miller@bigsky.net>
Deleteing a line <miller@bigsky.net>
Re: Deleteing a line <mark@uninetwork.com>
Re: Deleteing a line (Mark-Jason Dominus)
Re: Deleteing a line (Richard S. Holmes)
Re: does format behave like FORTAN FORMAT? It seems to. (Matthew Bafford)
Re: Don't kill me <jdporter@min.net>
Re: Don't kill me <eashton@bbnplanet.com>
Re: Don't kill me <ludlow@us.ibm.com>
Re: email with windows 98 perl script? <gellyfish@btinternet.com>
Re: encryption (John Stanley)
Re: Equivalent of "unload" after "require"? (Mark-Jason Dominus)
Re: Equivalent of "unload" after "require"? <tchrist@mox.perl.com>
install email program remotely with dos <mostoc@mail.mankato.msus.edu>
Re: matching problems (Patrick Timmins)
Re: matching problems <jdf@pobox.com>
Re: Net::Ping WON'T WORK!!!!! <Alex.Davies@tiuk.ti.com>
Net::Ping/Socket chokes on valid IP numbers <cwinters@intes.net>
PERl and HTACCESS authentication <sme@planetpod.com>
Re: PERl and HTACCESS authentication <rootbeer@teleport.com>
Re: perl scripts won't work: (RH5.1 Linux) "command not droby@copyright.com
Perl/CGI with SUID question <theaton@usd.edu>
Re: Perl/CGI with SUID question (brian d foy)
Re: Question about PERL and Search Engines <uri@camel.fastserv.com>
Re: Sending mail via CGI/Perl ? <rootbeer@teleport.com>
Re: Sending mail via CGI/Perl ? (brian d foy)
splitting on meta chars valis@pacbell.net
Re: Still can not get browser to read perl script <jdubois@keane.com>
Re: struggling with a regex... HEeeeelp! <mark@uninetwork.com>
Re: system calls (Mark-Jason Dominus)
Re: system calls <rootbeer@teleport.com>
Re: Using $ENV{REMOTE_USER} <rootbeer@teleport.com>
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 14 Oct 1998 18:41:35 GMT
From: wdr1@pobox.com (William D. Reardon)
Subject: Activestate != standard distribution? [Was Re: Win32 Net::FTP trouble]
Message-Id: <F0tyLB.Atw@midway.uchicago.edu>
In article <01bdf707$bad38ce0$77ea1286@steelres-pcm657.resmel.bhp.com.au>,
Ron Savage <Savage.Ron.RS@bhp.com.au> wrote:
>ActiveState Perl V 5.005.02 has bugs in it which are not in the standard
>distribution. These bugs stop Net::FTP from working. Delete ActiveState
>Perl & install the standard distribution >:(.
I'm confused - as a result of the "one Perl" effort, isn't the
ActiveState port & the standard distribution one and the same?
-Bill
--
William Reardon ---- http://www.nhma.com/~wdr1/ ---- wdr1@pobox.com
I wish I was the radio song, the one that you couldn't turn up
------------------------------
Date: 14 Oct 1998 19:50:17 GMT
From: ehp@gte.net (Ethan H. Poole)
Subject: Re: comp.lang.perl.win32??
Message-Id: <702v9p$mlj$1@news-2.news.gte.net>
In article <slrn72993i.lbu.murray-paul@unix3.netaxs.com>, murray-paul@usa.net
says...
>
>I don't know how accurate the numbers will be, but a DN search on clp.*
>from Oct 1st gives about 59000 articles, 2400 matching subjects of
>'win32 win95 NT microsoft'. So that's 4%, less than I thought. Body
>searching on 'win32 win95 NT' gives 7500 or 12.5%, and body searching
>on 'win32 win95 NT microsoft' gives 12000 or 20%, which sounds to high.
As you've noticed, searching on the term "NT" will yield many undesired hits.
e.g.: "waNTed", "caNT", "doesNT", "eNTer", etc.
Personally, I don't see where there are enough win32 specific issues to
warrant a seperate group... In many cases the individual asks a question
about NT vs Unix differences when in fact there is little or no difference.
Others simply specify NT/Win32 in case it is of some significance.
--
Ethan H. Poole | Website Design and Hosting,
| CGI Programming (Perl & C)..
========Personal========= | ============================
* ehp @ gte . net * | --Interact2Day--
http://home1.gte.net/ehp/ | http://www.interact2day.com/
------------------------------
Date: 14 Oct 1998 14:18:17 -0400
From: Uri Guttman <uri@camel.fastserv.com>
To: Michal Rutka <erhmiru@erh.ericsson.se>
Subject: Re: Continuing s/// from the last position.
Message-Id: <sarn26zqa6u.fsf@camel.fastserv.com>
>>>>> "MR" == Michal Rutka <erhmiru@erh.ericsson.se> writes:
MR> Uri Guttman <uri@camel.fastserv.com> writes:
>> well, you are right that /g and \G only work with m// and you want to
^^^
do you see this word ^^^
>> use s///.
MR> Where do you found that /g works only with m//??? You can look on the p.72
MR> of the Camel book you see that s/// can use /g if you want. Even there
MR> is an example on the next page with s///g. Please check your sources.
i really resent your comments here and below. i said /g AND \G. this is
english for the same as perl && but without the short circuiting.
>> how about using substr on the string. use pos, $& and m//g to locate the
>> matches, assign the new text into the spot with substr, and continue on
>> after setting the new pos. in effect this is all s/// does (but more
>> efficiently). use \G to anchor the search to the position of tha last match.
MR> It wont be perl anymore... It will be some C style.
but try to answer the actual question for a change. he wants to
repeatedly use s/// on the same string with different search and replace
patterns and to continue where the last one left off. i addressed that
issue. you don't! whether it is perl style or C style is not relevent to
the question of can it be done at all.
MR> Please consider this code:
no i won't. it is meaningless in this thread.
<snip of s///g example>
MR> Oops, I forgot that you are the guy who dont like me and don't want
MR> to learn something from me. OK Uri, YOU (but only YOU) cannot use /g
MR> in s///;.
oh boy! i learned about s///g from you! whoopee! my day is made. i
learned a new perl feature! from someone who said he was just playing in
our newsgroup and wouldn't come back (why did you and why won't you go
away?). i am so mortified that my perl knowledge is so meager and my
regex knowledge is less than useless. please allow me to killfile myself
and burn on the pyre of perl newbiedom.
uri the shamed
--
Uri Guttman Fast Engines -- The Leader in Fast CGI Technology
uri@fastengines.com http://www.fastengines.com
------------------------------
Date: 14 Oct 1998 14:36:48 -0400
From: Uri Guttman <uri@camel.fastserv.com>
To: Michal Rutka <erhmiru@erh.ericsson.se>,Antti Boman <antti.boman@helsinki.fi>
Subject: Re: Continuing s/// from the last position.
Message-Id: <sark923q9bz.fsf@camel.fastserv.com>
>>>>> "MR" == Michal Rutka <erhmiru@erh.ericsson.se> writes:
MR> "Antti Boman" <antti.boman***NOSP@M***helsinki.fi> writes:
MR> [...]
>> [snip]
>>
>> No I won't, it wasn't the answer :) Let me rephrase:
>>
>> $str="This is the thing I want to change";
>> $str=~s/the/a/;
>> $str=~s/want/need/;
MR> Sorry, but I've just missed the original question. Still I cannot find
MR> it on my news server. Therefore I missinterprated Uri's answer. Uri,
MR> take my apologies.
try not to insult me before you reply. i was answering the actual
original post.
>> This works. Ok, but for efficiency, if the string was huge, how can I
>> continue the second search-replace from the point where the first one
>> left???
MR> Simply by cutting $str.
that is not efficient. read the question again.
MR> Ok. I still don't know the original problem, but consider this code,
MR> which changes your string back:
MR> $str =~ s/(.*?)a/&p('the')/e;
MR> $str =~ s/(.*?)need/&p('want')/e;
MR> $str = $tmp.$str;
MR> sub p{
MR> $tmp .= $1.shift(@_);
MR> '';
MR> }
this does massive amounts of copying and truncating of the string each
time. and it is very ugly code. and it doesn't work as you have your
search and replace strings reversed.
>> Obviously the only way to do it is that C kind of solution, which works,
>> even if it's not the easiest way there could be.
MR> No, not the only way. This is PERL -> there are more ways to do things.
MR> See my example before.
or rather see my working example below.
>> I'll put this on the perl wish list. To get \G to s///. That would solve
>> it.
MR> It would be nice, but it is usually not a good thing to require a language
MR> change to solve a programming problem. This is my private opinion so
MR> you don't need to agree.
actually i think it is a good idea. other languages (even python i
think) allow you to find the location of a match or replacement. this is
useful in many areas. it you don't use /g then \G in s/// would make
sense to begin the next search where the last replacement ended.
here is my solution which is reasonably fast (no extra copies) and clean
code (tested):
$str="This is the thing I want to change\n";
$str =~ s/the/a/;
$off = length( $` ) + length( $& ) ;
substr( $str, $off ) =~ s/i/xx/;
print $str ;
This is a thxxng I want to change
this only replaces the first 'i' AFTER the previous replacement of 'the'
uri
--
Uri Guttman Fast Engines -- The Leader in Fast CGI Technology
uri@fastengines.com http://www.fastengines.com
------------------------------
Date: 14 Oct 1998 14:01:31 -0400
From: dblack@pilot.njin.net (David Alan Black)
Subject: Re: Cool company has Perl jobs!
Message-Id: <702otr$75i$1@pilot.njin.net>
versuslaw@my-dejanews.com writes:
>Well-established Internet company seeks entry-level and experienced Perl
>programmers. We are looking for a smart, self-starters who write good code!
>Our systems run in a Windows NT environment, using ActiveState perl.
I'm all confused. I thought you said it was cool.
David Black
dblack@pilot.njin.net
------------------------------
Date: 14 Oct 1998 15:13:19 -0400
From: Uri Guttman <uri@camel.fastserv.com>
Subject: Re: Cool company has Perl jobs!
Message-Id: <sarg1crq7n4.fsf@camel.fastserv.com>
>>>>> "v" == versuslaw <versuslaw@my-dejanews.com> writes:
v> We are an equal opportunity employer based in Redmond, Washington.
too close to hell for me!!
i wonder if they know that perl is being used in such close proximity to
ground zero.
uri
--
Uri Guttman Fast Engines -- The Leader in Fast CGI Technology
uri@fastengines.com http://www.fastengines.com
------------------------------
Date: 14 Oct 1998 12:37:33 -0700
From: kirbyk@best.com (Rufus Xavier Sarsaparilla)
Subject: Re: Cool company has Perl jobs!
Message-Id: <702uht$49t$1@shell2.ba.best.com>
In article <sarg1crq7n4.fsf@camel.fastserv.com>,
Uri Guttman <uri@camel.fastserv.com> wrote:
>>>>>> "v" == versuslaw <versuslaw@my-dejanews.com> writes:
>
> v> We are an equal opportunity employer based in Redmond, Washington.
>
>too close to hell for me!!
>
>i wonder if they know that perl is being used in such close proximity to
>ground zero.
>
I can top this. I work in the tools group for the service operations of
WebTV, owned by the big M. We do most of our work in Perl, on unix
machines running Solaris. So, Microsoft pays me to write perl for unix.
I even went to the Perl conference this year on Microsoft's dime.
Of course, we're just a bought startup, rather than part of MS proper, so
the rules are a little different. Someday, they might care more about
what tools we use to do our jobs - that's the point where I take my
now reasonable perl experience back to the open market, most likely.
Until then, though, perl inside of microsoft is a reality.
--
Kirby Krueger O- kirbyk@best.com
<*> "Most .sigs this small can't open their own jump gate."
------------------------------
Date: Wed, 14 Oct 1998 10:43:35 -0600
From: "Keith L. Miller" <miller@bigsky.net>
Subject: Deleteing a line
Message-Id: <702l2t$sv2$1@hydra.bigsky.net>
I have a perl script that opens one file and basically writes the contents
to another file:
ie:
open (IN, file);
open (OUT, newfile);
while(<IN>){
if ( blah blah blah){
print OUT $_;
}
}
if ( something ){
delete last line printed from the newfile
}
close(OUT);
close(IN);
my problem is that I need to figure out that last if statement. I know it
is actually like this
if ($count == 5){
something
}
I don't know what that something is. I have a cludge workaround, but I was
wondering if you new a way to erase the last line from a file. Is there a
UNIX command to strip the last line of a file?
Any help would be greatly appreciated.
Keith L. Miller
Fathers Matter WebBoard
http://www.fathersmatter.com
------------------------------
Date: Wed, 14 Oct 1998 10:43:35 -0600
From: "Keith L. Miller" <miller@bigsky.net>
Subject: Deleteing a line
Message-Id: <702koh$suu$1@hydra.bigsky.net>
I have a perl script that opens one file and basically writes the contents
to another file:
ie:
open (IN, file);
open (OUT, newfile);
while(<IN>){
if ( blah blah blah){
print OUT $_;
}
}
if ( something ){
delete last line printed from the newfile
}
close(OUT);
close(IN);
my problem is that I need to figure out that last if statement. I know it
is actually like this
if ($count == 5){
something
}
I don't know what that something is. I have a cludge workaround, but I was
wondering if you new a way to erase the last line from a file. Is there a
UNIX command to strip the last line of a file?
Any help would be greatly appreciated.
Keith L. Miller
Fathers Matter WebBoard
http://www.fathersmatter.com
------------------------------
Date: Wed, 14 Oct 1998 10:43:35 -0600
From: "Keith L. Miller" <miller@bigsky.net>
Subject: Deleteing a line
Message-Id: <702kf3$sus$1@hydra.bigsky.net>
I have a perl script that opens one file and basically writes the contents
to another file:
ie:
open (IN, file);
open (OUT, newfile);
while(<IN>){
if ( blah blah blah){
print OUT $_;
}
}
if ( something ){
delete last line printed from the newfile
}
close(OUT);
close(IN);
my problem is that I need to figure out that last if statement. I know it
is actually like this
if ($count == 5){
something
}
I don't know what that something is. I have a cludge workaround, but I was
wondering if you new a way to erase the last line from a file. Is there a
UNIX command to strip the last line of a file?
Any help would be greatly appreciated.
Keith L. Miller
Fathers Matter WebBoard
http://www.fathersmatter.com
------------------------------
Date: Wed, 14 Oct 1998 10:43:35 -0600
From: "Keith L. Miller" <miller@bigsky.net>
Subject: Deleteing a line
Message-Id: <702ldt$t0e$1@hydra.bigsky.net>
I have a perl script that opens one file and basically writes the contents
to another file:
ie:
open (IN, file);
open (OUT, newfile);
while(<IN>){
if ( blah blah blah){
print OUT $_;
}
}
if ( something ){
delete last line printed from the newfile
}
close(OUT);
close(IN);
my problem is that I need to figure out that last if statement. I know it
is actually like this
if ($count == 5){
something
}
I don't know what that something is. I have a cludge workaround, but I was
wondering if you new a way to erase the last line from a file. Is there a
UNIX command to strip the last line of a file?
Any help would be greatly appreciated.
Keith L. Miller
Fathers Matter WebBoard
http://www.fathersmatter.com
------------------------------
Date: Wed, 14 Oct 1998 14:17:01 -0400
From: Mark Cain <mark@uninetwork.com>
To: "Keith L. Miller" <miller@bigsky.net>
Subject: Re: Deleteing a line
Message-Id: <3624EA9D.1F8763A5@uninetwork.com>
While this is not one of the unix groups, the unix command is
sed -e '$d' < oldfile > newfile
Keith L. Miller wrote:
> I have a perl script that opens one file and basically writes the contents
> to another file:
>
> ie:
>
> open (IN, file);
> open (OUT, newfile);
> while(<IN>){
> if ( blah blah blah){
> print OUT $_;
> }
> }
>
> if ( something ){
> delete last line printed from the newfile
> }
> close(OUT);
> close(IN);
>
> my problem is that I need to figure out that last if statement. I know it
> is actually like this
>
> if ($count == 5){
> something
> }
>
> I don't know what that something is. I have a cludge workaround, but I was
> wondering if you new a way to erase the last line from a file. Is there a
> UNIX command to strip the last line of a file?
>
> Any help would be greatly appreciated.
>
> Keith L. Miller
> Fathers Matter WebBoard
> http://www.fathersmatter.com
------------------------------
Date: 14 Oct 1998 14:42:17 -0400
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: Deleteing a line
Message-Id: <702ra9$9rp$1@monet.op.net>
In article <702koh$suu$1@hydra.bigsky.net>,
Keith L. Miller <miller@bigsky.net> wrote:
> open (IN, file);
> open (OUT, newfile);
> while(<IN>){
> if ( blah blah blah){
> print OUT $_;
> }
> }
>
> if ( something ){
> delete last line printed from the newfile
> }
> close(OUT);
> close(IN);
>
>my problem is that I need to figure out that last if statement. I know it
>is actually like this
open (IN, file) or die "Couldn't open file: $!; aborting";
open (OUT, "> newfile") or die "Couldn't open newfile: $!; aborting";
while (<IN>) {
if (blah blah blah) {
print OUT $PREVLINE if defined $PREVLINE;
$PREVLINE = $_;
}
}
close IN or die "Couldn't close file: $!; aborting";
close OUT or die "Couldn't close newfile: $!; aborting";
------------------------------
Date: 14 Oct 1998 14:45:35 -0400
From: rsholmes@rodan.syr.edu (Richard S. Holmes)
Subject: Re: Deleteing a line
Message-Id: <xzcaf2zasog.fsf@rodan.syr.edu>
In article <702l2t$sv2$1@hydra.bigsky.net> "Keith L. Miller" <miller@bigsky.net> writes:
> open (IN, file);
> open (OUT, newfile);
> while(<IN>){
> if ( blah blah blah){
> print OUT $_;
> }
> }
>
> if ( something ){
> delete last line printed from the newfile
> }
> close(OUT);
> close(IN);
>
>
>my problem is that I need to figure out that last if statement.
How about:
$save = '';
open (IN, file);
open (OUT, newfile);
while(<IN>){
if ( blah blah blah){
print OUT $save;
$save = $_;
}
}
if ( not something ){
print OUT $save;
}
close(OUT);
close(IN);
--
- Rich Holmes
Syracuse, NY / We have more important things to do...
Newport News, VA Censure and move on! Sign the petition at
rsholmes@earthling.net <http://www.moveon.org>
------------------------------
Date: Wed, 14 Oct 1998 14:07:16 -0400
From: dragons@scescape.net (Matthew Bafford)
Subject: Re: does format behave like FORTAN FORMAT? It seems to..
Message-Id: <MPG.108eb25dfa22f1d99896d8@news.scescape.net>
In article <<3624E035.36076AD3@harris.com>>, emills@harris.com (Ed)
pounded the following:
=>
[SNIP question about why format decl inside
if block doesn't work as expected.]
=>
=> Strange? Seems like it. According to my perl text, if () {} else {} else
=> "executes" everything within the curly brackets according the logic.
=> Maybe "executes" is the key here- as I said, format isn't executable
Yep. The key word indeed.
=> perhaps? Even it not, its still strange that the system even encountered
=> the statement.
>From perlform:
Formats, like packages and subroutines, are declared rather than
executed, so they may occur at any point in your program. (Usually it's
best to keep them all together though.) They have their own namespace
part from all the other
So, your example using $~ (and don't forget $^) is the best way to go.
=> E
--Matthew
------------------------------
Date: Wed, 14 Oct 1998 14:04:31 -0400
From: John Porter <jdporter@min.net>
Subject: Re: Don't kill me
Message-Id: <3624E7AF.25DF7227@min.net>
Elaine -HappyFunBall- Ashton wrote:
>
> madame philosophe wrote:
> > PS I have also set my browser to wrap at 60 chars. Is this working?
>
> ick. 74 is standard.
I think you mean 72. Anyway, why encourage someone to use a *wider*
wrap width? 60 columns is plenty!
--
John "Many Jars" Porter
baby mother hospital scissors creature judgment butcher engineer
------------------------------
Date: Wed, 14 Oct 1998 18:23:02 GMT
From: Elaine -HappyFunBall- Ashton <eashton@bbnplanet.com>
Subject: Re: Don't kill me
Message-Id: <3624E984.5C94CD5E@bbnplanet.com>
John Porter wrote:
> I think you mean 72. Anyway, why encourage someone to use a *wider*
> wrap width? 60 columns is plenty!
Yes, I meant 72...only about 50 people emailed me regarding this typo. I
like a little wider wrap if only because I think it looks better and
hurts my eyes less. I like grey text on a dark blue background
too....then again, I'm not working on a VIC-20 as one person claimed. :)
I could have said 'who needs word wrap? one continuous stream of text is
great!'
e.
After all, the cultivated person's first duty is to
always be prepared to rewrite the encyclopedia. - U. Eco -
------------------------------
Date: Wed, 14 Oct 1998 13:34:02 -0500
From: James Ludlow <ludlow@us.ibm.com>
Subject: Re: Don't kill me
Message-Id: <3624EE9A.6CA21AC@us.ibm.com>
John Porter wrote:
>
> Elaine -HappyFunBall- Ashton wrote:
> >
> > madame philosophe wrote:
> > > PS I have also set my browser to wrap at 60 chars. Is this working?
> >
> > ick. 74 is standard.
>
> I think you mean 72. Anyway, why encourage someone to use a *wider*
> wrap width? 60 columns is plenty!
Plus the fact that the line in the note claiming to be wrapped at 60
characters had 68 characters in it.
For those newbies out there who happen to be using Netscape for news
reading there are a couple of options that you definitely want to set.
Under Edit->Preferences->Mail&Groups->Messages you should set your "wrap
long lines at" number to a reasonable value, like 72. And, most
importantly, _uncheck_ the box that says "By default, send HTML
messages."
--
James Ludlow (ludlow@us.ibm.com)
(Any opinions expressed are my own, not necessarily those of IBM)
------------------------------
Date: 14 Oct 1998 17:47:32 +0100
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: email with windows 98 perl script?
Message-Id: <702kj4$a7$1@gellyfish.btinternet.com>
On Wed, 14 Oct 1998 12:49:18 GMT Hawkwynd <hawkwynd@adelphia.net> wrote:
> On Tue, 13 Oct 1998 23:23:27 GMT, Rick Delaney
> <rick.delaney@shaw.wave.ca> wrote:
>
>>#!/usr/local/bin/perl
>>$| = 1;
>>LOOP: {
>> print "Perl is not CGI!\n";
>> print "CGI is not Perl!\n";
>> $you_say = <STDIN>;
>> redo LOOP unless $you_say =~ /Yes, I get it now\./;
>>}
>>
>
> Ok, I'll REPHRASE my question, for the literal folks out there...
>
> Is there a *PERL* script for mail, for Windows95/98 that will work
> with my web server? I'm sorry about the previous post, I meant PERL,
> not the other 3-letter scripting language...
>
I think the answer we are all looking for here is contained in perlfaq9
under the question:
How do I send/read mail ?
Oh and CGI is not a scripting language but an interface definition as in
the Common Gateway Interface. You could read more about this at:
http://hoohoo.ncsa.uiuc.edu
CGI applications can be written in any language that conforms to the input
and output requirements of the CGI - that is why people around here tend
to get a bit excited when we get postings that are general to CGI
programming in general rather than Perl in particular.
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: 14 Oct 1998 19:43:10 GMT
From: stanley@skyking.OCE.ORST.EDU (John Stanley)
Subject: Re: encryption
Message-Id: <702use$6up$1@news.NERO.NET>
In article <MPG.108e84dcf032d03898980d@nntp.hpl.hp.com>,
Larry Rosler <lr@hpl.hp.com> wrote:
>In article <702lru$q1i$1@news.NERO.NET> on 14 Oct 1998 17:09:18 GMT, John
>Stanley <stanley@skyking.OCE.ORST.EDU> says...
>
>> Decryption was not part of the problem statement.
>
>Orlando Frooninckx <Frook@mail.dma.be> wrote:
>! does anyone have a nice encryption function example so I can crypt
>! sentences before writing them to a file?
>
>As Michael Gebis proposed, if you are just writing them to a file but
>can't decrypt them, you might as well use 'unlink' (and save the disk
>space).
I am not writing them anywhere. I did not create the problem statement.
For all I know, Orlando wants to create a password file of some kind
using sentences instead of simple passwords. You know, the kind of thing
where the user seeking authentication enters his pass sentence and it is
encrypted and compared to the encrypted copy.
If you think that not being able to decrypt passwords (or pass
sentences) is the same as unlinking the file that they are stored in,
please unlink your /etc/passwd (or /etc/shadow or /etc/security) and
see if it really works that way. You will save a whole bundle of disk
space.
------------------------------
Date: 14 Oct 1998 14:30:03 -0400
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: Equivalent of "unload" after "require"?
Message-Id: <702qjb$9nv$1@monet.op.net>
In article <702nr6$nof$1@nnrp1.dejanews.com>, <wyndo@cxo.com> wrote:
>Also, I'm not familiar with the "do" command (I'm by all means still only a
>beginner when it comes to Perl). "do" is like "require" ?
Manual! Manual!
`require' is exactly the same as `do' except that it won't do the same
file twice.
------------------------------
Date: 14 Oct 1998 19:29:36 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Equivalent of "unload" after "require"?
Message-Id: <702u30$mik$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc, mjd@op.net (Mark-Jason Dominus) writes:
:`require' is exactly the same as `do' except that it won't do the same
:file twice.
There's a wee tad more to it than that. From perlfaq8:
1) do $file is like eval `cat $file`, except the former:
1.1: searches @INC and updates %INC.
1.2: bequeaths an *unrelated* lexical scope on the eval'ed code.
2) require $file is like do $file, except the former:
2.1: checks for redundant loading, skipping already loaded files.
2.2: raises an exception on failure to find, compile, or execute $file.
3) require Module is like require "Module.pm", except the former:
3.1: translates each "::" into your system's directory separator.
3.2: primes the parser to disambiguate class Module as an indirect object.
4) use Module is like require Module, except the former:
4.1: loads the module at compile time, not run-time.
4.2: imports symbols and semantics from that package to the current one.
--tom
--
OK, enough hype.
--Larry Wall in the perl man page
------------------------------
Date: Wed, 14 Oct 1998 14:36:43 -0500
From: "mostoc" <mostoc@mail.mankato.msus.edu>
Subject: install email program remotely with dos
Message-Id: <702ujb$1st$1@nitrogen.mankato.msus.edu>
I am looking for a text based email that can be installed through a dos
window. Can anybody help me?
Chad Moston
------------------------------
Date: Wed, 14 Oct 1998 18:09:45 GMT
From: ptimmins@netserv.unmc.edu (Patrick Timmins)
Subject: Re: matching problems
Message-Id: <702pd9$q0n$1@nnrp1.dejanews.com>
In article <702cks$3kc@news.uni.edu>,
"Troy Bull" <troy.bull@uni.edu> wrote:
> I have a small program that does a search of the form
>
> s/(\w{3}):(\w{3})/wrap stuff around $1 and $2/g
>
> the problem is that it matches one case that I need for it not to
> ___:___ needs to not match this is the only case that needs to
> fail, if any one of the six underscores is a [a-zA-Z0-9] it should
> match. I am stuck on this one, if anyone has any ideas I would
> appreciate the help.
Wrap it in an 'unless':
unless (/___:___/) {
s/(\w{3}):(\w{3})/wrap stuff around $1 and $2/g;
}
Patrick Timmins
$monger{Omaha}[0]
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 14 Oct 1998 21:03:47 +0200
From: Jonathan Feinberg <jdf@pobox.com>
To: ptimmins@netserv.unmc.edu (Patrick Timmins)
Subject: Re: matching problems
Message-Id: <m3g1crq830.fsf@joshua.panix.com>
ptimmins@netserv.unmc.edu (Patrick Timmins) writes:
> Wrap it in an 'unless':
>
> unless (/___:___/) {
> s/(\w{3}):(\w{3})/wrap stuff around $1 and $2/g;
> }
That's no good: that means if any of the foo:bar constructs in the
string match ___:___, then none of them will be replaced. That's not
what's wanted.
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf
------------------------------
Date: Wed, 14 Oct 1998 19:10:22 +0100
From: Alex Davies <Alex.Davies@tiuk.ti.com>
Subject: Re: Net::Ping WON'T WORK!!!!!
Message-Id: <3624E90E.BB29B7F7@tiuk.ti.com>
Peter,
I've never had any problems with this module... i presume from your mention
of protocols that you are using the most recent version of Net::Ping. Can you not
just use
the (old) pingecho method...? Some thing like this should work fine:
use Net::Ping;
my $node = 'xyz';
if (pingecho($node, 2)) {
print "$node is responding\n";
}
else {
print "$node is NOT responding...\n";
}
What was the exact error message you were getting, also which version of perl
are you running?
alex.
_________________________________________________________________________
Alex Davies, MOS Design, Email: Alex.Davies@tiuk.ti.com
Texas Instruments Limited,
800 Pavillion Drive, Tel (work): 01604 663450
Brackmills Industrial Estate, (home): 01604 764961
Northampton, NN4 7YL.
U.K.
Peter J Ratner wrote:
> I've tried to use Net::Ping in my programs, but I can't seem to get it
> to work right! For some reason, no matter what protocol I use, the
> server never responds (yes, I've tried MANY different servers) . I am
> using the sample script given in the module itself, not one of my own
> design, so there's no reason why it shouldn't work. I tried running it
> on both MacPerl and Unix. On MacPerl, no response from server, on Unix,
> it gives an error regarding Socket.pm and how some arguement should have
> the value 16 rather than 0.
>
> If anyone has had success with this module, I'd greatly appreciate
> seeing the source or getting some input as to how to get it to work.
>
> You can contact me at ratner@vaix.net .
------------------------------
Date: Wed, 14 Oct 1998 14:49:00 -0400
From: Chris Winters <cwinters@intes.net>
Subject: Net::Ping/Socket chokes on valid IP numbers
Message-Id: <3624F21C.C4555197@intes.net>
The following snippet:
foreach my $key ( keys %hosts ) {
if ( ! $p->ping( $hosts{ $key }->{ip} ) ) {
$hosts{ $key }->{misses}++;
}
chokes when the IP has a number greater than 200 or equal to 0 in any
piece of the dotted quad.
The error comes from Socket.pm, which says:
Bad arg length for Socket::unpack_sockaddr_in, length is 0, should
be 16 at /.../Socket.pm line 249
Socket.pm doesn't have much itself, but a perldoc Socket tells me it
uses my system's socket.h file. I'm using Linux (kernel 2.0.34, redhat
5.0).
Is this a problem with my kernel networking header files? Other
utilities (ping, traceroute, etc.) have no problem with any IP I can
feed it.
Thanks much.
--
Chris Winters
Internet Developer INTES Networking
cwinters@intes.net http://www.intes.net/
Integrated hardware/software solutions to make the Internet work for
you.
------------------------------
Date: Wed, 14 Oct 1998 10:56:13 -0700
From: Stewart Eastham <sme@planetpod.com>
Subject: PERl and HTACCESS authentication
Message-Id: <3624E5A4.8DD1E634@planetpod.com>
I have implemented a system where a user logs in through HTACCESS and
then from there on out I track who they are through the REMOTE_USER
environment variable. What I would like to do though is to add a button
that allows the user (or another user) to log in using a
username/password different than the original. This would require a
"clearing" of the original login information, so to speak. Here's where
I run into my problem.
This is the function triggered when the user hits my NEW LOGIN button:
&authenticate("Basic", "Restricted Area");
sub authenticate {
local($authtype, $realm) = @_;
print "Status: 401 Authentication Required\n";
print "WWW-Authenticate: ".$authtype." realm=\"".$realm."\"\n" ;
$go = "http://www.mysite.com/members/index.html";
print "Location: $go\n\n";
exit(0) ;
}
...where "Restricted Area" is the AuthName of my secure area (the
"members" directory).
Now what I WANT it to do is present the user with a NEW popup box that
prompts them for another username/password. If they enter a valid
login, then they should be send to "/members/index.html".
What my code DOES now is first popup a box saying "Authorization
failed." Clicking "cancel" causing a strange "Unknown file type" box to
popup, but, more importantly, clicking "OK" causes a new
username/password dialog box to appear (which is what it should do).
But the when I enter a valid user/password login, it doesn't recognize
it and constantly gives me a "Authorization failed" popup box. Now I am
left quite puzzled.
Any help would be greatly appreciated. Thank you.
stewart eastham
sme@planetpod.com
------------------------------
Date: Wed, 14 Oct 1998 19:00:38 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: PERl and HTACCESS authentication
Message-Id: <Pine.GSO.4.02A.9810141159040.1979-100000@user2.teleport.com>
On Wed, 14 Oct 1998, Stewart Eastham wrote:
> I have implemented a system where a user logs in through HTACCESS and
> then from there on out I track who they are through the REMOTE_USER
> environment variable. What I would like to do though is to add a
> button that allows the user (or another user) to log in using a
> username/password different than the original.
It sounds as if you're asking their browser to forget the original
name/password they had used, so it can ask them again. If you're trying to
get a browser to do something, the docs, FAQs, and newsgroups about
browsers should be helpful. Good luck!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Wed, 14 Oct 1998 19:44:10 GMT
From: droby@copyright.com
Subject: Re: perl scripts won't work: (RH5.1 Linux) "command not found" plz help
Message-Id: <702uua$2ns$1@nnrp1.dejanews.com>
In article <3623C264.9EC89BC5@bbnplanet.com>,
Elaine -HappyFunBall- Ashton <eashton@bbnplanet.com> wrote:
> Mark den hartog wrote:
>
> > problem: Perl-scripts won't work. The bash returns : "command not
> > found".
>
> Make sure that /usr/bin/perl or wherever Perl resides is in your $PATH.
>
Actually, no. It needn't be in your $PATH. The shebang path has to match
reality, that's all.
Just tested to make sure I was saying truth. Took /usr/bin out of $PATH.
Script with #!/usr/bin/perl worked nicely. And perl -v failed nicely, as did
MANY other things. ;-)
--
Don Roby
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Wed, 14 Oct 1998 13:58:45 -0500
From: "Timothy H. Heaton" <theaton@usd.edu>
Subject: Perl/CGI with SUID question
Message-Id: <Pine.SOL.4.02.9810141351130.7300-100000@sunburst.usd.edu>
I have long been writing CGI scripts with Perl on UNIX, and I recently
found that you can set the script for SUID (CHMOD 4711) to have the script
run as you rather than the web (NOBODY or DAEMON). But when you set SUID
for the script, Perl disables many commands such as SYSTEM, EXEC, and in
some cases UNLINK, CHMOD, CHDIR, and even OPEN. Figuring out whether a
given command will work or not seems very complicated (OPEN works for some
paths but not for others, for example).
Does anyone know where I can find a list of the commands that are disabled
by Perl with SUID? Testing each one is driving me crazy &~%*&^@!
Professor Timothy H. Heaton /|Mountains /| Phone: 605-677-6122
Director of Earth Sciences /::|Deserts /::| FAX: 605-677-6121
University of South Dakota /::::|Caves /::::| EM: theaton@usd.edu
Vermillion, SD 57069 /::::::| /::::::| www.usd.edu/~theaton
------------------------------
Date: Wed, 14 Oct 1998 15:51:07 -0400
From: comdog@computerdog.com (brian d foy)
Subject: Re: Perl/CGI with SUID question
Message-Id: <comdog-ya02408000R1410981551070001@news.panix.com>
Keywords: from just another new york perl hacker
In article <Pine.SOL.4.02.9810141351130.7300-100000@sunburst.usd.edu>, "Timothy H. Heaton" <theaton@usd.edu> posted:
>I have long been writing CGI scripts with Perl on UNIX, and I recently
>found that you can set the script for SUID (CHMOD 4711) to have the script
>run as you rather than the web (NOBODY or DAEMON). But when you set SUID
>for the script, Perl disables many commands such as SYSTEM, EXEC, and in
>some cases UNLINK, CHMOD, CHDIR, and even OPEN. Figuring out whether a
>given command will work or not seems very complicated (OPEN works for some
>paths but not for others, for example).
read the perlsec manpage. commands aren't disabled, but they won't
allow you to do unsafe things.
--
brian d foy <comdog@computerdog.com>
Kernel Steve Austin - stronger, faster, threaded
<URL:http://kernel.steve.austin.pm.org>
------------------------------
Date: 14 Oct 1998 15:01:29 -0400
From: Uri Guttman <uri@camel.fastserv.com>
Subject: Re: Question about PERL and Search Engines
Message-Id: <sarhfx7q86u.fsf@camel.fastserv.com>
>>>>> "mp" == madame philosophe <mp@mkt2mkt.com> writes:
madame,
it would help if you used standard quoting mechanisms when you followup
a post. i followed you and it is near impossible (other than know what i
wrote) to tell who said what below.
you said:
mp> Do the commercial SE's tend to be written in Perl? I would think
mp> so but would rather hear it from the masses.
i said:
mp> what do you mean by commercial? one you have to pay to use or pay to
mp> own?
you said:
mp> No No No I mean ... oh never mind!
i reply:
you still don't explain what you mean by commercial.
i said:
mp> and do you know that search engine systems tend to have 3 major
mp> components which can be very isolated and developed and written in
mp> different languages and on different systems.
you said:
mp> I didn't know that. Thanks
i said:
mp> from my own experience (having written the crawler for a major search engine
you said:
mp> Oh and what IS a major search engine? It wouldn't be commercial would it?
mp> ( Actually that's what I meant!!! )
i reply:
as i said above, what do you mean by commercial? there are major engines
what are free to use but make money from ads, there are engines which
charge to get at the site itself, and there are engines which charge per
article you read, and other combinations. and some of these search more
than the web (which is NOT eq the net).
i wrote the web crawler for northern light (http://www.northernlight.com), a
major (read one of the largest databases) search engine which is
commercial (they charge for non Web pages you read) but their web
searching is free. they also have unique ways of organizing your search
results to make it easier to pinpoint what you are looking for. check
them out. i don't work there anymore but i have a very small piece of
the company (i say i own the garbage cans :-).
i said:
mp> system in C) perl is a poor choice for efficiency reasons. there are many
mp> smaller systems using perl since it is easier to develop in but it
mp> doesn't scale well up to the GB's a day needed to crawl the entire web.
you said:
mp> Thank you again for answering my question!
i reply:
you're welcome.
you said:
mp> I guess when you say that Perl is good for small searches you mean
mp> for a single website's search engine, right? Or do you mean for
mp> searches in which speed is not a critical factor?
i reply:
i meant where speed is a factor. and with very large size, speed becomes a
factor. so IMO perl was/is not a viable solution for very large search
systems. it all depends on what your criteria are: is it just searching
1 site? is it crawlin the web? will it grow forever? what speed is my
cpu? how big is my budget? etc, etc.
uri
--
Uri Guttman Fast Engines -- The Leader in Fast CGI Technology
uri@fastengines.com http://www.fastengines.com
------------------------------
Date: Wed, 14 Oct 1998 18:49:23 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: Sending mail via CGI/Perl ?
Message-Id: <Pine.GSO.4.02A.9810141147040.1979-100000@user2.teleport.com>
On Wed, 14 Oct 1998, Andrew Perrin wrote:
> $address = %ENV{whatever};
Hmmm.... Perhaps you meant $ENV{whatever}?
> open(MAIL, "| /usr/ucb/mail -t $address");
Eek! You're not including an email address on the command line, are you?
Remember that an email address may contain shell metacharacters, so you
may be executing any command whatsoever! That's not generally recommended
by security experts... :-)
You should never pass an unknown email address on the command line.
There's always a better way.
Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Wed, 14 Oct 1998 15:58:16 -0400
From: comdog@computerdog.com (brian d foy)
Subject: Re: Sending mail via CGI/Perl ?
Message-Id: <comdog-ya02408000R1410981558160001@news.panix.com>
Keywords: from just another new york perl hacker
In article <Pine.GSO.4.02A.9810141147040.1979-100000@user2.teleport.com>, Tom Phoenix <rootbeer@teleport.com> posted:
>You should never pass an unknown email address on the command line.
>There's always a better way.
well, blindly passing *any* data is bad. :)
--
brian d foy <comdog@computerdog.com>
Kernel Steve Austin - stronger, faster, threaded
<URL:http://kernel.steve.austin.pm.org>
------------------------------
Date: Wed, 14 Oct 1998 12:37:19 -0700
From: valis@pacbell.net
Subject: splitting on meta chars
Message-Id: <3624FD6F.2F279770@pacbell.net>
I'm parsing a file that has a varying column delimiter.
I have to split the records depending on the delimiter which could be any meta char (\, $, |, etc)
I have some code that uses eval but doesnt work
Can someone help me write the code that takes care of all possiblilities?
Help greatly appreciated.
Kal.
here is the code
$delim = $something;
eval { @fields = split /$delim/, $line)
if ($@)
{
# its a meta char!!
@fields = split /\$delim/;
}
else
{
#delim is a normal char
@fields = split /$delim/, $line
}
------------------------------
Date: Wed, 14 Oct 1998 14:58:49 -0400
From: Joseph DuBois <jdubois@keane.com>
To: kespinal@fedex.com
Subject: Re: Still can not get browser to read perl script
Message-Id: <3624F469.E04CEC1E@keane.com>
Katia Espinal wrote:
> I have created a simple perl script.
>
> print "Content-type:text/html\n\n";
> print "<html><head><title>Test Page</title></head>";
> print "<body>";
> print "<h2>Hello, world!</h2>";
> print "</body></html>";
>
> I still can not get the browser to interpret the HTML tags.
You might check your server mime types. It may be passing
something back instead of what you think it is passing
back. This is true with the latest Netscape server, but not sure
about others.
Do you see the line "Content-type:text/html"? If so then it is
getting another mime type prior to getting to that line.
-------------------------------------------------------
Joseph DuBois (Internet/Intranet Specialist)
mailto:jdubois@keane.com (Work) http://www.keane.com/
------------------------------
Date: Wed, 14 Oct 1998 14:34:28 -0400
From: Mark Cain <mark@uninetwork.com>
To: Dave Mee <davemee@tvlistings.co.uk>
Subject: Re: struggling with a regex... HEeeeelp!
Message-Id: <3624EEB4.88BD48F1@uninetwork.com>
$temp =~ s/<\\#209>/-/g;
Think metacharacter! Any special character must be escaped.
hth,
Mark
Dave Mee wrote:
> And they look *sooooo* easy in the books. :)
>
> I'm parsing a textfile, and need to change the occurance of
>
> <\#209>
>
> into a minus symbol (-).
>
> In fact, I need to change all manner of these stupid escaoe sequences.
> However, my code never seems to work.
> Here are some of my efforts:
>
> $temp=$_;
> $temp=~s/<\x23\\212>/\`/; # turn <\#212> into `
> $temp=~s/<[\x23][\x5c]213>/[\x27]/g; # turn <\#213> into '
> $temp=~s/<\x23\\209>/\-/; # turn <\#209> into -
>
> Anyone know what I'm doing wrong? I want to do the translations on the
> string $temp, and dump the output back into $temp. Am I way off the
> mark, or too new to perl to get this?
>
> And does anyone know how it *should* be done? :)
>
> Many thanks for your eyetime...
>
> Dave
------------------------------
Date: 14 Oct 1998 14:37:58 -0400
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: system calls
Message-Id: <702r26$9pi$1@monet.op.net>
In article <3624CC63.455FB0D@internetx.net>,
Rick Bauman <rick@internetx.net> wrote:
>I have the following in a perl program
>
>
>system ("crypt", "we", "</tmp/ppw", ">/tmp/cpw") || die
If you give `system' a list of items, they will be taken literally,
and the command will not be passed to the shell for handling. The
shell is reponssible for arranging redirections with < and >, and also
for expanding wildcards like * and ?. You've bypassed the shell here,
so no redirections are occurring.
Instead, you should use
system("crypt we </tmp/ppw >/tmp/cpw")
Note also that `system' returns the exit status of the command, which
is conventionally 0 for success, and non-zero for failure, so your
test for `die' is backwards. Instead:
system(...) == 0 or die ... ;
------------------------------
Date: Wed, 14 Oct 1998 18:55:25 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: system calls
Message-Id: <Pine.GSO.4.02A.9810141152480.1979-100000@user2.teleport.com>
On Wed, 14 Oct 1998, Rick Bauman wrote:
> system ("crypt", "we", "</tmp/ppw", ">/tmp/cpw") || die" Could not
> encrypt password";
Now, you know that you're calling a program called 'crypt' with three
parameters, right?
> this works from a command line :crypt we </tmp/ppw >/tmp/cpw
Now you're asking a shell to interpret that line. The shell is, of course,
happy to interpret some metacharacters so that it can call "crypt" with
just one parameter. But it sets up the program's standard input and output
streams as you wished.
The solution is either to ask the shell to do the I/O redirection you
want, or to do it yourself from within Perl. Good luck!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Wed, 14 Oct 1998 18:52:08 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: Using $ENV{REMOTE_USER}
Message-Id: <Pine.GSO.4.02A.9810141150580.1979-100000@user2.teleport.com>
On 14 Oct 1998, Alfredo Dematteis wrote:
> When the script is first executed, the $ENV{REMOTE_USER} returns a
> valid userid; however, with subsequent calls to the CGI,
> $ENV{REMOTE_USER} returns a blank userid. What might be causing the
> environment hash to be 'blanked' ?
Yes, the calling program (a server) is setting or failing to set up the
environment. The docs, FAQs, and newsgroups about servers should be
helpful to you here. Good luck!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 12 Jul 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Mar 98)
Message-Id: <null>
Administrivia:
Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.
If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu.
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.misc (and this Digest), send your
article to perl-users@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.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
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 V8 Issue 3974
**************************************
