[11882] in Perl-Users-Digest
Perl-Users Digest, Issue: 5482 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Apr 26 03:16:45 1999
Date: Mon, 26 Apr 99 00:00:18 -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 Mon, 26 Apr 1999 Volume: 8 Number: 5482
Today's topics:
Re: $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex( (Benjamin Franz)
Administration Scripts Win-NT Perl <bennettd@asdi.saic.com>
Re: Can a DNS lookup be performed from within perl ? (Benjamin Franz)
chdir??? long_way_home@my-dejanews.com
Re: Decimal to fraction (Larry Rosler)
Re: Decimal to fraction (Mark-Jason Dominus)
Free Web Hosting with CGI <pafortin@i-1.net>
Re: Help with Code (Larry Rosler)
Re: Help! Error message when using C-comment stripper f (Larry Rosler)
Re: How do i print something using perl? smnayeem@my-dejanews.com
Re: How do i print something using perl? (Ilya Zakharevich)
Re: Newbie regex query <cassell@mail.cor.epa.gov>
returning a hashtable from a subformula <kimrice@leland.Stanford.EDU>
Simple Question <mkshanx@ust.hk>
Re: Simple Question <ffchopin@worldnet.att.net>
syslog under Linux (RESOLVED!) (Neil Cherry)
Re: What is wrong with this picture? <jimx@metronet.com>
Re: What is wrong with this picture? (Larry Rosler)
Re: What is wrong with this picture? (Larry Rosler)
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 26 Apr 1999 03:39:09 GMT
From: snowhare@long-lake.nihongo.org (Benjamin Franz)
Subject: Re: $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg;
Message-Id: <xdRU2.3413$oU1.278546@typhoon-sf.snfc21.pbi.net>
In article <3723BA06.76D121D@erols.com>,
Matthew O. Persico <mpersico@erols.com> wrote:
>Benjamin Franz wrote:
>>
>[snip]
>> Nor do I. I find pulling a 150+Kbytes for a form decoder to be...excessive.
>>
>Um. what about AUTOLOAD? Doesn't that help? And isn't the package
>AUTOLOADing?
bash>ls -lta CGI.pm
-r--r--r-- 1 root root 190905 Apr 6 06:44 CGI.pm
Hmmm...It got *BIGGER* since the last time a year or so ago when I
checked it. It is now pushing 190K.
Yes. It AUTOLOADs via a clever trick that accelerates its
"time 'til running". Which is not to say you don't still
pay substantially for it. In my test, it took about 0.20s
CPU to load my posted Local::JCGI.pm and do nothing. It took
0.32s CPU to load CGI.pm and do nothing. And CGI.pm uses 200K
more memory per process just to load - *before* anything gets
AUTOLOADed by the calling program.
--
Benjamin Franz
------------------------------
Date: Sun, 25 Apr 1999 22:05:30 -0700
From: "Darren Bennett" <bennettd@asdi.saic.com>
Subject: Administration Scripts Win-NT Perl
Message-Id: <85110720@NEWS.SAIC.COM>
I have been looking to setup a collection of WIN -NT Administrative
perl scripts that could do similiar functions as shell scripts in Unix
(Administrative account tracking, Directory/disk usage..etc..).. anyone with
any (or any ideas/links) please reply... THANKX!!
Celtic
------------------------------
Date: Mon, 26 Apr 1999 04:16:21 GMT
From: snowhare@long-lake.nihongo.org (Benjamin Franz)
Subject: Re: Can a DNS lookup be performed from within perl ?
Message-Id: <pMRU2.3421$oU1.282298@typhoon-sf.snfc21.pbi.net>
In article <7g0gfb$ntk$5@client2.news.psi.net>,
Abigail <abigail@fnx.com> wrote:
>Benjamin Franz (snowhare@long-lake.nihongo.org) wrote on MMLXIII
>$$
>$$ Surprisingly enough, '1234567' could (almost) be an IP address.
>$$
>$$ Try http://3521755779/snowhare/ in a web browser (note -
>$$ the Squid proxy server _mistakenly_ rejects straight 32 bit
>$$ addresses as being invalid).
>
>I don't think it _mistakenly_ does so. It might actually just follow
>the specs.
>
>While 3521755779 might be a valid IP address, RFC 1738 doesn't find
>http://352175579/snowhare/ a valid URL. And that's what matters.
True, but RFC 1738 is starting to show its age. You
can't use a IPv6 IP address as a URL with it, for example.
I would view that as a defect in RFC 1738.
>Of course, that has nothing to do with Rajesh question. If his server
>always uses IP numbers with 3 dots, /(\d+\.\d+\.\d+\.\d+)/ will do just
>fine. But (s)he has to add the \'s.
Actually, it won't. It suffers from false triggering in that form, still.
It is legal for the local part of the URL to contain dot quad components.
S(he) needs to completely spec the log format correctly. For a
CLF log,
($Domain,$rfc931,$authuser,$TimeDate,$Request,$Status,$Bytes) =
/^(\S+) (\S+) (\S+) \[([^\]\[]+)\] \"([^"]*)\" (\S+) (\S+)/o;
For an ECLF log,
($Domain,$rfc931,$authuser,$TimeDate,$Request,$Status,$Bytes,$Referrer,$Agent) =
/^(\S+) (\S+) (\S+) \[([^\]\[]+)\] \"([^"]*)\" (\S+) (\S+) \"?([^"]*)\"? \"([^"]*)\"/o;
--
Benjamin Franz
------------------------------
Date: Mon, 26 Apr 1999 04:50:09 GMT
From: long_way_home@my-dejanews.com
Subject: chdir???
Message-Id: <7g0ra0$gp1$1@nnrp1.dejanews.com>
Hi. I can't seem to get the chdir command to work. I run my script and then
the damn thing doesn't complain..... or work. It doesn't seem to change the
working directory. here it is #! /bin/perl5 use Cwd;
print "Welcome to CSD on thor. Who are you?\n"; $person = <STDIN>;
chomp($person); $path=cwd(); $succ=mkdir($person,0777);
open(logfile,'>>/tmp/csdlog'); $date = `date`; chop($date); print (logfile
"$date $person\n"); if ($succ == 1){ chdir "$path/$person" or die
"Can't cd to $person: $!\n"; print "Welcome $person. A directory has
been created for your files \n"; print "and you should move to it (cd
dir). If you need to use the help \n"; print "type \"csdhelp\". I don't
know how to use the program so you're not\n"; print "getting help on
that front from me but anything system related you \n"; print "can talk to
me. PS make sure the CSD DATABASE V5.17 CD is in the drive\n"; } if ($succ ==
0){ $us=`du -k $person`; chop($us); ($amt,$gar)=split(/\s+/,$us);
$amt .= "K"; # $hm="$path/$person";
chdir "$path/$person/" or die "Can't cd to $person: $!\n";
print "Welcome back $person. You are using $amt space.\n";
print "PS make sure the CSD DATABASE V5.17 CD is in the drive\n";
}
What am I doing wrong???
Thanks
geoff
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Sun, 25 Apr 1999 21:40:43 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Decimal to fraction
Message-Id: <MPG.118d8e26c05c9591989941@nntp.hpl.hp.com>
In article <7g0h40$ntk$7@client2.news.psi.net> on 26 Apr 1999 01:56:16
GMT, Abigail <abigail@fnx.com> says...
> JJ (webdude@mcminn.net) wrote on MMLXIV September MCMXCIII in
> <URL:news:Y1OU2.2726$94.1233838@news1.usit.net>:
> == is it possible to convert decimal values to fractions in a script? Maybe
> == with regular expressions?
>
> Yes.
>
> (my $fraction = $decimal) =~ s{\.(\d+)}{ $1/1${\(0 x length $1)}};
Well, sure. But what about (a) not producing fractions which have
numerators of zeroes only, and (b) reducing to lowest terms?
(a) is easy enough. The context for the Boolean has to be numeric, so
the $1 && 'something' idiom I posted earlier today wouldn't work.
(my $fraction = $decimal) =~
s{\.(\d+)}{$1 + 0 ? " $1/1${\(0 x length $1)}" : ""}e;
(b) is much grubbier (which is why I didn't bother). One would have to
compute the GCD of the numerator and the denominator (using a well-known
recursion), then divide them each by that. A whole program in the
substitution part of a regex.
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Mon, 26 Apr 1999 05:31:15 GMT
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: Decimal to fraction
Message-Id: <7g0tma$mdf$1@monet.op.net>
In article <Y1OU2.2726$94.1233838@news1.usit.net>,
JJ <webdude@mcminn.net> wrote:
>is it possible to convert decimal values to fractions in a script?
Sure, that sounds like fun. Here's a package you can use either as a
standalone program, or as a module. (Install it as `Fraction.pm' and
say `use Fraction'). It contains four functions, of which the
simplest is `decimal_to_fraction'. You pass in a Perl number and it
will try to find a reasonably close fraction and return the numerator
and denominator. For example,
($n, $d) = decimal_to_fraction(3.142857142857);
returns (22, 7), and indeed 22/7 is very, very close to
3.142857142857. You can control the accuracy with an optional second
parameter to the function; if you ask for
($n, $d) = decimal_to_fraction(3.142857142857, 1e-14);
it is supposed to try to find a fraction that is accurate to within
1e-14. Since the argument is really *very* close to 22/7, if you want
to find a fraction that is closer it will necessarily have a very
large denominator---in fact, the program comes up with
191454343003579/6091729095568. But we did get what we asked for. In
general, the more accuracy you want, the larger the denominator will
be. The program guarantees to find the simplest possible fraction
that is within the specified error. The default error is 2**(-12)
which is .000244140625.
If you're not sure how accurate you need to be, and you want to
explore the tradeoffs between accuracy and simplicity, use the
`convergents' function instead. It gets the same parameters, but
instead of getting returning a single fraction, it returns a whole
list, starting with the least accurate and simplest and working
towards the more accurate but more complicated. For example,
convergents(3.14159);
returns a list ([3,1], [22,7], [333,106], ...) which represents this
list of fractions:
3/1 (too low by 1/7)
22/7 (too high by 1/789)
333/106 (too low by 1/12412)
355/113 (too high by 1/342424)
9208/2931 (etc.)
9563/3044
76149/24239
314159/100000 (exact)
It stops there because obviously 314159/100000 is exact. Again,
there's an optional second parameter that tells it how close it should
get before it stops.
The other two functions in the package are only of interest to
mathematicians. If you are not a mathematician, yo umay ignore them.
If you are a mathematician, you will find them self-documenting, and,
in fact, you probably already know what they are without my having to
tell you.
Hope this helps.
#!/usr/bin/perl
#
# Convert Perl floating-point numbers to fractions.
# Copyright 1999 M-J. Dominus (mjd-perl-math@plover.com)
#
package Fraction;
use Exporter;
@ISA = qw(Exporter);
@EXPORT_OK = qw(decimal_to_continued_fraction
continued_fraction_to_fraction
decimal_to_fraction
convergents
);
$DEFAULT_PRECISION = 2**(-12);
sub decimal_to_continued_fraction {
my ($n, $e) = @_;
$e = $DEFAULT_PRECISION unless defined $e;
my $i = int $n;
my $f = $n - $i;
# print ">> $i + $f\n";
if ($f <= $e) {
return $i;
} elsif (1-$f <= $e) {
return $i + 1;
}
my @result = decimal_to_continued_fraction(1/$f, $e*$i);
return ($i, @result);
}
sub continued_fraction_to_fraction {
my @cf = reverse @_;
my ($n, $d) = (shift @cf,1);
while (@cf) {
($n, $d) = ($d, $n);
$n += $d * shift(@cf);
}
($n, $d);
}
sub convergents {
my @cf = decimal_to_continued_fraction(@_);
my @c;
my @result;
for (@cf) {
push @c, $_;
push @result, [continued_fraction_to_fraction(@c)];
}
@result;
}
unless (caller) {
while ($r = <>) {
@l = decimal_to_continued_fraction($r);
($n, $d) = continued_fraction_to_fraction(@l);
print "That looks like $n/$d.\nLet me check.\n";
$r2 = $n/$d;
if ($r2 == $r) {
print "Yup!\n";
} elsif (abs($r2 - $r) < $DEFAULT_PRECISION) {
print "Close enough.\n";
} else {
print "No, $n/$d is actually $r2. Something is wrong.\n"
}
}
}
1;
------------------------------
Date: Mon, 26 Apr 1999 01:01:27 -0500
From: "Paul A. Fortin" <pafortin@i-1.net>
Subject: Free Web Hosting with CGI
Message-Id: <37240137.B7135A0E@i-1.net>
Is there a site out there that allows CGI hosting and that is free.
I've tried "webjump" but they severely limit what you can do in a script
and it has become an irritant?
Thanks for the help in advance.
Paul A. Fortin
------------------------------
Date: Sun, 25 Apr 1999 21:10:08 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Help with Code
Message-Id: <MPG.118d86fa9273804a98993f@nntp.hpl.hp.com>
In article <7g0hiv$ntk$9@client2.news.psi.net> on 26 Apr 1999 02:04:15
GMT, Abigail <abigail@fnx.com> says...
> Simon Gronow (srg@babcom.com.au) wrote on MMLXIII September MCMXCIII in
> <URL:news:372288D7.591A236B@babcom.com.au>:
> $$
> $$ My Question is how can I get one character in a line, the "/" to be
> $$ changed to "\"
>
> Use s///. Or, to please Larry (no, not him, the other one), y///.
Larry (the other one) would be pleased too, I'm sure. But I responded
to this yesterday with 'tr' instead of 'y'. To please everyone.
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Sun, 25 Apr 1999 21:01:46 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Help! Error message when using C-comment stripper from perlfaq
Message-Id: <MPG.118d84fae8b3d32a98993e@nntp.hpl.hp.com>
In article <3723D621.572CA1DE@mail.cor.epa.gov> on Sun, 25 Apr 1999
19:57:37 -0700, David Cassell <cassell@mail.cor.epa.gov> says...
...
> > This seems ungainly. Perhaps there is a short-cut notation for
> >
> > if (defined $2) { $2; } else { ""; }
>
> There is. It looks the same as in C.
>
> (defined $2) ? $2 : ""
How about an even shorter cut?
defined $2 && $2
The "supply a default value if the value I give you is FALSE" idiom:
$x || 'a default value'
is very well known. The corresponding idiom using && is less well
known, but rather elegant also, I think. (The FALSE value from a
Boolean test such as 'defined $2' in string context is "".)
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Mon, 26 Apr 1999 04:31:37 GMT
From: smnayeem@my-dejanews.com
Subject: Re: How do i print something using perl?
Message-Id: <7g0q7a$fsb$1@nnrp1.dejanews.com>
In article <7g0hpe$ntk$11@client2.news.psi.net>,
abigail@fnx.com wrote:
> smnayeem@my-dejanews.com (smnayeem@my-dejanews.com) wrote on MMLXIII
> September MCMXCIII in <URL:news:7fui9h$mlu$1@nnrp1.dejanews.com>:
> {} Does anyone know how i can direct the output of print statements to the
> {} printer?
>
> open PRINTER, "| lp" # Or whatever print command you use on your system.
> or die "fork failed: $!";
>
> print PRINTER "whatever";
>
> Abigail
This is working fine with Unix. but how would i direct output to the printer
on WinNT? (i know i know its not a perl question, but its very related :-)
thanks smnayeem
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 26 Apr 1999 06:16:06 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: How do i print something using perl?
Message-Id: <7g10b6$9t0$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to Abigail
<abigail@fnx.com>],
who wrote in article <7g0hpe$ntk$11@client2.news.psi.net>:
> open PRINTER, "| lp" # Or whatever print command you use on your system.
> or die "fork failed: $!";
Wow, what an informative error message! open() has something to do
with fork() only on systems with unfortunately primitive process
starting API:
H:\get\perl>perl
open PRINTER, "| lp" # Or whatever print command you use on your system.
or die "fork failed: $!";
^Z
fork failed: No such file or directory at - line 1.
Of course, open FOO, "|-" is an exception.
Ilya
------------------------------
Date: Sun, 25 Apr 1999 20:09:36 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: Newbie regex query
Message-Id: <3723D8F0.D74F1B95@mail.cor.epa.gov>
Abigail wrote:
>
> [snip of remnant of Tad's post]
> Shirley, you mean 7 * $x ** 3 and 21 * $x ** 2?
"Yes I do. And stop calling me Shirley." - Leslie Nielsen, "Airplane"
> Abigail
> --
> perl -we 'print split /(?=(.*))/s => "Just another Perl Hacker\n";'
Ooh. I like that. I never thought of putting a zero-width assertion
into the pattern of a split() . I bow before your superior
fiendishness.
:-)
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior Computing Specialist phone: (541) 754-4468
mathematical statistician fax: (541) 754-4716
------------------------------
Date: Sun, 25 Apr 1999 22:35:40 -0700
From: Kimberly Rice <kimrice@leland.Stanford.EDU>
Subject: returning a hashtable from a subformula
Message-Id: <Pine.GSO.3.96.990425222917.4707A-100000@epic4.Stanford.EDU>
Hi.
I am having problems returning a hashtable from a subfunction I made. So,
the subfunction makes a hashtable with in it. Call it %localHash.
The main body call the subformula like this:
%globalHash = FunctThatShouldReturnHT(arg);
and FunctThatShouldReturnHT
returns the table via the command:
return %localHash;
But, it is not working; there is no %globalHash after the subformula call.
Can a subformula return a hash table? If so, what am I doing wrong?
Thanks, Kim (a 1st day perl programmer)
------------------------------
Date: Mon, 26 Apr 1999 11:46:03 +0800
From: "Shashank Tripathi" <mkshanx@ust.hk>
Subject: Simple Question
Message-Id: <7g0ngo$620@ustsu10.ust.hk>
Is there a way to scour through every file in a specified directory on my
computer thru perl?
Thanks!
Shanx
------------------------------
Date: Mon, 26 Apr 1999 00:18:17 -0400
From: "Jason Simms" <ffchopin@worldnet.att.net>
Subject: Re: Simple Question
Message-Id: <7g0pa2$df8$1@bgtnsc02.worldnet.att.net>
Shashank Tripathi <mkshanx@ust.hk> wrote in message
news:7g0ngo$620@ustsu10.ust.hk...
> Is there a way to scour through every file in a specified directory on my
> computer thru perl?
Sure... Use the File::Find module that comes standard with Perl. Read the
docs - it's really quite simple. You basically pass it the name of a
directory(ies), and the name of a subroutine to execute for each file it
comes across. Simple and powerful.
Jason Simms
------------------------------
Date: Mon, 26 Apr 1999 03:53:05 GMT
From: njc@dmc.uucp (Neil Cherry)
Subject: syslog under Linux (RESOLVED!)
Message-Id: <slrn7i7ou2.85v.njc@dmc.uucp>
Several of us (Linux users) have noticed that using syslog has failed
with the Red Hat release. I've upgraded to Perl 5.00502 and I think I
may have a solution:
use Sys::Syslog qw(:DEFAULT setlogsock);
$program = "Foo";
setlogsock('unix'); # This is the difference ???
openlog("$program $$", 'ndelay', 'user');
syslog('notice', 'fooprogram: this is really done');
The following code fragment works on my Linux box where I've upgraded
but fails on the older (rpm installed) version. I hope this helps.
--
Linux Home Automation Neil Cherry ncherry@home.net
http://members.home.net/ncherry (Text only)
http://meltingpot.fortunecity.com/lightsey/52 (Graphics GB)
------------------------------
Date: Sun, 25 Apr 1999 22:09:24 -0500
From: Jimx <jimx@metronet.com>
Subject: Re: What is wrong with this picture?
Message-Id: <3723D8E4.B198811D@metronet.com>
just a note
I have found that there can be no spaces between the << and the
ending_print_tag statement.
Also each line should start in the first column especially the
ending_print_tag
line. If there's a space before the tag you'll get an error.
------------------------------
Date: Sun, 25 Apr 1999 20:47:26 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: What is wrong with this picture?
Message-Id: <MPG.118d81a5d631e28f98993d@nntp.hpl.hp.com>
[Posted and a courtesy copy sent.]
In article <7g0af6$qh9$1@weber.a2000.nl> on Mon, 26 Apr 1999 02:03:24
+0200, Bas van Reek <basvreek@xs5all.nl> says...
>
> remove single quotes on line print <<'ending_print_tag';
> you could write print<<QQQ;
> with the last line changed into QQQ (or whatever you prefer)
This is not correct. As it was presented, the code was correct. The
single-quotes prevent interpolation into the string, which there wasn't
in any case.
> or print "
> with on the last line ";
> But then you can not use double quotes in
> this line <background= "#000000" text="#ff0000">
> if you use the last example.
This is correct; the differences in beginning and ending newlines don't
matter for HTML.
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Sun, 25 Apr 1999 21:17:19 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: What is wrong with this picture?
Message-Id: <MPG.118d88aab0940692989940@nntp.hpl.hp.com>
In article <3723D8E4.B198811D@metronet.com> on Sun, 25 Apr 1999 22:09:24
-0500, Jimx <jimx@metronet.com> says...
> just a note
> I have found that there can be no spaces between the << and the
> ending_print_tag statement.
> Also each line should start in the first column especially the
> ending_print_tag
> line. If there's a space before the tag you'll get an error.
Congratulations on your discovery. There are other ways to find out
this kind of information, such as reading the documentation, in this
case perldata:
... Following a << you specify a string to terminate the quoted
material, and all lines following the current line down to the
terminating string are the value of the item. ... There must be no space
between the << and the identifier. (If you put a space it will be
treated as a null identifier, which is valid, and matches the first
empty line.) The terminating string must appear by itself (unquoted and
with no surrounding whitespace) on the terminating line.
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
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 5482
**************************************
