[12367] in Perl-Users-Digest
Perl-Users Digest, Issue: 5968 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Jun 12 03:07:19 1999
Date: Sat, 12 Jun 99 00:01:35 -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 Sat, 12 Jun 1999 Volume: 8 Number: 5968
Today's topics:
Re: Odd/Even Numbers? (Abigail)
Re: Odd/Even Numbers? (Abigail)
Re: Odd/Even Numbers? (Abigail)
Re: Opening a returned web page in a new window... (Abigail)
Re: Opening many new windows... (Abigail)
Re: Perl class and constructor (Hasanuddin Tamir)
Re: Perl Script - HELP! <rootbeer@redcat.com>
Re: Piping to script w/ command line arguments d_dave@my-deja.com
Re: quiz for perl professionals <webmaster@chatbase.com>
Re: shortest self printing perl program (Abigail)
Re: Silly old me <webmaster@chatbase.com>
Re: Silly old me (Tad McClellan)
Re: Silly old me (Abigail)
Re: Verifying date data (Larry Rosler)
Re: why short of 1 month ?? (Abigail)
Re: write the output of eval to a string? <rootbeer@redcat.com>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 11 Jun 1999 18:23:26 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Odd/Even Numbers?
Message-Id: <slrn7m3741.37n.abigail@alexandra.delanet.com>
Brent Singers (brent.s@ihug.co.nz) wrote on MMCIX September MCMXCIII in
<URL:news:Pine.LNX.4.10.9906111025220.1564-100000@brent.ihug.co.nz>:
$$ Is there any way of Perl telling if a number is odd or even? I have a
$$ script where I need do do one thing if a numerical result is even, and
$$ something if it is odd...
Yes, it's very easy.
sub is_even ($);
sub is_odd ($);
sub is_even ($) {
my $number = abs shift;
return 1 unless $number;
return !is_odd ($number - 1);
}
sub is_odd ($) {
return !is_even shift;
}
Now, people who have studied math for 10 years at Caltech or some other
top university are likely to use tricks like:
sub is_even ($) {
my $number = shift;
return (3 * $number + $number + $number) =~ /0$/;
}
but that shows they are only mathematicians and not computer people, as
the above sub can lead to overflow!
Abigail
--
perl -e '$a = q 94a75737420616e6f74686572205065726c204861636b65720a9 and
${qq$\x5F$} = q 97265646f9 and s g..g;
qq e\x63\x68\x72\x20\x30\x78$&eggee;
{eval if $a =~ s e..eqq qprint chr 0x$& and \x71\x20\x71\x71qeexcess}'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: 11 Jun 1999 18:52:18 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Odd/Even Numbers?
Message-Id: <slrn7m38q4.37n.abigail@alexandra.delanet.com>
Tom Christiansen (tchrist@mox.perl.com) wrote on MMCX September MCMXCIII
in <URL:news:37613ad3@cs.colorado.edu>:
<> [courtesy cc of this posting mailed to cited author]
<>
<> In comp.lang.perl.misc,
<> Brent Singers <brent.s@ihug.co.nz> writes:
<> :Is there any way of Perl telling if a number is odd or even? I have a
<> :script where I need do do one thing if a numerical result is even, and
<> :something if it is odd...
<>
<> Either the successful completion of basic arithmetic courses in grammar
<> school is no longer a requirement for awarding our children access to
<> computers, or else you are a curious and innovative soul inquiring after
<> creative approaches of a more idiomatically perlian bent to this most
<> trivial of all possible problems. As it would be severely depressing
<> if the former explanation were the root cause of your query, the latter
<> must then be taken as the actual case. I shall consequently assume then
<> that you are not a hopeless idiot and instead present you with some more
<> interesting solutions to digest.
<>
<> ( (1 x $integer) =~ /^(11)+$/ ? $even : $odd ) = 1;
<>
<> or
<>
<> ( (1 x $integer) =~ /^(1+)\1$/ ? $even : $odd ) = 1;
<>
<> or
<>
<> ( ($integer / (1 << 1)) =~ /\.5$/ ? $odd : $even) = 1;
<>
<> or:
<>
<> ($integer =~ /[13579]$/ ? $odd : $even) = 1;
<>
<> or
<>
<> (($integer & (1 << 0)) ? $odd : $even ) = 1;
<>
<> or perhaps most obvious of all:
<>
<> sub odd {
<> my($n) = $_;
<> $n<=0 ? 0 : !even($n-1);
<> }
That should be:
$n <= 0 ? 0 : even ($n - 1);
<> sub even {
<> my($n) = $_;
<> $n<=0 ? 1 : !odd($n-1);
<> }
That should be:
$n <= 0 ? 1 : odd ($n - 1);
You forgot one:
sub is_even ($) {
my ($number) = abs shift;
my @answers = (1, 0);
while (@answers < $number) {push @answers, @answers}
return $answers [$number];
}
Abigail
--
perl -e '$a = q 94a75737420616e6f74686572205065726c204861636b65720a9 and
${qq$\x5F$} = q 97265646f9 and s g..g;
qq e\x63\x68\x72\x20\x30\x78$&eggee;
{eval if $a =~ s e..eqq qprint chr 0x$& and \x71\x20\x71\x71qeexcess}'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: 11 Jun 1999 18:53:15 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Odd/Even Numbers?
Message-Id: <slrn7m38ru.37n.abigail@alexandra.delanet.com>
Abigail (abigail@delanet.com) wrote on MMCX September MCMXCIII in
<URL:news:slrn7m3741.37n.abigail@alexandra.delanet.com>:
@@
@@ Yes, it's very easy.
@@
@@ sub is_even ($);
@@ sub is_odd ($);
@@
@@ sub is_even ($) {
@@ my $number = abs shift;
@@ return 1 unless $number;
@@ return !is_odd ($number - 1);
^ That ! doesn't belong here.
@@ }
@@
@@ sub is_odd ($) {
@@ return !is_even shift;
@@ }
Abigail
--
sub f{sprintf'%c%s',$_[0],$_[1]}print f(74,f(117,f(115,f(116,f(32,f(97,
f(110,f(111,f(116,f(104,f(0x65,f(114,f(32,f(80,f(101,f(114,f(0x6c,f(32,
f(0x48,f(97,f(99,f(107,f(101,f(114,f(10,q ff)))))))))))))))))))))))))
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: 11 Jun 1999 18:37:14 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Opening a returned web page in a new window...
Message-Id: <slrn7m37tt.37n.abigail@alexandra.delanet.com>
R.Joseph (streaking_pyro@my-deja.com) wrote on MMCX September MCMXCIII in
<URL:news:7jq1o7$5bh$1@nnrp1.deja.com>:
?? I would like to write a script that, when "submit" is clicked, the
?? returned HTML page is opened in a new window (like TARGET=_new) and the
?? user stays at the origanal page that he was at when he
?? clicked "submit". Thanks for any help!
I suggest you use 'vi' to write your script.
Abigail
--
perl -e '$_ = q *4a75737420616e6f74686572205065726c204861636b65720a*;
for ($*=******;$**=******;$**=******) {$**=*******s*..*qq}
print chr 0x$& and q
qq}*excess********}'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: 11 Jun 1999 18:38:15 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Opening many new windows...
Message-Id: <slrn7m37vq.37n.abigail@alexandra.delanet.com>
R.Joseph (streaking_pyro@my-deja.com) wrote on MMCX September MCMXCIII in
<URL:news:7jq38t$5p2$1@nnrp1.deja.com>:
## Ok, lets say I have a script that takes in user data, and then uses
## this data to search many different engines (like say, 8 search engines
## with the field the enter). If I want each search engines results to
## come up in a new window, how would I accomplish this?? Thanks alot!
Move to the world trade center, that has a lot of windows.
Abigail
--
perl -we 'print split /(?=(.*))/s => "Just another Perl Hacker\n";'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: 12 Jun 1999 20:22:34 GMT
From: hasant@trabas.co.id (Hasanuddin Tamir)
Subject: Re: Perl class and constructor
Message-Id: <slrn7m3qtb.5tp.hasant@borg.intern.trabas.co.id>
On Fri, 11 Jun 1999 12:21:15 -0400, Songtao Chen <songtao@cisco.com> wrote:
> Hi everyone,
>
> The code below (Person.pm) is from the perltoot manpage in Perl 5.004
> package.
>
> According to the manpage, we can do,
>
> use Person;
>
> $him = Person->new();
> $him->name("Jason");
> $him->age(23);
> $him->peers( "Norbert", "Rhys", "Phineas" );
>
> I believe this is the right way to use the class. However,
> since $him is the reference to the hash as returned from the
> constructor, we could also do this,
>
> ...
> $him->{'NAME'} = "John";
> $him->{'AGE'} = 32;
> ...
>
> Any comments for this ?
This is also from the same manpage:
The interface to the class and its objects is exclusively
via methods, and that's all the user of the class should
ever play with.
So what's your concern?
Or you may want to read the perltootc manpage
at language.perl.com for more about class data
> Question: how could I return something other than the
> reference to the anonymous hash and keep
> the object alive ?
Return array.
HTH,
--
-hasan-
uhm, no more sig(h)
------------------------------
Date: Fri, 11 Jun 1999 17:33:42 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Perl Script - HELP!
Message-Id: <Pine.GSO.4.02A.9906111727370.6999-100000@user2.teleport.com>
On Fri, 11 Jun 1999, Bill Pitz wrote:
> Subject: Perl Script - HELP!
Please check out this helpful information on choosing good subject
lines. It will be a big help to you in making it more likely that your
requests will be answered.
http://www.perl.com/CPAN/authors/Dean_Roehrich/subjects.post
> foreach $visitor(@idstrings) {
> foreach $visitorx(@idstrings) {
> $count{$visitorx} = $count{visitorx} + 1;
> }
> foreach $visitor(keys %count) {
> print "$visitor was here $count{$visitor} times.\<br>\ \n";
> }
> }
I think you really want something like this, although I can't be sure.
{
my %count;
for (@idstrings) {
$count{$_}++;
}
for (sort keys %count) {
print "$_ was here $count{$_} times.<br>\n";
}
}
Good luck with it!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Fri, 11 Jun 1999 23:14:48 GMT
From: d_dave@my-deja.com
Subject: Re: Piping to script w/ command line arguments
Message-Id: <7js593$shp$1@nnrp1.deja.com>
worked like a charm baby!
thanx
dave
In article <37606af8@news3.us.ibm.net>,
<kk> wrote:
> use <STDIN> to get piped input, and @ARGV for command line.
> DAvid zADE
> dzade@ibm.net
> d_dave@my-deja.com wrote in message <7jpep2$v61$1@nnrp1.deja.com>...
> >this is basically what i want to do on the commandline:
> >
> >% echo "dog" | ./perlscript option1 option2
> >
> >anyone know how to distinguish between the piped info and the command
> >line args?
> >
> >So far Ive been able to distiguish the arguments by using the @ARGV
> >indicator but i havent been able to access the piped argument. Using
<>
> >returns errors for the command line args but returns the piped args.
> >
> >dave
> >
> >
> >Sent via Deja.com http://www.deja.com/
> >Share what you know. Learn what you don't.
>
>
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Fri, 11 Jun 1999 17:26:51 -0700
From: TRG Software : Tim Greer <webmaster@chatbase.com>
Subject: Re: quiz for perl professionals
Message-Id: <3761A94B.CAF94B98@chatbase.com>
Kiriakos Georgiou wrote:
>
> You may not believe it,
- I saw Bigfoot once... -
> but so far out of the interviewees that claimed to
> be experienced with perl, none has been able to answer my #1 killer
> question: "How do you find the length of an array?"
Killer question, eh?
> I figured if the readers of this news group can't get the length of an
> array there isn't much hope.
Or there wouldn't be much hope for this group. :-)
> Anyway, I include a list of questions - if
> you can answer them and you enjoy working with HTML, CGI.pm, DBI (talking
> to sybase), etc., I would like to talk to you. The job is in Washington DC.
That's the strangest way I've ever seen a headhunter post a job ad.
<SNIP>
Or you're just hoping to get some questions answered for your own test
so you can get a job? How about something a little more complex? Or have
you gotten that far? What was the purpose of your post anyway? Surely
not a bad attempt as to snatch up a Perl programmer, or was it?
--
Regards,
Tim Greer: chatmaster@chatbase.com / software@linkworm.com
Chat Base: http://www.chatbase.com | 250,000+ hits daily Worldwide!
TRG Software: http://www.linkworm.com | CGI scripting in Perl/C, & more.
Unix/NT/Novell Administration, Security, Web Design, ASP, SQL, & more.
Freelance Programming & Consulting, Musician, Martial Arts, Sciences.
------------------------------
Date: 11 Jun 1999 18:39:40 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: shortest self printing perl program
Message-Id: <slrn7m382f.37n.abigail@alexandra.delanet.com>
Kiriakos Georgiou (kgnews@olympiakos.com) wrote on MMCX September
MCMXCIII in <URL:news:87iu8vd1no.fsf@gate7.olympiakos.com>:
{}
{} OK, since I am in quiz mode today, can someone come up
{} with a shorter program that prints itself without opening
{} any files, spawning processes etc. than this one-liner:
{}
{}
{} printf($x,39,$x='printf($x,39,$x=%c%s%c,39);',39);
The empty program will. And you cannot beat 0 bytes.
Abigail
--
perl -MTime::JulianDay -lwe'@r=reverse(M=>(0)x99=>CM=>(0)x399=>D=>(0)x99=>CD=>(
0)x299=>C=>(0)x9=>XC=>(0)x39=>L=>(0)x9=>XL=>(0)x29=>X=>IX=>0=>0=>0=>V=>IV=>0=>0
=>I=>$r=-2449231+gm_julian_day+time);do{until($r<$#r){$_.=$r[$#r];$r-=$#r}for(;
!$r[--$#r];){}}while$r;$,="\x20";print+$_=>September=>MCMXCIII=>()'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Fri, 11 Jun 1999 17:08:32 -0700
From: TRG Software : Tim Greer <webmaster@chatbase.com>
Subject: Re: Silly old me
Message-Id: <3761A500.4ECBCA79@chatbase.com>
CacheBoy wrote:
>
> Hi, from the quality of the replies here, some of you really know your
> stuff.
> I would like to inquire abt who is the father/fathers of perl.
>
> Thanks. Pls understand that I am very new to perl and my knowledge is not as
> much as most of you here so please refrain from giving me the
> you-mean-dont-know kind of answers.
> Once again thanks.
If you've looked at much of anything about/with Perl or any site that
has much of anything about it, you'd see the name "Larry Wall", along
with a lot of others that contributed, and most of them are active in
this NG and you probably just passed over a few of their posts.
--
Regards,
Tim Greer: chatmaster@chatbase.com / software@linkworm.com
Chat Base: http://www.chatbase.com | 250,000+ hits daily Worldwide!
TRG Software: http://www.linkworm.com | CGI scripting in Perl/C, & more.
Unix/NT/Novell Administration, Security, Web Design, ASP, SQL, & more.
Freelance Programming & Consulting, Musician, Martial Arts, Sciences.
------------------------------
Date: Fri, 11 Jun 1999 15:31:17 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Silly old me
Message-Id: <56orj7.9d8.ln@magna.metronet.com>
David Cassell (cassell@mail.cor.epa.gov) wrote:
: Tad McClellan wrote:
: >
: > CacheBoy (chongsun@krdl.org.sg) wrote:
: > [snip]
: >
: > : Thanks. Pls understand that I am very new to perl and my knowledge is not as
: > : much as most of you here so please refrain from giving me the
: > : you-mean-dont-know kind of answers.
: >
: > You mean you don't know to check Perl's standard docs before
: > posting to the Perl newsgroup?
: Rats! Doggonit Tad, *I* wanted to be the first one to say
: "you mean you don't know" in my reply.
Some folks have a hard time with taking direction.
I would be one of those folks.
:-)
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: 11 Jun 1999 18:41:48 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Silly old me
Message-Id: <slrn7m386f.37n.abigail@alexandra.delanet.com>
CacheBoy (chongsun@krdl.org.sg) wrote on MMCX September MCMXCIII in
<URL:news:7jq60i$p3p$3@godzilla.krdl.org.sg>:
^^ Hi, from the quality of the replies here, some of you really know your
^^ stuff.
^^ I would like to inquire abt who is the father/fathers of perl.
Is there a reason you are not able to read the 'AUTHOR' section
of 'man perl' ?
Abigail
--
sub f{sprintf$_[0],$_[1],$_[2]}print f('%c%s',74,f('%c%s',117,f('%c%s',115,f(
'%c%s',116,f('%c%s',32,f('%c%s',97,f('%c%s',0x6e,f('%c%s',111,f('%c%s',116,f(
'%c%s',104,f('%c%s',0x65,f('%c%s',114,f('%c%s',32,f('%c%s',80,f('%c%s',101,f(
'%c%s',114,f('%c%s',0x6c,f('%c%s',32,f('%c%s',0x48,f('%c%s',97,f('%c%s',99,f(
'%c%s',107,f('%c%s',101,f('%c%s',114,f('%c%s',10,)))))))))))))))))))))))))
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Fri, 11 Jun 1999 17:07:20 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Verifying date data
Message-Id: <MPG.11cb4490afd9288989bc7@nntp.hpl.hp.com>
In article <7jrs5f$pdt$1@nnrp1.deja.com> on Fri, 11 Jun 1999 20:39:13
GMT, gsherman2773@my-deja.com <gsherman2773@my-deja.com> says...
> Hold on here a second. I'm not sure that telling
> somebody about Date::Manip, Date::Calc, etc. is
> adequately dealing with the problem of verifying
> that a date string is indeed a valid date. Great
> as those modules are, I haven't yet seen a
> function akin to the ' isdate($datestr) returns
> bool ' function I've seen in the Windows/Basic
> world. I really need such a function to validate
> dates coming across in CGIs, and I wonder how
> others have solved this problem. I'm sure MANY
> people have had to deal with this problem, but I
> see nothing in the FAQ, etc. about it. If
> somebody has a one-liner of code that takes care
> of this issue, you'd be helping me (and perhaps
> others) out a lot.
I'll post a function that works with the broken-down components of a
date/time string. How the string is parsed into those components is up
to you. It's a bit more than a one-liner, but not much.
#!/usr/local/bin/perl -w
use strict;
sub isdate ($$$$$$) {
6 == grep { defined } @_[0 .. 5] or return;
my ($sec, $min, $hour, $day, $mon, $year) = @_;
my @m_day = (31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);
$m_day[1] = 29 unless $year % 4; # OK from 1901 through 2099.
0 < $year && $year < 200
&& 0 <= $mon && $mon < 12
&& 0 < $day && $day <= $m_day[$mon]
&& 0 <= $hour && $hour < 24
&& 0 <= $min && $min < 60
&& 0 <= $sec && $sec < 60
}
# isdate: Validate the components of a date/time.
# Larry Rosler, June 11, 1999
# isdate($sec, $min, $hour, $day, $mon, $year) returns true if
# the date/time specified by the arguments represents a valid
# date/time. Daylight Savings Time considerations are ignored.
# The values of the arguments are the same as those of the localtime
# function: the month is the number of months since January;
# the year is the number of years since 1900. The valid range
# of the year is 1 through 199 (years 1901 through 2099).
Take it away, Daniel Grisinger, for the Perl Function Repository (after
the folks here have a chance to peck it to death).
PS: Yes, this function has a documented Y2.1K problem. I know how to
extend the leap-year calculation, but I don't much care!
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 11 Jun 1999 18:43:37 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: why short of 1 month ??
Message-Id: <slrn7m389r.37n.abigail@alexandra.delanet.com>
NCB (eng80386@nus.edu.sg) wrote on MMCX September MCMXCIII in
<URL:news:7jprtd$rb6$1@newton.pacific.net.sg>:
,, Hi all ,
,, Given
,,
,, ($sec ,$min,$hr,$mntdy,$mon,$yr,$wk,$yrdy,$stm)=localtime;
,,
,, why is the variable $mon which stands for month always slower by 1 month ??
It was done on purpose. That way, there's no December for Perl programmers,
so they can a real long Christmas holiday.
Abigail
--
perl -wlne '}print$.;{' file # Count the number of lines.
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Fri, 11 Jun 1999 17:51:19 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: write the output of eval to a string?
Message-Id: <Pine.GSO.4.02A.9906111737110.6999-100000@user2.teleport.com>
On Sat, 12 Jun 1999, Christoph Bergmann wrote:
> i've got a string containing perl code, which makes some output with
> "print". i want to "eval" this code and write the output NOT to STDOUT
> but to another string.
Use a tied filehandle. But it would be much better to fix the perl code to
do what you want in the first place, of course. Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 12 Dec 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 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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 5968
**************************************
