[13563] in Perl-Users-Digest
Perl-Users Digest, Issue: 973 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Oct 2 15:07:25 1999
Date: Sat, 2 Oct 1999 12:05:11 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <938891111-v9-i973@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Sat, 2 Oct 1999 Volume: 9 Number: 973
Today's topics:
Re: acos function (Matthew David Zimmerman)
compile modules? <jason@romos.net>
Re: Email Address Syntax Checking. (Abigail)
Re: explicit package name error? (Bill Moseley)
Re: explicit package name error? (Abigail)
Re: form to mail script for NT (David Wall)
Re: getting server errors <jason@romos.net>
Re: getting server errors <gellyfish@gellyfish.com>
Re: getting server errors <gellyfish@gellyfish.com>
Re: getting server errors <gellyfish@gellyfish.com>
Re: Good Perl book <JFedor@datacom-css.com>
Re: How to create files from CGI script? (Kragen Sitaker)
Re: How to retreive the size of a directory on NT <gellyfish@gellyfish.com>
Re: How to retreive the size of a directory on NT (Michel Dalle)
Re: I am having a problem setting cookies in perl (Bill Moseley)
Re: I am having a problem setting cookies in perl <JFedor@datacom-css.com>
Re: I am having a problem setting cookies in perl <JFedor@datacom-css.com>
Re: I can't see the error (short bit of code) (Kragen Sitaker)
include perl file <the@ludd.luth.se>
Re: include perl file (Bill Moseley)
Re: Install CPAN module in ActiveState Windows version (Bill Moseley)
Re: Install CPAN module in ActiveState Windows version <gellyfish@gellyfish.com>
Re: Install CPAN module in ActiveState Windows version <fwr@ga.prestige.net>
Re: Install CPAN module in ActiveState Windows version <fwr@ga.prestige.net>
Re: Install CPAN module in ActiveState Windows version <gellyfish@gellyfish.com>
Re: New book: Automating Windows With Perl (Kragen Sitaker)
Re: Perl/CGI security <JFedor@datacom-css.com>
Re: Perl/CGI security <rhomberg@ife.ee.ethz.ch>
Re: perlcc compile problem? <jason@romos.net>
Re: running other programs from perl (Kragen Sitaker)
split string on whitespace, respect quotes <aloftus1@email.mot.com>
Re: split string on whitespace, respect quotes <gellyfish@gellyfish.com>
Re: using tr? (Abigail)
Re: Values of thousand (Abigail)
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 2 Oct 1999 18:10:51 GMT
From: mdz4c@node9.unix.Virginia.EDU (Matthew David Zimmerman)
Subject: Re: acos function
Message-Id: <7t5hrb$5k1$1@murdoch.acc.Virginia.EDU>
>jmn.ac.delete@abanet.it wrote:
>> sub acos {
>> # Polynomial approximation of acos
>> # Error <= 2E-8
>> #
>> # C. Hastings, Jr., "Approximations for digital computers",
>> # Princeton Univ. Press, 1955.
>>
>> my $x = shift @_;
>> $a0 = 1.5707963050;
>> $a1 = -0.2145988016;
>> $a2 = 0.0889789874;
>> $a3 = -0.0501743046;
>> $a4 = 0.0308918810;
>> $a5 = -0.0170881256;
>> $a6 = 0.0066700901;
>> $a7 = -0.0012624911;
>>
>> return (1-$x)**0.5 *($a0
>> + $a1 * $x
>> + $a2 * $x**2
>> + $a3 * $x**3
>> + $a4 * $x**4
>> + $a5 * $x**5
>> + $a6 * $x**6
>> + $a7 * $x**7
>> );
>> }
Thank you for the routine, but is that the most efficient way to
calculate a polynomial? My numerical methods professor would probably want
to slap you with a wet noodle for that. But he's weird, so I'm not
surpris-- anyway, I digress. Try this instead:
return (1-$x)**0.5 * ($a0 + $x *
($a1 + $x *
($a2 + $x *
($a3 + $x *
($a4 + $x *
($a5 + $x *
($a6 + $x *
$a7)))))));
Same number of additions and subtractions without a single exponential.
Cf. _Numerical Recipes_, 1st ed, p. 137. (Yes, I know there's a new
edition, but this section is still there in the 2nd one. Anyway, even
with the older edition, my reference is newer than yours. Nah-nah
nah-nah nah nah. :) )
It's faster too:
-----
Benchmark: timing 1000000 iterations of POSIX, mine, yours...
POSIX: 9 secs ( 8.41 usr 0.00 sys = 8.41 cpu)
mine: 28 secs (26.19 usr 0.00 sys = 26.19 cpu)
yours: 40 secs (39.68 usr 0.02 sys = 39.70 cpu)
-----
#!/usr/local/bin/perl5 -w
use strict;
use Benchmark;
use POSIX;
my $x = 3.1415926548;
my @a = (1.5707963050, -0.2145988016, 0.0889789874, -0.0501743046,
0.0308918810, -0.0170881256, 0.0066700901, -0.0012624911);
timethese(1_000_000,{
"yours" => sub { (1-$x)**0.5 *($a[0]
+ $a[1] * $x
+ $a[2] * $x**2
+ $a[3] * $x**3
+ $a[4] * $x**4
+ $a[5] * $x**5
+ $a[6] * $x**6
+ $a[7] * $x**7);
},
"mine" => sub { (1-$x)**0.5 * ($a[0] + $x *
($a[1] + $x *
($a[2] + $x *
($a[3] + $x *
($a[4] + $x *
($a[5] + $x *
($a[6] + $x *
$a[7])))))));
},
"POSIX" => sub { acos($x); }
}
);
-----
HTH! Oh, and thank you for providing me a little entertainment
this afternoon.
Matt
--
Matthew Zimmerman ------------ http://www.people.virginia.edu/~mdz4c
Interdisciplinary Biophysics Program --------- University of Virginia
| "You got to be very careful if you don't know where you're going, |
| because you might not get there." -- Yogi Berra |
------------------------------
Date: Sat, 02 Oct 1999 16:05:28 GMT
From: Jason Romo <jason@romos.net>
Subject: compile modules?
Message-Id: <37F63011.51B011CF@romos.net>
This is a multi-part message in MIME format.
--------------616B8C9257908EC375BA0103
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
If any one can help What is the best way to compile a perl script that calls
modules?
> I am trying to compile the DBI.pm DBD.pm and Socket.pm.
>
> perlcc *.pm
>
> I test them with the perl script.
>
> I use the
> require 'module.so';
>
> it fails with
>
> Unrecognized character \177 at /usr/lib/perl5/5.00503/i386-linux/Socket.so
> line 1.
>
> Any clues?
>
> I have tried this by doing a static perl and dynamic perl.
>
> Nothing has worked.
>
> I am using: 5.005_03 on Redhat 6.0.
Thanks in advance,
Jason
--------------616B8C9257908EC375BA0103
Content-Type: text/x-vcard; charset=us-ascii;
name="jason.vcf"
Content-Transfer-Encoding: 7bit
Content-Description: Card for Jason Romo
Content-Disposition: attachment;
filename="jason.vcf"
begin:vcard
n:Romo;Jason
x-mozilla-html:FALSE
adr:;;;;;;
version:2.1
email;internet:jason@romos.net
note;quoted-printable:############################################################=0D=0A split // =3D> '"'=3B=0D=0A${"@_"} =3D "/"=3B split // =3D> eval join "+" =3D> 1 .. 7=3B=0D=0A*{"@_"} =3D sub {foreach (sort keys %_) {print "$_ $_{$_} "}}=3B=0D=0A%{"@_"} =3D %_ =3D (Just =3D> another =3D> Perl =3D> Hacker)=3B &{%{%_}}=3B
x-mozilla-cpt:;0
fn:Jason Romo
end:vcard
--------------616B8C9257908EC375BA0103--
------------------------------
Date: 2 Oct 1999 12:59:23 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Email Address Syntax Checking.
Message-Id: <slrn7vcifo.1dd.abigail@alexandra.delanet.com>
Chris Nandor (pudge@pobox.com) wrote on MMCCXXIII September MCMXCIII in
<URL:news:pudge-0210990802250001@192.168.0.77>:
&& In article <slrn7vboat.1dd.abigail@alexandra.delanet.com>,
&& abigail@delanet.com wrote:
&&
&& # package RFC::822::Address;
&&
&& Ack! Apparently, 5.004 does not recognize this package name.
&&
&& So I changed it to Eight22, and because I am using MacPerl, also did this:
&&
&& (my $data = <DATA>) =~ s/\015\012?/\012/g;
&& my $parser = Parse::RecDescent -> new ($data) or die "Compilation error.\n";
Eew. I'm surprised this is necessary. From looking at the source of
Parse::RecDescent, the only place where newlines are significant in
the grammar is when matching comments, as they go untill the next
newline:
my $COMMENT = '\A\s*(#.*)';
&& Now, I run the test and get:
&&
&& 1..1
&& ok 1
&& # Goto undefined subroutine &Parse::RecDescent::valid, <DATA> chunk 1.
&& File '(eval 93)'; Line 13
&&
&& Any thoughts?
Not really. Parse::RecDescent doesn't export anything. Unless there's a
bug in (Mac)Perl 5.004, I've no idea why it would call a subroutine in
the Parse::RecDescent package. Now, the generated parser is in the class
Parse::RecDescent (?? wouldn't that make it impossible to have 2 parsers
in your program), but if for some reason it wouldn't create the method
'valid' there, and then try to call the method, the error message is
different.
Abigail
--
srand 123456;$-=rand$_--=>@[[$-,$_]=@[[$_,$-]for(reverse+1..(@[=split
//=>"IGrACVGQ\x02GJCWVhP\x02PL\x02jNMP"));print+(map{$_^q^"^}@[),"\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: Sat, 2 Oct 1999 09:49:46 -0700
From: moseley@best.com (Bill Moseley)
Subject: Re: explicit package name error?
Message-Id: <MPG.125fd7809edf4ae59897bf@206.184.139.132>
Jody Fedor (JFedor@datacom-css.com) seems to say...
>
> Abigail wrote in message ...
> >
> >But since $cartid is my'ed inside the sub, it doesn't exist outside
> >of it. Better let getpathvars return the splitted list and assign
> >when you call the sub.
>
>
> using:
>
> my ($cartid, $pageid);
> &getpathvars;
>
> It worked fine. I thought using strict only forced you to define your
> variables before using them. I understand the concept of global
> and local variables but, when using strict, do you define variables
> globally like I did, before the subroutine or at the top?
my vars are defined within a block, and can't be seen outside the block.
They can be seen within inner block. It called lexically scoping.
> Also, when using the "return $cartid;" in a subroutine, would
> this provide $cartid globally or must you call the subroutine
> like this: $cartid = &getpathvars; to assign the local($cartid)
> to the global($cartid)?
If $cartid was a global var (defined by use vars) then it would be
avaliable everywhere, in addition to being returned by the subroutine.
my $cartid = getpathvars(); # Is the way I'd do it
# if it isn't already defined
--
Bill Moseley mailto:moseley@best.com
pls note the one line sig, not counting this one.
------------------------------
Date: 2 Oct 1999 13:03:40 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: explicit package name error?
Message-Id: <slrn7vcino.1dd.abigail@alexandra.delanet.com>
Jody Fedor (JFedor@datacom-css.com) wrote on MMCCXXIII September MCMXCIII
in <URL:news:7t59bl$hmn$1@plonk.apk.net>:
//
// Abigail wrote in message ...
// >
// >But since $cartid is my'ed inside the sub, it doesn't exist outside
// >of it. Better let getpathvars return the splitted list and assign
// >when you call the sub.
//
// using:
//
// my ($cartid, $pageid);
// &getpathvars;
//
// It worked fine. I thought using strict only forced you to define your
// variables before using them. I understand the concept of global
// and local variables but, when using strict, do you define variables
// globally like I did, before the subroutine or at the top?
Well, if you would understand global and local variables, you would not
ask this question.
// Also, when using the "return $cartid;" in a subroutine, would
// this provide $cartid globally or must you call the subroutine
// like this: $cartid = &getpathvars; to assign the local($cartid)
// to the global($cartid)?
Perhaps you want to make yourself familiar with lexical scoping. I don't
think I could provide an easy answer if you don't grasp the concept of
lexical scoping; and lexical scoping isn't Perl specific at all. Many
other languages, like C and Java use lexical scoped variables.
Abigail
--
srand 123456;$-=rand$_--=>@[[$-,$_]=@[[$_,$-]for(reverse+1..(@[=split
//=>"IGrACVGQ\x02GJCWVhP\x02PL\x02jNMP"));print+(map{$_^q^"^}@[),"\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: Fri, 01 Oct 1999 04:23:09 GMT
From: darkon@one.net (David Wall)
Subject: Re: form to mail script for NT
Message-Id: <37f43747_1@news2.one.net>
In article <37F3E9AC.D940C3F3@mail.cor.epa.gov>, David Cassell <cassell@mail.cor.epa.gov> wrote:
>I would think that Mail::Sender would be a lot easier for a
>beginner to grok. Or Mail::Mailer.
>
>Mail::Sender is also mentioned in the FAQ you cited.
>
>And the FAQ should be on everyone's hard drive by now.
>Using the web to read the FAQ is fairly inefficient when
>it comes free with every install. And ActiveState also
>gives an HTML version which it drops on the user's
>Start Menu.
In reponse to a question I asked recently, someone recommended that I get a
copy of the Perl Cookbook. I did, and there are several ways to send mail
from a Perl script in it, with discussion on the the advantages of each.
They're not explicitly for NT, but are easily adapted to make up for NT's
limitations.
Too much good stuff in there. I wanna go back and rewrite everything I've
done until now and add bells and whistles. :-)
David Wall
darkon@one.net
------------------------------
Date: Sat, 02 Oct 1999 16:49:08 GMT
From: Jason Romo <jason@romos.net>
Subject: Re: getting server errors
Message-Id: <37F63A4B.F6053776@romos.net>
Try to run this with the -w thsi will show you want it wants.
Try to run this from the command prompt.
#!/usr/bin/perl -w
you have not set:
$sourcefile
open(INF, "$sourcefile"); or &dienice("Can't find the file requested");
Outlaw Jim wrote:
> I've got a really big problem with getdoc.pl(attached), it doesn't work.
> This is some of the first(worst) perl I've ever written in a long time
> so please don't email me telling me how crap it is unless you can fix it
> :). I used chmod 755 for permissions so that's out. I have no idea what
> I've done wrong.
>
> -
> Cheers,
> Outlaw Jim
>
> -----------------------
> check out LinuxGamer at
> http://linux.gamers.net
> -----------------------
>
> ------------------------------------------------------------------------
> Name: getdoc.pl
> getdoc.pl Type: Perl Program (application/x-perl)
> Encoding: 7bit
--
split // => '"';
${"@_"} = "/"; split // => eval join "+" => 1 .. 7;
*{"@_"} = sub {foreach (sort keys %_) {print "$_ $_{$_} "}};
%{"@_"} = %_ = (Just => another => Perl => Hacker); &{%{%_}};
------------------------------
Date: 2 Oct 1999 13:07:32 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: getting server errors
Message-Id: <7t502k$6oh$1@gellyfish.btinternet.com>
On Sat, 02 Oct 1999 22:01:46 +1000 Outlaw Jim wrote:
> This is a multi-part message in MIME format.
> --------------C282C278E436CC9455AB0E34
> Content-Type: text/plain; charset=us-ascii
> Content-Transfer-Encoding: 7bit
This is not necessary at all - there is no need to attach stuff to the
post you should just include the code in the body ...
>
> I've got a really big problem with getdoc.pl(attached), it doesn't work.
> This is some of the first(worst) perl I've ever written in a long time
> so please don't email me telling me how crap it is unless you can fix it
> :). I used chmod 755 for permissions so that's out. I have no idea what
> I've done wrong.
>
>
>
> #define
> $rlocation="/web/gamers.net/subdomains/linux/"
>
>
> open(INF, "$sourcefile"); or &dienice("Can't find the file requested");
^
That ; is your problem ..
> @data = <INF>;
> close(INF)
>
> foreach $line(@data)
> {
> chomp($line);
> print "$line\n";
> }
>
>
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 2 Oct 1999 17:42:23 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: getting server errors
Message-Id: <7t5g5v$71a$1@gellyfish.btinternet.com>
On Sat, 2 Oct 1999 06:21:42 -0700 Bill Moseley wrote:
> Outlaw Jim (zzzbrono@uq.net.au) seems to say...
>> I've got a really big problem with getdoc.pl(attached), it doesn't work.
>
> Now that's helpful. My programs don't work either. They hang around
> the house all day drinking beer and watching TV.
>
Geez Bill make the feckless little shits go out and earn their keep ...
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 2 Oct 1999 17:53:29 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: getting server errors
Message-Id: <7t5gqp$74b$1@gellyfish.btinternet.com>
On Sat, 02 Oct 1999 16:49:08 GMT Jason Romo wrote:
> Try to run this with the -w thsi will show you want it wants.
>
> Try to run this from the command prompt.
>
> #!/usr/bin/perl -w
>
>
> you have not set:
>
> $sourcefile
>
> open(INF, "$sourcefile"); or &dienice("Can't find the file requested");
>
No he has a syntax error which has been pointed out already.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Sat, 2 Oct 1999 14:41:01 -0400
From: "Jody Fedor" <JFedor@datacom-css.com>
Subject: Re: Good Perl book
Message-Id: <7t5h9i$pv9$1@plonk.apk.net>
Beverley Eyre wrote in message <37F5A4AC.83283799@ucla.edu>...
>I'd like to learn more about how to use modules. I'm having real problems
with some modules and 'use
>strict' and 'use diagnostics'. I don't know how to declare it. Is it like:
>Clyde Ingram wrote:
>>
>> Even better is the O'Reilly Perl CD which has 6 Perl books, including the
>> twoMark quite rightly recommends. Plus Perl Cookbook, Advanced Perl,
Perl
>> on Win32, and Perl in a Nutshell. They throw in a paper copy of the
>> Nutshell book too, with the CD.
http://www.datacom-css.com/books/perl.htm
Unashamed, self plug.
Jody
------------------------------
Date: Sat, 02 Oct 1999 18:59:39 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: How to create files from CGI script?
Message-Id: <vCsJ3.8309$t%3.715214@typ11.nn.bcandid.com>
In article <37F14436.66508987@desertigloo.com>,
David P. Schwartz <davids@desertigloo.com> wrote:
>> >> >This strikes me as very unusual and unexpected behavior. Is there some
>
>Wow, I never knew that. Thanks!
Well, I tried to explain it -- albeit incorrectly -- two posts before
the post you thought was unusual and unexpected. But someone wouldn't
believe me :)
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
Fri Oct 01 1999
39 days until the Internet stock bubble bursts on Monday, 1999-11-08.
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: 2 Oct 1999 17:38:06 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: How to retreive the size of a directory on NT
Message-Id: <7t5ftu$717$1@gellyfish.btinternet.com>
On Fri, 01 Oct 1999 13:42:48 GMT Clinton Pierce wrote:
> [poster cc'd in e-mail]
>
> On 1 Oct 1999 01:32:49 GMT, "s5dw" <s5dw@telecom.co.nz> wrote:
>>Is there an easy way to get the size of a directory without adding up the
>>size of all the files in that directory.
>
> Then what do you mean by the "size" of the directory? There's only three
> things I can make of that.
>
> 1. The size of the directory.
>
<snip>
>
> 2. The size of the directory.
>
<snip>
>
> 3. The size of the directory.
>
<snip>
Or perhaps the size of the directories :
print $_->[0],"\t",$_->[1],"\n" foreach ( map { [(split /\s+/)[8,4]] }
grep /^d/, `ls -l`);
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 2 Oct 1999 18:39:51 GMT
From: michel.dalle@usa.net (Michel Dalle)
Subject: Re: How to retreive the size of a directory on NT
Message-Id: <7t5jhn$mmh$1@xenon.inbe.net>
gellyfish@gellyfish.com (Jonathan Stowe) wrote in
<7t5ftu$717$1@gellyfish.btinternet.com>:
>
>Or perhaps the size of the directories :
>
>print $_->[0],"\t",$_->[1],"\n" foreach ( map { [(split /\s+/)[8,4]] }
> grep /^d/, `ls -l`);
>
Assuming you first install some Unix utilities on NT, I suppose ?
Might as well use 'du' then... :-)
Michel.
------------------------------
Date: Sat, 2 Oct 1999 10:02:27 -0700
From: moseley@best.com (Bill Moseley)
Subject: Re: I am having a problem setting cookies in perl
Message-Id: <MPG.125fda7c2ec5871e9897c0@206.184.139.132>
Jody Fedor (JFedor@datacom-css.com) seems to say...
> Cookies must be set before you issue the Content-type!
Oh really?
Jody, again, please test before posting.
--
Bill Moseley mailto:moseley@best.com
pls note the one line sig, not counting this one.
------------------------------
Date: Sat, 2 Oct 1999 14:54:39 -0400
From: "Jody Fedor" <JFedor@datacom-css.com>
Subject: Re: I am having a problem setting cookies in perl
Message-Id: <7t5i32$qpg$1@plonk.apk.net>
Bill Moseley wrote in message ...
>Jody Fedor (JFedor@datacom-css.com) seems to say...
>> Cookies must be set before you issue the Content-type!
>
>Oh really?
REALLY!
>Jody, again, please test before posting.
I did, do and Set-Cookie: is not an HTML tag.
Maybe you should BUTT OUT if not offering any suggestions!
Jody
------------------------------
Date: Sat, 2 Oct 1999 15:07:25 -0400
From: "Jody Fedor" <JFedor@datacom-css.com>
Subject: Re: I am having a problem setting cookies in perl
Message-Id: <7t5ir1$rg1$1@plonk.apk.net>
Derek Lavine wrote in message ...
>
>Thanks for any help you can offer.
#!/usr/bin/perl -w
$theDomain = ".yourdomain.com";
$path = "/";
$expDate = "Tuesday, 04-Oct-2061 12:00:00 GMT";
$location = "http://www.onlysupplies.com/file.html";
sub bakeCookie {
local($bname, $cvalue, $expiration, $path, $domain, $secure) = @_;
print "Set-Cookie: ";
print ($bname, "=", $cvalue, "; expires=", $expiration, "; path=", $path,
"; domain=", $domain, "; ", $secure, "\n");
}
&bakeCookie("fname", "$in{'fname'}", $expDate, $path, $theDomain);
&bakeCookie("lname", "$in{'lname'}", $expDate, $path, $theDomain);
&bakeCookie("addr", "$in{'addr'}", $expDate, $path, $theDomain);
&bakeCookie("city", "$in{'city'}", $expDate, $path, $theDomain);
&bakeCookie("state", "$in{'state'}", $expDate, $path, $theDomain);
&bakeCookie("zip", "$in{'zip'}", $expDate, $path, $theDomain);
print "Location: $location\n\n";
The above code will work just fine on any unix server, I assume it will work
on NT too.
BAKE your Cookies before sending the Location: header. Bake as many
cookies as you want.
If you want to generate your page after baking your cookies, eliminate the
print "Location:" line and add this:
print "Content-type: text/html\n\n";
print "<HTML><TITLE>Thank You</TITLE><BODY BGCOLOR=#FFFFFF>\n";
print "<FONT SIZE=3><B><CENTER>Thank you $in{'fname'} for baking
cookies.</CENTER></B></FONT><BR>\n";
print "<HR><A HREF=\"http://www.yourdomain.com/\">Click here to go
home.</A>\n";
print "</BODY></HTML>\n";
Jody
------------------------------
Date: Sat, 02 Oct 1999 18:53:17 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: I can't see the error (short bit of code)
Message-Id: <xwsJ3.8277$t%3.714293@typ11.nn.bcandid.com>
In article <7sqhi1$79s$1@gxsn.com>, Daniel Vesma <daniel@vesma.co.uk> wrote:
>> You slurped the whole file into $data in an inefficient way.
>
>What would be the efficient way?
{local $/; $data = <FILE>}
. . . which temporarily makes $/ undefined.
>> You just got a concurrency bug: if another copy of this program reads
>> products.txt while this one is writing it, it may read an empty file or
>> a partial file, and it may also read a partial old file (the file may
>> be truncated by the open while it's being read) or even the first part
>> of the old file and the remainder of the new file (the file may be
>> truncated and then rewritten while it's being read).
>
>That shouldn't happen. Only one person will be using the system.
Via CGI? It's easy and fun for one person to run multiple copies of a
program with CGI and multiple browser windows. And what happens if the
machine or Perl crashes before the new products.txt is fully written?
I can't remember why I thought you were using CGI; I must have been mistaken.
>> $ShopID can actually be anything the user's little heart desires, if
>> you're doing what I think you are :)
>
>What do you think I'm doing? $ShopID will be a number I assigned (based on
>'time').
I thought $ShopID was a CGI parameter, and CGI parameters are settable
by the user, even if you don't want them to be.
>>Can you give us an example of $ShopID and a small
>> products.txt file that remains unchanged?
>
>No need. I've sorted the problem. I checked if the file was closing, and it
>wasn't. I re-wrote it slightly, and it works now. No idea why :)
Great!
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
Fri Oct 01 1999
39 days until the Internet stock bubble bursts on Monday, 1999-11-08.
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Sat, 2 Oct 1999 18:39:52 +0200
From: "Thomas" <the@ludd.luth.se>
Subject: include perl file
Message-Id: <7t5cft$lt0$1@news.luth.se>
Hello!
I', using ActivePerl with Windows and I'm wondering if there is any way of
including a perl file in another perl file? Or include any (text)file in a
perl file. This way one can have some general functions declared in a common
file to be included in the main file.
I've done som tcl before, and there it is a function called source which
include another file.
Thomas
------------------------------
Date: Sat, 2 Oct 1999 10:07:03 -0700
From: moseley@best.com (Bill Moseley)
Subject: Re: include perl file
Message-Id: <MPG.125fdb93581614499897c1@206.184.139.132>
Thomas (the@ludd.luth.se) seems to say...
> I', using ActivePerl with Windows and I'm wondering if there is any way of
> including a perl file in another perl file? Or include any (text)file in a
> perl file. This way one can have some general functions declared in a common
> file to be included in the main file.
That's a good idea. Maybe it should be 'required' in future releases of
perl, so the we all can 'use' that feature.
see:
perldoc perlfunc to see about use and require
--
Bill Moseley mailto:moseley@best.com
pls note the one line sig, not counting this one.
------------------------------
Date: Sat, 2 Oct 1999 09:36:44 -0700
From: moseley@best.com (Bill Moseley)
Subject: Re: Install CPAN module in ActiveState Windows version of Perl?
Message-Id: <MPG.125fd47c71f8ca129897be@206.184.139.132>
Fred Reimer (fwr@ga.prestige.net) makes good points:
> > Or get one of the free win32 ported make utilities that are around the
> > net (Cygnwin and Ming32 are two).
>
> Useless if you're using ActiveState...
You mean you can only use microsoft's nmake for installing modules with
ActiveState? Or you just can't install xs modules without the MSVC
compiler?
--
Bill Moseley mailto:moseley@best.com
pls note the one line sig, not counting this one.
------------------------------
Date: 2 Oct 1999 17:22:46 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Install CPAN module in ActiveState Windows version of Perl?
Message-Id: <7t5f16$6us$1@gellyfish.btinternet.com>
On Sat, 2 Oct 1999 11:46:54 -0400 Fred Reimer wrote:
>
<I've left the crap quoting sorry ..>
> Bill Moseley <moseley@best.com> wrote in message
> news:MPG.125e7461e742433f9897ad@206.184.139.132...
>> John P Walsh (walsh@averstar.com) seems to say...
>> > If possible, I would like to be able to use a simple process to install
>> > modules into the ActiveState-Windows directory structure, and maintain
>> > latest versions of these modules. From what I see posted on the net, I
>> > to maintain both the ActiveState ppm software, and the set of
>> > CPAN-installation modules normally used with non-ActiveState Perl. Is
>> > correct?
>> > Jonathan Stowe <jns@gellyfish.com> says:
>> > > If a module has no XS components then you might be able to install it
>> > > if you obtain 'nmake' (microsofts make utility) which is available
>> > > microsofts ftp server.
>>
>> Or get one of the free win32 ported make utilities that are around the
>> net (Cygnwin and Ming32 are two).
>
> Useless if you're using ActiveState...
>
Did I or did I not say 'If a module has no XS components' ?
To install a pure Perl module all one needs is a working make utility.
Of course if one is serious about developing on any given platform then
one provides oneself with the appropriate tools - I see no reason why
someone who is committed to the Win32 platform shouldnt have a Microsoft
C compiler : If they have alternatively gone for Cygwin or Ming32 they
are likely to have compiled the Perl themselves so again this is not
a problem ...
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Sat, 2 Oct 1999 13:51:38 -0400
From: "Fred Reimer" <fwr@ga.prestige.net>
Subject: Re: Install CPAN module in ActiveState Windows version of Perl?
Message-Id: <BzrJ3.8114$t%3.705042@typ11.nn.bcandid.com>
Jonathan Stowe <gellyfish@gellyfish.com> wrote in message
news:7t5f16$6us$1@gellyfish.btinternet.com...
> On Sat, 2 Oct 1999 11:46:54 -0400 Fred Reimer wrote:
> > Bill Moseley <moseley@best.com> wrote in message
> > news:MPG.125e7461e742433f9897ad@206.184.139.132...
> >> John P Walsh (walsh@averstar.com) seems to say...
> >> > If possible, I would like to be able to use a simple process to
install
> >> > modules into the ActiveState-Windows directory structure, and
maintain
> >> > latest versions of these modules. From what I see posted on the net,
I
> >> > to maintain both the ActiveState ppm software, and the set of
> >> > CPAN-installation modules normally used with non-ActiveState Perl.
Is
> >> > correct?
> >> > Jonathan Stowe <jns@gellyfish.com> says:
> >> > > If a module has no XS components then you might be able to install
it
> >> > > if you obtain 'nmake' (microsofts make utility) which is available
> >> > > microsofts ftp server.
> >>
> >> Or get one of the free win32 ported make utilities that are around the
> >> net (Cygnwin and Ming32 are two).
> >
> > Useless if you're using ActiveState...
> >
>
> Did I or did I not say 'If a module has no XS components' ?
I didn't respond to your post, did I? I thought not, I responded to Bill
Moseley. He brought up the point about cygwin, which the only use would be
if you had to compile a C XS component.
> To install a pure Perl module all one needs is a working make utility.
Duh
> Of course if one is serious about developing on any given platform then
> one provides oneself with the appropriate tools - I see no reason why
> someone who is committed to the Win32 platform shouldnt have a Microsoft
> C compiler : If they have alternatively gone for Cygwin or Ming32 they
> are likely to have compiled the Perl themselves so again this is not
> a problem ...
Because some of us are not really "developing" on a platform, simply writing
simple utilities for use in-house. We are not necessarily "commited to the
Win32 platform" but more like forced to use it in certain circumstaces.
Using cygwin for compiling perl does not always work -- at least it did not
the last time I checked.
This could all be fixed, by the way, if ActiveState released a version of
their ActivePerl that used cygwin and/or ming32. Requiring people to
purchase a proprietary tool in order to effectively use a free tool reduces
the "freeness" of the free tool, does it not?
------------------------------
Date: Sat, 2 Oct 1999 13:52:29 -0400
From: "Fred Reimer" <fwr@ga.prestige.net>
Subject: Re: Install CPAN module in ActiveState Windows version of Perl?
Message-Id: <oArJ3.8115$t%3.705143@typ11.nn.bcandid.com>
Bill Moseley <moseley@best.com> wrote in message
news:MPG.125fd47c71f8ca129897be@206.184.139.132...
> Fred Reimer (fwr@ga.prestige.net) makes good points:
> > > Or get one of the free win32 ported make utilities that are around the
> > > net (Cygnwin and Ming32 are two).
> >
> > Useless if you're using ActiveState...
>
> You mean you can only use microsoft's nmake for installing modules with
> ActiveState? Or you just can't install xs modules without the MSVC
> compiler?
The latter.
------------------------------
Date: 2 Oct 1999 18:56:43 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Install CPAN module in ActiveState Windows version of Perl?
Message-Id: <7t5khb$78m$1@gellyfish.btinternet.com>
On Sat, 2 Oct 1999 13:51:38 -0400 Fred Reimer wrote:
> Jonathan Stowe <gellyfish@gellyfish.com> wrote in message
> news:7t5f16$6us$1@gellyfish.btinternet.com...
>> On Sat, 2 Oct 1999 11:46:54 -0400 Fred Reimer wrote:
>> > Bill Moseley <moseley@best.com> wrote in message
>> > news:MPG.125e7461e742433f9897ad@206.184.139.132...
>> >> John P Walsh (walsh@averstar.com) seems to say...
>> >> > If possible, I would like to be able to use a simple process to
> install
>> >> > modules into the ActiveState-Windows directory structure, and
> maintain
>> >> > latest versions of these modules. From what I see posted on the net,
> I
>> >> > to maintain both the ActiveState ppm software, and the set of
>> >> > CPAN-installation modules normally used with non-ActiveState Perl.
> Is
>> >> > correct?
>> >> > Jonathan Stowe <jns@gellyfish.com> says:
>> >> > > If a module has no XS components then you might be able to install
> it
>> >> > > if you obtain 'nmake' (microsofts make utility) which is available
>> >> > > microsofts ftp server.
>> >>
>> >> Or get one of the free win32 ported make utilities that are around the
>> >> net (Cygnwin and Ming32 are two).
>> >
>> > Useless if you're using ActiveState...
>> >
>>
>> Did I or did I not say 'If a module has no XS components' ?
>
> I didn't respond to your post, did I? I thought not, I responded to Bill
> Moseley. He brought up the point about cygwin, which the only use would be
> if you had to compile a C XS component.
You certainly quoted my post in such a way as to suggest that you were
responding to my post yes. If you didnt mean to do that then you should
have fixed the previous quoting in a way that would have made your intention
unambiguous.
Bye now
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Sat, 02 Oct 1999 18:57:46 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: New book: Automating Windows With Perl
Message-Id: <KAsJ3.8300$t%3.715022@typ11.nn.bcandid.com>
In article <06nI3.28$O51.1163@monger.newsread.com>,
Scott McMahan <scott@aravis.softbase.com> wrote:
>Kragen Sitaker (kragen@dnaco.net) wrote:
>> ... because he refers to "the
>> Microsoft concept of Automation" on the web page;
>
>Automation is the name Microsoft gives to noninteractive application
>control through COM. The book explains all this in detail.
Well, I did sort of know this, but it still seems sort of like "the
Microsoft concept of Windows" or "the Microsoft concept of the Disk
Operating System", both of which are trade names Microsoft uses for
their implementation of a concept they didn't invent.)
My apologies for making unwarranted assumptions.
>> - the publisher is "R&D Books", rdbooks.com, which appears to be a subsidiary
>> of Miller Freeman books.
>
>They publish the C/C++ User's Journal. I get that just to read Plauger's
>column. In my other career as a book reviewer, I've seen several of
>their books, and they have a high quality level overall. They're a
>niche publisher, like O'Reilly used to be back in the pre-Internet days,
>publishing the books that the big companies don't think are worth it.
Thanks for the info! I'll have to see if I can find other interesting
books on their web pages.
>> I'll read the book -- or at least some of it -- when my bookstore gets
>> a copy and post my impressions.
>
>The problem is advance orders were low, and most bookstores will not
>get copies. That's the impetus for a grassroots campaign.
My bookstore will get a copy because I asked them to while writing that
post :)
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
Fri Oct 01 1999
39 days until the Internet stock bubble bursts on Monday, 1999-11-08.
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Sat, 2 Oct 1999 13:12:03 -0400
From: "Jody Fedor" <JFedor@datacom-css.com>
Subject: Re: Perl/CGI security
Message-Id: <7t5c2n$kns$1@plonk.apk.net>
Bill Moseley wrote in message ...
>I hope there are more good than bad around here.
The only bad thing about this is that if they hack others,
they'll probably hack us too. Be careful viewing their
pages with your browser. Turn off Java Virtual Machine,
Scripting and cookies. Make sure your browser is secure
and you don't have file sharing enabled on your system
before browsing their site. You'ld be surprised what they
now know about you. And if you're a programmer, they
may have already checked the programming your doing
on your machine for some commercial site. Be extra
careful, There is no honesty or goodness among thieves.
Jody
------------------------------
Date: Sat, 02 Oct 1999 19:35:36 +0200
From: Alex Rhomberg <rhomberg@ife.ee.ethz.ch>
Subject: Re: Perl/CGI security
Message-Id: <37F64268.568DAC6C@ife.ee.ethz.ch>
Bill Moseley wrote:
>
> I hope there are more good than bad around here.
>
> If you write CGI apps with perl you might take a look at
> http://hispahack.ccc.de/en/mi019en.htm
> and see what hackers attempt. They hacked a site just because someone
> forgot to check the return value of rename().
If you read the report closely, you will see that the major error is in
an incorrect s/// command that allowed the hackers to overwrite
arbitrary files. in this case another cgi.
BASIC foolishness:
obviously no taint checking (-T). unforgivable. It shows again, that
exclusive checking with the s/// (exclude the stuff I don't want) can't
beat inclusive checking (with -T). You'll always forget something.
IMHO the webserver should check for -T and complain instead of running
perl cgi without that.
- Alex
------------------------------
Date: Sat, 02 Oct 1999 16:15:41 GMT
From: Jason Romo <jason@romos.net>
Subject: Re: perlcc compile problem?
Message-Id: <37F63276.EFBEEB2F@romos.net>
This is a multi-part message in MIME format.
--------------CFB8E9A1C0FA052CD8C22D3D
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
I am trying to make the modules avalibal to the compiled program.
do you know an eaiser way. I have tried static the DBI works but the DBD
doesn't.
They work with out compilation.
I didn't mean module.so.
require 'Socket.so';
The compiled Socket.pm.
I have tried everyting I can find.
Just not a very documented subject.
The compiler works just not with modules.
I think it is just something I haven't tried yet.
Thanks again,
Jason
>
>
> Dont do this. this vCard crap has no meaning on Usenet and just annoys
> people.
>
> > I am trying to compile the DBI.pm DBD.pm and Socket.pm.
> >
> > perlcc *.pm
> >
> > I test them with the perl script.
> >
> > I use the
> > require 'module.so';
> >
> > it fails with
> >
> > Unrecognized character \177 at /usr/lib/perl5/5.00503/i386-linux/Socket.so
> > line 1.
> >
> > Any clues?
> >
>
> Yes. module.so is not a Perl module anymore is it - it is a dynamic library.
>
> You cannot do that and I cant quite get my head round how you thought it
> would work and why you wanted to do it ...
>
> /J\
> --
> Jonathan Stowe <jns@gellyfish.com>
> <http://www.gellyfish.com>
> Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
--------------CFB8E9A1C0FA052CD8C22D3D
Content-Type: text/x-vcard; charset=us-ascii;
name="jason.vcf"
Content-Transfer-Encoding: 7bit
Content-Description: Card for Jason Romo
Content-Disposition: attachment;
filename="jason.vcf"
begin:vcard
n:Romo;Jason
x-mozilla-html:FALSE
adr:;;;;;;
version:2.1
email;internet:jason@romos.net
note;quoted-printable:############################################################=0D=0A split // =3D> '"'=3B=0D=0A${"@_"} =3D "/"=3B split // =3D> eval join "+" =3D> 1 .. 7=3B=0D=0A*{"@_"} =3D sub {foreach (sort keys %_) {print "$_ $_{$_} "}}=3B=0D=0A%{"@_"} =3D %_ =3D (Just =3D> another =3D> Perl =3D> Hacker)=3B &{%{%_}}=3B
x-mozilla-cpt:;0
fn:Jason Romo
end:vcard
--------------CFB8E9A1C0FA052CD8C22D3D--
------------------------------
Date: Sat, 02 Oct 1999 18:48:54 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: running other programs from perl
Message-Id: <qssJ3.8267$t%3.713794@typ11.nn.bcandid.com>
In article <slrn7v023f.nkm.James@linux.home>,
James Stevenson <mistral@stevenson.zetnet.co.uk> wrote:
>ahh sorry i did not see the &
>but how do i know when the program exits?
If you want to know that, I think you have to explicitly fork(),
exec(), and wait() or waitpid().
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
Fri Oct 01 1999
39 days until the Internet stock bubble bursts on Monday, 1999-11-08.
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Sat, 02 Oct 1999 11:59:28 -0500
From: Andy Loftus <aloftus1@email.mot.com>
Subject: split string on whitespace, respect quotes
Message-Id: <37F639F0.3586F9C0@email.mot.com>
I want to split a string into words but keep any quoted strings as one
element (mostly split on white-space but don't split up words inside
quotes). In other words, I want to break up the string as the unix
shell would a command line, quoted strings are treated as one element.
EX:
before split, string = one two "three four" five
after split, list has 4 elements = one, two, three four, five
Does anyone know how to accomplish this or if there any
modules/functions that provide for this?
--
Andy
------------------------------
Date: 2 Oct 1999 18:17:31 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: split string on whitespace, respect quotes
Message-Id: <7t5i7r$770$1@gellyfish.btinternet.com>
On Sat, 02 Oct 1999 11:59:28 -0500 Andy Loftus wrote:
> I want to split a string into words but keep any quoted strings as one
> element (mostly split on white-space but don't split up words inside
> quotes). In other words, I want to break up the string as the unix
> shell would a command line, quoted strings are treated as one element.
>
> EX:
> before split, string = one two "three four" five
> after split, list has 4 elements = one, two, three four, five
I would see the section in perlfaq4 entitled:
How can I split a [character] delimited string except when
inside [character]? (Comma-separated files)
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 2 Oct 1999 13:57:58 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: using tr?
Message-Id: <slrn7vclti.1dd.abigail@alexandra.delanet.com>
Clinton Pierce (cpierce1@ford.com) wrote on MMCCXXI September MCMXCIII in
<URL:news:37f5c381.284840759@news.ford.com>:
// On 30 Sep 1999 14:23:58 -0500, abigail@delanet.com (Abigail) wrote:
// >Uri Guttman (uri@sysarch.com) wrote on MMCCXXI September MCMXCIII in
// ><URL:news:x7ogekuwoa.fsf@home.sysarch.com>:
// >()
// >() please select the next category and question.
// >
// >
// >$400 in world capitals please.
//
// Your question is:
//
// Name two multi-character "perlfunc" featured functions that appear
// as a portion of a World Capital name.
Here are a few:
Andorra la Vella (do)
Buenos Aires (no)
Copenhagen (open)
Helsinki (sin)
Kuwait (wait)
London (do)
Nicosia (cos)
Saint Denis de la Reunion (int)
Saint John (int)
San Salvador (do)
Santo Domingo (do)
Stanley (tan)
Abigail
--
perl -MLWP::UserAgent -MHTML::TreeBuilder -MHTML::FormatText -wle'print +(
HTML::FormatText -> new -> format (HTML::TreeBuilder -> new -> parse (
LWP::UserAgent -> new -> request (HTTP::Request -> new ("GET",
"http://work.ucsd.edu:5141/cgi-bin/http_webster?isindex=perl")) -> content))
=~ /(.*\))[-\s]+Addition/s) [0]'
-----------== 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: 2 Oct 1999 14:02:16 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Values of thousand
Message-Id: <slrn7vcm5k.1dd.abigail@alexandra.delanet.com>
Marc (puma@mailandnews.com) wrote on MMCCXXIII September MCMXCIII in
<URL:news:7t3db4.3vseghf.0@pumamarcmailandnews.h3B0BFA44.invalid>:
'' Christopher wrote in <37f53cc1.3845763@PersonalNews.de.uu.net>:
''
'' >- 125.000 or 12,900,000 for europe (point)
'' >
''
'' Er, not to nitpick too much, but isn't the European method more like
'' 125 900 000,30 Not points used at all, and a coma for the decimal mark?
No.
Abigail
--
sub _'_{$_'_=~s/$a/$_/}map{$$_=$Z++}Y,a..z,A..X;*{($_::_=sprintf+q=%X==>"$A$Y".
"$b$r$T$u")=~s~0~O~g;map+_::_,U=>T=>L=>$Z;$_::_}=*_;sub _{print+/.*::(.*)/s}
*_'_=*{chr($b*$e)};*__=*{chr(1<<$e)};
_::_(r(e(k(c(a(H(__(l(r(e(P(__(r(e(h(t(o(n(a(__(t(us(J())))))))))))))))))))))))
-----------== 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: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V9 Issue 973
*************************************
