[18215] in Perl-Users-Digest
Perl-Users Digest, Issue: 383 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Mar 1 06:05:32 2001
Date: Thu, 1 Mar 2001 03:05:10 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <983444710-v10-i383@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Thu, 1 Mar 2001 Volume: 10 Number: 383
Today's topics:
Re: How are SOL_SOCKET and SO_REUSEADDR defined in vari (Gwyn Judd)
Re: How can I search and delete a specific name in a te <fabian@markisspecialisten.com>
Re: How can I search and delete a specific name in a te (Gwyn Judd)
Re: How do I test whether a CODE reference is an NOP? <johnlin@chttl.com.tw>
Re: How do I test whether a CODE reference is an NOP? (Rafael Garcia-Suarez)
Re: How the C L P M turns <godzilla@stomp.stomp.tokyo>
Re: How the CLPM turns (Gwyn Judd)
Re: How the CLPM turns <godzilla@stomp.stomp.tokyo>
Re: How the CLPM turns ()
Re: Learning Perl and I need help. (Gwyn Judd)
Patter matching and substitution problem. <GomezGorka@jazzfree.com>
Re: Patter matching and substitution problem. <peter.s@tjgroup.dk>
Re: Patter matching and substitution problem. (Anno Siegel)
Re: Patter matching and substitution problem. <julien.quint@imag.fr>
Re: Patter matching and substitution problem. <julien.quint@imag.fr>
Perl, Cookies, and Apache. <parrot0123@yahoo.ca>
Re: Perl, Cookies, and Apache. (Rafael Garcia-Suarez)
Re: Perl, Cookies, and Apache. <gtoomey@usa.net>
Re: print "</tr><tr>" vs. print $tr <iltzu@sci.invalid>
Re: PROPOSAL: Graphics::ColorNames (Anno Siegel)
Re: regex help please <bart.lateur@skynet.be>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 01 Mar 2001 09:06:24 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: How are SOL_SOCKET and SO_REUSEADDR defined in various flavors of Unix?
Message-Id: <slrn99s4it.140.tjla@thislove.dyndns.org>
I was shocked! How could revjack <revjack@revjack.net>
say such a terrible thing:
>I claim this thread in the name of Lemuria.
>
>All Hail Lemuria.
Burn the Heathen!
--
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
You need no longer worry about the future. This time tomorrow you'll
be dead.
------------------------------
Date: Thu, 01 Mar 2001 08:31:21 GMT
From: "Fabian Thorbjörnsson" <fabian@markisspecialisten.com>
Subject: Re: How can I search and delete a specific name in a textfile.
Message-Id: <tNnn6.16089$Qb7.2629264@newsb.telia.net>
I want help, not offers from jobbless programmers.
"even newbies wants to lern"
"Tony L. Svanstrom" <tony@svanstrom.com> skrev i meddelandet
news:1epjzrn.1rf8c3h1dybw42N%tony@svanstrom.com...
> Fabian Thorbjörnsson <fabian@markisspecialisten.com> wrote:
>
> > My form sends this "$FORM{'name'}" to a perl script to add names etc.
> >
> > I would like som help to create a simple "search and delete" script.
>
> Anställ någon (mig ;) som fixar allt åt dig istället, det går otroligt
> mycket snabbare och blir billigare om man ser på tiden du annars måste
> lägga ner på att lösa små problem som för någon som kan det skrivs på
> väldigt kort tid.
>
>
> Translation:
> Hire someone (me), it will save you a buck or two in the long run. [*]
>
>
> /Tony
> [*] Ok, so I was a lil bit lazy with the translation, but that covers
> it. =)
------------------------------
Date: Thu, 01 Mar 2001 09:16:50 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: How can I search and delete a specific name in a textfile.
Message-Id: <slrn99s56f.140.tjla@thislove.dyndns.org>
I was shocked! How could Fabian Thorbjörnsson <fabian@markisspecialisten.com>
say such a terrible thing:
>I want help, not offers from jobbless programmers.
>
>"even newbies wants to lern"
Well do you have any actual code that you have been working on to try
and solve the problem?
--
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
The more crap you put up with, the more crap you are going to get.
------------------------------
Date: Thu, 1 Mar 2001 10:21:53 +0800
From: "John Lin" <johnlin@chttl.com.tw>
Subject: Re: How do I test whether a CODE reference is an NOP?
Message-Id: <97kbqv$a55@netnews.hinet.net>
"Jerome Abela" wrote
> use B::Deparse;
> $deparse = B::Deparse->new();
> if($deparse->coderef2text($code) eq $deparse->coderef2text(sub { })) {
> print 'defined but no operation' }
Wow, B::Deparse is so powerful.
Why don't Data::Dumper take this advantage?
<QUOTE from='perldoc Data::Dumper'>
Data::Dumper cheats with CODE references. If a code reference is
encountered in the structure being processed, an anonymous subroutine
that contains the string '"DUMMY"' will be inserted in its place,
and a warning will be printed if Purity is set.
Someday, perl will have a switch to cache-on-demand
the string representation of a compiled piece of code, I hope.
</QUOTE>
The author seems to think this is not do-able currently.
Am I missing something?
John Lin
------------------------------
Date: Thu, 01 Mar 2001 10:12:03 GMT
From: rgarciasuarez@free.fr (Rafael Garcia-Suarez)
Subject: Re: How do I test whether a CODE reference is an NOP?
Message-Id: <slrn99s82v.47h.rgarciasuarez@rafael.kazibao.net>
John Lin wrote in comp.lang.perl.misc:
> "Jerome Abela" wrote
> > use B::Deparse;
> > $deparse = B::Deparse->new();
> > if($deparse->coderef2text($code) eq $deparse->coderef2text(sub { })) {
> > print 'defined but no operation' }
>
> Wow, B::Deparse is so powerful.
> Why don't Data::Dumper take this advantage?
>
> The author seems to think this is not do-able currently.
> Am I missing something?
I didn't dig into this; however, if you think it's doable, try to
implement this into Data::Dumper. If you run into problems, you'll
understand the author opinion. If not (don't forget to do a lot of
tests) patches are welcome.
--
Rafael Garcia-Suarez / http://rgarciasuarez.free.fr/
------------------------------
Date: Thu, 01 Mar 2001 02:00:46 -0800
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: How the C L P M turns
Message-Id: <3A9E1DCE.18FC7D5@stomp.stomp.tokyo>
bernard.el-hagin wrote:
> Chris Stith wrote:
> [snip]
(significant snippage)
> ... and a plethora of others on this group are directly
> responsible for 90% of my Perl knowledge so anytime I
> see someone criticise this newsgroup I just don't get it.
Ironically, as you personally know, ninety percent of the
posters within this group, are all one person. He is not
all that helpful, quite the opposite actually.
Godzilla!
------------------------------
Date: Thu, 01 Mar 2001 09:09:45 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: How the CLPM turns
Message-Id: <slrn99s4p7.140.tjla@thislove.dyndns.org>
I was shocked! How could bernard.el-hagin@gdndev25.dev.lido-tech
<bernard.el-hagin@gdndev25.dev.lido-tech>
say such a terrible thing:
>regretfully, I had to leave him out. The same goes for Ilmari, Gwynn,
Just have to point out here, it's 'Gwyn' not 'Gwynn'. Not offended, just
like my name spelt right :)
--
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
:IWBNI: // Abbreviation for `It Would Be Nice If'. Compare
{WIBNI}.
From "The New Hackers Dictionary", version 4.2
------------------------------
Date: Thu, 01 Mar 2001 01:10:13 -0800
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: How the CLPM turns
Message-Id: <3A9E11F5.C7419553@stomp.stomp.tokyo>
bernard.el-hagin wrote:
> Chris Stith wrote:
> [snip]
(significant snippage)
> ... and a plethora of others on this group are directly
> responsible for 90% of my Perl knowledge so anytime I
> see someone criticise this newsgroup I just don't get it.
Ironically, as you personally know, ninety percent of the
posters within this group, are all one person. He is not
all that helpful, quite the opposite actually.
Godzilla!
------------------------------
Date: Thu, 1 Mar 2001 09:15:51 +0000 (UTC)
From: bernard.el-hagin@gdndev25.dev.lido-tech ()
Subject: Re: How the CLPM turns
Message-Id: <slrn99s4le.3vvlgkf.bernard.el-hagin@gdndev25.dev.lido-tech>
In article <slrn99s4p7.140.tjla@thislove.dyndns.org>, Gwyn Judd wrote:
>I was shocked! How could bernard.el-hagin@gdndev25.dev.lido-tech
><bernard.el-hagin@gdndev25.dev.lido-tech>
>say such a terrible thing:
>>regretfully, I had to leave him out. The same goes for Ilmari, Gwynn,
>
>Just have to point out here, it's 'Gwyn' not 'Gwynn'. Not offended, just
>like my name spelt right :)
Oopsy. :-)
Cheers,
Bernard
--
#requires 5.6.0
perl -le'* = =[[`JAPH`]=>[q[Just another Perl hacker,]]];print @ { @ = [$ ?] }'
------------------------------
Date: Thu, 01 Mar 2001 09:18:27 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: Learning Perl and I need help.
Message-Id: <slrn99s59g.140.tjla@thislove.dyndns.org>
I was shocked! How could Arvid Warnecke <arvid.warnecke@tu-clausthal.de>
say such a terrible thing:
>Hello!
>
>In article <rM9n6.261720$Pm2.4067910@news20.bellglobal.com>, Rick M wrote:
>>
>> #!/opt/perl5/bin/perl -w
>> @FILES = ('file1', 'file2', 'file3', 'file4', 'file5');
>> print "@FILES\n";
>> print "Please select a file.\n";
>> chomp ($USERS_CHOICE = <STDIN>); # A string (file name) selected by user
>> if ($USERS_CHOICE eq $FILES[$USERS_CHOICE])
>
>I am not really sure about it, coz I am beginner, too, but I think you
>have to use if($USERS_CHOICE eq $FILES{$USERS_CHOICE})
Well it might, if @FILES was really a hash, but it isn't so it wont :)
--
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
"How is it Heresy to see and believe in reality."
[Justin Thomas (just@infoave.net)]
Atheism/Freethought fortune cookie file
------------------------------
Date: Thu, 1 Mar 2001 09:40:45 +0100
From: "Gorka Gomez" <GomezGorka@jazzfree.com>
Subject: Patter matching and substitution problem.
Message-Id: <97l1k5$dg0$1@unbe.sarenet.es>
I want to put in lowercase all the urls in a file. I have tried with the
following script, but the results are not what i expected.
With the following code, i only put in lowercase the last match and not the
others. If i have several possible matches in a string, why do only get the
last and not the first ?
#!/usr/bin/perl -w
undef $/;
$data = <<END;
<html>
<head><title>New page</title></head>
<body>
<a href="PAGE1.htm">Page 1</a>
<a href="PAGE2.htm">PAge 2</a>
</body></html>
END
$endloop = 0;
$out = "";
while( $endloop==0 ){
if ( $data =~ /(.*)<a href=\"(.*)\">(.*)/si ) {
print "\n\$1: [$1]\n";
print "\n\$2: [$2]\n";
print "\n\$3: [$3]\n";
$url = lc $2;
$out = "$out$1<a href=\"$url\">";
$data = $3;
} else {
$out = "$out$data";
$endloop = 1;
}
}
print "\n$out\n";
The output of this script is:
$1: [<html>
<head><title>New page</title></head>
<body>
<a href="PAGE1.htm">Page 1</a>
]
$2: [PAGE2.htm]
$3: [PAge 2</a>
</body></html>
]
<html>
<head><title>New page</title></head>
<body>
<a href="PAGE1.htm">Page 1</a>
<a href="page2.htm">PAge 2</a>
</body></html>
It only gets PAGE2.htm in $2 the first time, instead of PAGE1.htm. Why?
Is there another cleaner or easier way to do this ?
Thanks in advance,
Gorka
------------------------------
Date: Thu, 1 Mar 2001 11:37:33 +0100
From: "Peter Søgaard" <peter.s@tjgroup.dk>
Subject: Re: Patter matching and substitution problem.
Message-Id: <97l8in$gap$1@news.inet.tele.dk>
Try this instead:
**************************
$data = <<END;
<html>
<head><title>New page</title></head>
<body>
<a href="PAGE1.htm">Page 1</a>
<a href="PAGE2.htm">PAge 2</a>
</body></html>
END
$data =~ s/(.*?<a href=\")(.*?)(\">.*?)/$1\L$2\E$3/ig;
print $data;
*********************************
Output should be:
<html>
<head><title>New page</title></head>
<body>
<a href="page1.htm">Page 1</a>
<a href="page2.htm">PAge 2</a>
</body></html>
------------------------------
Date: 1 Mar 2001 10:41:22 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: Patter matching and substitution problem.
Message-Id: <97l90i$7st$1@mamenchi.zrz.TU-Berlin.DE>
According to Peter Søgaard <peter.s@tjgroup.dk>:
> Try this instead:
>
> **************************
> $data = <<END;
> <html>
> <head><title>New page</title></head>
> <body>
> <a href="PAGE1.htm">Page 1</a>
> <a href="PAGE2.htm">PAge 2</a>
> </body></html>
> END
>
> $data =~ s/(.*?<a href=\")(.*?)(\">.*?)/$1\L$2\E$3/ig;
Ugh. This is fine as regular expressions go, but the problem
remains: You *can't* parse HTML with a simple regex. Imagine
an HTML comment that contains a string that looks like an anchor.
The regex will happily go and change it.
The only real solution is to use an HTML parser. There are a
few available on CPAN.
[rest of code snipped]
Anno
------------------------------
Date: 01 Mar 2001 11:44:48 +0100
From: Julien Quint <julien.quint@imag.fr>
Subject: Re: Patter matching and substitution problem.
Message-Id: <khvelwhlqe7.fsf@imag.fr>
"Gorka Gomez" <GomezGorka@jazzfree.com> writes:
> I want to put in lowercase all the urls in a file. I have tried with the
> following script, but the results are not what i expected.
Use the HTML::Parser module. An example would be:
#!/usr/local/bin/perl -w
use strict;
use HTML::Parser;
my $data = <<END;
<html>
<head><title>New page</title></head>
<body>
<a href="PAGE1.htm">Page 1</a>
<a href="PAGE2.htm">PAge 2</a>
</body></html>
END
new HTML::Parser(default_h => [sub { print pop }, "text"],
start_h => [\&_start, "text,tagname,attr"])->parse($data);
sub _start {
my ($text, $tag, $attr) = @_;
if ($tag eq "a" && exists $attr->{href}) {
$text =~ /href/i;
$text = $` . $&;
my $href = $';
$href =~ s/$attr->{href}/lc$attr->{href}/e;
$text .= $href;
}
print $text;
}
__END__
--
Julien
------------------------------
Date: 01 Mar 2001 11:54:27 +0100
From: Julien Quint <julien.quint@imag.fr>
Subject: Re: Patter matching and substitution problem.
Message-Id: <khvbsrllpy4.fsf@imag.fr>
Julien Quint <julien.quint@imag.fr> writes:
> sub _start {
> my ($text, $tag, $attr) = @_;
> if ($tag eq "a" && exists $attr->{href}) {
> $text =~ /href/i;
> $text = $` . $&;
> my $href = $';
> $href =~ s/$attr->{href}/lc$attr->{href}/e;
> $text .= $href;
> }
> print $text;
> }
Sorry to reply to myself, but I just reread my post. There are some cases that
are not well handled by my _start function, so I propose a much simpler one:
sub _start {
my ($text, $tag, $attr) = @_;
$text =~ s/$attr->{href}/lc$attr->{href}/ge
if $tag eq "a" && exists $attr->{href};
print $text;
}
The only caveat is that if the value of the href attribute appears more than
once, it is changed everywhere (which might be a desirable effect anyway). The
first version tried to change only the value of the href attribute, but it
failed miserably with things like
<a id="href=PAGE1.htm" href="PAGE1.htm">Page 1</a>
--
Julien
------------------------------
Date: Thu, 01 Mar 2001 08:08:24 GMT
From: "Parrot" <parrot0123@yahoo.ca>
Subject: Perl, Cookies, and Apache.
Message-Id: <Yrnn6.266660$Pm2.4153919@news20.bellglobal.com>
Okay, I've set up an Apache server to test Perl scripts before uploading
them. After a little trouble, I got it to work, with one problem. It
doesn't want to set cookies. I know that it works because I've already
tested this script on the main server, so the problem's not in the code.
Is there something I have to do so that I'll be able to use cookies? Is
there something that says that cookies can't be set from your local server?
Anybody have any answers?
------------------------------
Date: Thu, 01 Mar 2001 08:43:12 GMT
From: rgarciasuarez@free.fr (Rafael Garcia-Suarez)
Subject: Re: Perl, Cookies, and Apache.
Message-Id: <slrn99s2sb.3gl.rgarciasuarez@rafael.kazibao.net>
Parrot wrote in comp.lang.perl.misc:
> Okay, I've set up an Apache server to test Perl scripts before uploading
> them. After a little trouble, I got it to work, with one problem. It
> doesn't want to set cookies.
You mean, your browser doesn't accept cookies. That's because the
hostname of your local machine doesn't match the hostname given in the
code that sets cookies.
Hopefully, this domain name is defined once and for all in a main
configuration file (a module or a .pl) and it will be very easy to fix.
> Is there something I have to do so that I'll be able to use cookies? Is
> there something that says that cookies can't be set from your local server?
> Anybody have any answers?
That kind of questions are usually better answered in one of the
comp.infosystems.www.servers.* groups. They're not perl-related.
--
Rafael Garcia-Suarez / http://rgarciasuarez.free.fr/
------------------------------
Date: Thu, 1 Mar 2001 18:58:39 +1000
From: "Gregory Toomey" <gtoomey@usa.net>
Subject: Re: Perl, Cookies, and Apache.
Message-Id: <YYnn6.5926$v5.22053@newsfeeds.bigpond.com>
Absolutely, Rafael!!!!
Have a look at http://www.cookiecentral.com/ for info on cookies.
Also, I have posted several cookie code snippets in this newsgroup in the
past few weeks.
You may want to look at these examples.
gtoomey
--------------------------------
"Rafael Garcia-Suarez" <rgarciasuarez@free.fr> wrote in message
news:slrn99s2sb.3gl.rgarciasuarez@rafael.kazibao.net...
> Parrot wrote in comp.lang.perl.misc:
> > Okay, I've set up an Apache server to test Perl scripts before uploading
> > them. After a little trouble, I got it to work, with one problem. It
> > doesn't want to set cookies.
>
> You mean, your browser doesn't accept cookies. That's because the
> hostname of your local machine doesn't match the hostname given in the
> code that sets cookies.
>
> Hopefully, this domain name is defined once and for all in a main
> configuration file (a module or a .pl) and it will be very easy to fix.
>
> > Is there something I have to do so that I'll be able to use cookies? Is
> > there something that says that cookies can't be set from your local
server?
> > Anybody have any answers?
>
> That kind of questions are usually better answered in one of the
> comp.infosystems.www.servers.* groups. They're not perl-related.
>
> --
> Rafael Garcia-Suarez / http://rgarciasuarez.free.fr/
------------------------------
Date: 1 Mar 2001 11:02:13 GMT
From: Ilmari Karonen <iltzu@sci.invalid>
Subject: Re: print "</tr><tr>" vs. print $tr
Message-Id: <983444202.7896@itz.pp.sci.fi>
In article <3A9D6691.1CDA77AA@alamo.nmsu.edu>, Stan McCann wrote:
>Ilya Zakharevich wrote:
>>
>> What reliable measurements show is that calling a Perl function is a
>> *very significant overhead*, close to dispatching 20 Perl opcodes.
>> Given that $c = $a + $b is 5 opcodes, you got the picture. Wrapping
>> it in a function will slow it down 5 times.
>
>Thanks Ilya, that's what I was thinking is that the function would use
>more overhead than using a variable but I was curious about how much.
>This kind of clears it up for me.
Now, before you misunderstand Ilya's point: The overhead of a function
call compared to adding two numbers together is a lot. The overhead of
either of those compared to printing an HTML page is insignificant.
Not to mention all the other overhead associated with CGI programs, of
which printing the output is only a rather small part.
If you're doing number crunching in a loop, needless funtion calls
should be avoided. Arguably in those cases Perl should be avoided.
--
Ilmari Karonen - http://www.sci.fi/~iltzu/
"Broken email is Not My Problem. Even though I built the mail server.
Sometimes I like this job." -- Roger Burton West in the monastery
Please ignore Godzilla / Kira -- do not feed the troll.
------------------------------
Date: 1 Mar 2001 09:34:19 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: PROPOSAL: Graphics::ColorNames
Message-Id: <97l52r$3bq$1@mamenchi.zrz.TU-Berlin.DE>
Keywords: Clarence, affectionate, parapsychology, transmittance
According to Mark Jason Dominus <mjd@plover.com>:
> In article <973280$p4s$3@mamenchi.zrz.TU-Berlin.DE>,
> Anno Siegel <anno4000@lublin.zrz.tu-berlin.de> wrote:
> >According to Brad Baxter <bmb@ginger.libs.uga.edu>:
> >
> >> 18 *get_colour = *get_couleur = *get_colore = *get_color;
> >
> >This aliases not only &get_colour but also $get_colour etc. In a
> >general-purpose module this is a bit risky. use
> >
> > *get_colour = *get_couleur = *get_colore = \ &get_color;
>
> This also aliases $get_colour and $get_couleur, etc.
Uh, no. Assignment of a reference to a typeglob is selective.
Anno
------------------------------
Date: Thu, 01 Mar 2001 10:35:25 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: regex help please
Message-Id: <1u8s9t0prqirp7vgmqdmrsofb8i3rmrv9s@4ax.com>
Bob Walton wrote:
>>Ouch. Even with relative small
>> problems, it's easy to run out of memory. Multi-megabytes. The problem
>> was something in the neighbourhood of 6th derivative of tan(x).
>You mean 32 * sec^2(x) * tan^5(x) + 416 * sec^4(x) * tan^3(x) + 272 *
>sec^6(x) * tan(x) ? That's not difficult.
You cheat.
Yes, the end result *can* be reduced to something relatively simple.
However, the expression I got, even after a lot of simplification,
cannot even be printed on one A4 page.
The problem isn't that trivial, as the program most be able to reduce
"(2*x)+(x*3)" to "(5*x)", or "(2*x*4)" to "(8*x)", as some simple
example. That's why symbolic manipulations of the expressions as lists
(array, in Perl lingo) and not as string, makes life a LOT easier. So I
turned "(2*x)" into [ '*', 2, '$x' ], and "(2*x)+(x*3)" into [ '+', [
'*', 2, '$x'], ['*', '$x', 3 ] ]; '(2*x*3)' becomes [ '*', 2, '$x', 3].
One simplification rule for '*' is that all numerical parameters may be
multiplied with each other, and the result be put upfront as first
parameter.
--
Bart.
------------------------------
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 V10 Issue 383
**************************************
