[12174] in Perl-Users-Digest
Perl-Users Digest, Issue: 5775 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue May 25 13:07:33 1999
Date: Tue, 25 May 99 10:01:32 -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 Tue, 25 May 1999 Volume: 8 Number: 5775
Today's topics:
Re: PERLFUNC: unshift - prepend more elements to the be <jeromeo@atrieva.com>
Re: Please, why -w file test does not work? (Christian Murphy)
Re: Please, why -w file test does not work? <gellyfish@gellyfish.com>
PROBLEM <pruefer@idnet.de>
Re: Problems with a guestbook entry script <gellyfish@gellyfish.com>
Re: regexp question (Larry Rosler)
Re: regexp question (Larry Rosler)
Re: removings " "s from strings <daniel.vesma@thewebtree.com>
Re: removings " "s from strings <tchrist@mox.perl.com>
Re: removings " "s from strings <awalrant@softhome.net>
Re: removings " "s from strings <tchrist@mox.perl.com>
Re: removings " "s from strings (Sam Holden)
Re: removings " "s from strings <garethr@cre.canon.co.uk>
Re: removings " "s from strings <daniel.vesma@thewebtree.com>
Re: Return of array (Dave Cross)
Re: Return of array <jdporter@min.net>
Re: substituting string with current date (Dave Cross)
Re: undef of namespaces (Andrew Allen)
Web stats & reinvention avoidance. <mark@artdigital.co.uk>
Re: Web stats & reinvention avoidance. (Jim Ley)
Re: Web stats & reinvention avoidance. <jeromeo@atrieva.com>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 25 May 1999 07:50:42 -0700
From: Jerome O'Neil <jeromeo@atrieva.com>
Subject: Re: PERLFUNC: unshift - prepend more elements to the beginning of a list
Message-Id: <374AB8C2.FA9AAC05@atrieva.com>
David Cantrell wrote:
>
> On 25 May 1999 01:54:25 -0700, Tom Christiansen
> <perlfaq-suggestions@perl.com> enlightened us thusly:
>
> >This excerpt is from the perlfunc manpage ...
>
> Tom, can you please stop posting these? I am beginning to find these
> posts far more annoying than the newbies' FAQs. And it's not
> preventing them from wasting our time.
I like 'em. Add something to your kill file so you don't have to see
them.
--
Jerome O'Neil, Operations and Information Services
Atrieva Corporation, 600 University St., Ste. 911, Seattle, WA 98101
jeromeo@atrieva.com - Voice:206/749-2947
The Atrieva Service: Safe and Easy Online Backup http://www.atrieva.com
------------------------------
Date: 25 May 1999 14:28:03 GMT
From: r28874@email.mot.com (Christian Murphy)
Subject: Re: Please, why -w file test does not work?
Message-Id: <7iec1j$te9@nntp.cig.mot.com>
In article <927609337.581774@gate.logis.cz>,
Pavel Kotala <pkotala@logis.cz> wrote:
>( This is the method /maybe not the best/ I want be sure, that other
>program, which communicates with me by files have message completely writen.
>After I have message read, I remove file.)
Use two files. The other program creates a second file when it has
finished writing to your file. Then your perl program just needs to
check for the existance of the second file.
Regards,
-christian
------------------------------
Date: 25 May 1999 17:14:31 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Please, why -w file test does not work?
Message-Id: <374acc67@newsread3.dircon.co.uk>
Pavel Kotala <pkotala@logis.cz> wrote:
> I asked this question several days ago. Please, what do I wrong? In the
> script on Windows NT:
>
> while (! -w "x.txt")
> {
> }
> open(X, ">x.txt") or die "Can not open x.txt: $!\n";
>
> I receive "Can not open x.txt: Permission denied".
>
> I expect, the file is locked, I simulate it by opening it by MS Word and
> really it can be opened by eg. Wordpad.
>
> So why perl pass -w (and -W) test true?
>
> ( This is the method /maybe not the best/ I want be sure, that other
> program, which communicates with me by files have message completely writen.
> After I have message read, I remove file.)
>
The -w test only checks to see if the file is writeable by the effective
uid by the permissions of the file - it does not check to see if the
file is locked in some way by another process. If you are in control of
both the writer and reader process then you should use flock() if not
the perhaps you should consider doing something other than die()ing when
you get the "Permission denied" error.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
------------------------------
Date: Tue, 25 May 1999 18:59:02 +0100
From: "USENET News" <pruefer@idnet.de>
Subject: PROBLEM
Message-Id: <7iekj3$m9i$1@newsreader.ipf.de>
hi there!
ive got a PROBLEM!
i4ve got a form-field in html...
i send it to perl/cgi program -> works fine
i get input from the form-fields -> works fine
i print them out to a NEW html site -> works fine
i print out form-fields through cgi-program -> works fine
i print out radio-buttons, if the data is correct -> works fine
if the user selected "yes" i want to clear browser window or create a NEW
html-site (but no NEW cgi-script) -> dont know how to do it...
if the user selected "no" i want to REDIRECT to specific html-site (input
data again) -> server sais:
Status: 302 Moved Window-Target: 1 Location:
http://studio1/datenbank/login.htm
cgi-line:
if ($query->param('pruefung1') eq "nein") {
print "\n\n";
print $query->redirect('http://studio1/datenbank/login.htm',1);
}
its working on:
windown nt4.0 server, internet information server3, iexplorer4&netscape
------------------------------
Date: 25 May 1999 17:14:17 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Problems with a guestbook entry script
Message-Id: <374acc59@newsread3.dircon.co.uk>
Tim Shapcott <tim.shapcott@virgin.net> wrote:
> Hi
>
> I am treading very carefully here, because i tried to ask the same question
> a few days ago, but made the mistake of posting the script as an attachment.
> I hope i haven't offended anyone so much that they won't help me!
>
Yes and I also posted an answer which would allow you to fix it. Why
are you unable to read the useful diagnostic messages yourself. Trying
to debug a program solely in a CGI environment is a complete waste of time
- download a copy of Perl before you go any further so you can at least
run perl -c on the programs before you upload them.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
------------------------------
Date: Mon, 24 May 1999 13:20:51 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: regexp question
Message-Id: <MPG.11b35482339110bb989ae7@nntp.hpl.hp.com>
[Posted and a courtesy copy mailed.]
In article <Pine.SOL.3.96.990524112911.19586A-100000@ux9.cso.uiuc.edu>
on Mon, 24 May 1999 12:54:05 -0500, Bryan Camp <b-
camp@students.uiuc.edu> says...
> I'm having problems getting a regexp to work.
>
> I'm reading in a data file with the following format:
>
> 999-999 RES SRC1=A120C65000000_CR08|NAME1 SRC2=A120C65000001_CR08|NAME2
> 999-998 RES SRC1=A120C65000002_CCC1|NAME3
> 999-997 CAP SRC1=A120C65000009_FAL4|NAME4 SRC2=_CRTY|NAME5
>
> What I want to do is get rid of everything between
> the = sign and the underscore sign, which can occur
> multiple times in the same line:
>
> 999-999 RES SRC1=_CR08|NAME1 SRC2=_CR08|NAME2
> 999-998 RES SRC1=_CCC1|NAME3
> 999-997 CAP SRC1=_FAL4|NAME4 SRC2=_CRTY|NAME5
>
> Here is what I have so far:
>
> #!usr/bin/perl -w
Good start. Now add 'use strict;' as the second line of the program.
> open (FH, "+< $file");
Can we assume that $file has a value in your real program?
Check the result of open -- always.
Do you really want to have write capability on this file?
open FH, $file or die "Couldn't open '$file'. $!\n";
> while(<FH>){
> $sub =~ ( s/(/\b=\+_\b/)/g )
Can we assume that $sub has a value in your real program?
Your use of parentheses inside the regex makes no sense. I think when
you said the regex didn't work, you meant the program wouldn't compile.
The problem in your regex is that "\+" means a 'plus' character. The
"\b"s don't really add much. This will work better:
$sub =~ s/=[^_]+/=/g;
> }
> close (FH);
>
> Can someone tell me what I'm doing wrong?
Plenty. :-) For one thing, try to get a program at least to be
syntactically correct before posting it. For other things, see above.
> Thank you very much.
You're very welcome.
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Mon, 24 May 1999 14:30:40 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: regexp question
Message-Id: <MPG.11b364da5a2442e6989ae9@nntp.hpl.hp.com>
[Posted and a courtesy copy mailed.]
In article <3749B668.EFFDAE48@genesis.co.nz> on Tue, 25 May 1999
08:28:24 +1200, Me <aghaeim@genesis.co.nz> says...
> Bryan Camp wrote:
...
> > 999-999 RES SRC1=A120C65000000_CR08|NAME1 SRC2=A120C65000001_CR08|NAME2
> > 999-998 RES SRC1=A120C65000002_CCC1|NAME3
> > 999-997 CAP SRC1=A120C65000009_FAL4|NAME4 SRC2=_CRTY|NAME5
> >
> > What I want to do is get rid of everything between
> > the = sign and the underscore sign, which can occur
> > multiple times in the same line:
> >
> > 999-999 RES SRC1=_CR08|NAME1 SRC2=_CR08|NAME2
> > 999-998 RES SRC1=_CCC1|NAME3
> > 999-997 CAP SRC1=_FAL4|NAME4 SRC2=_CRTY|NAME5
...
> I guess the correct form of what you mean is :
> $sub =~ s/\b\=.*\_\b//g ; or even $sub=~ s/(=.*\_)//g ;
I guess not. That produces this, which doesn't resemble what is wanted:
> > 999-999 RES SRC1CR08|NAME2
> > 999-998 RES SRC1CCC1|NAME3
> > 999-997 CAP SRC1CRTY|NAME5
Don't post guesses. It is a very good idea to *TEST EVERY LINE OF Perl
THAT YOU POST* in response to a question.
Others have posted correct regexes -- after testing them.
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Tue, 25 May 1999 16:49:25 +0100
From: "Daniel Vesma" <daniel.vesma@thewebtree.com>
Subject: Re: removings " "s from strings
Message-Id: <7iehar$n0g$1@gxsn.com>
>: If so, can you point me
>: to the URL? I don't see the message,
> ^^^^^^^^^^^
>
>
> I dunno what you're talking about.
>
> I think you don't know what we're talking about either :-)
True. I'm native to alt.html, there is an FAQ for the whole group that
answers people's questions.
> The Perl Frequently Asked Questions (FAQ) are *included* with
> the perl distribution.
Ahh, I don't seem to have them.
> If you have perl installed, you should have some version of the
> FAQs already on your hard disk somewhere.
No I don't. I'll see if I can find them on the web.
> http://language.perl.com/faq/index.html
Ahh, there they are.
Thanks.
Daniel Vesma
http://www.thewebtree.com
http://www.thewebtree.com/daniel-vesma
------------------------------
Date: 25 May 1999 10:13:18 -0700
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: removings " "s from strings
Message-Id: <374acc1e@cs.colorado.edu>
[courtesy cc of this posting mailed to cited author]
In comp.lang.perl.misc, "Daniel Vesma" <daniel.vesma@thewebtree.com> writes:
:> The Perl Frequently Asked Questions (FAQ) are *included* with
:> the perl distribution.
:Ahh, I don't seem to have them.
Then you don't have Perl. Please install Perl and consult
its documentation.
--tom
--
Pascal, n.:
A programming language named after a man who would turn over in
his grave if he knew about it.
------------------------------
Date: Tue, 25 May 1999 18:25:56 +0200
From: Alain Walrant <awalrant@softhome.net>
Subject: Re: removings " "s from strings
Message-Id: <374ACF13.BC1288DE@softhome.net>
Make use of regular expression like this:
$preOR = " some space before and some space after ";
$preOR =~ s/^[ ]*//g ;
$preOR =~ s/[ ]*$//g;
The first command will substitute the space at the beginning and the second
those from the end of string.
Alain.
Daniel Vesma wrote:
> Hi,
>
> How can I remove spaces from the start and ends of strings, I have two
> variables, $preOR and $postOR. Either may have spaces at the beginning or
> the ends. I need to find some code that looks for the spaces and deletes
> them if they are there.
>
> Any ideas? Please? Help. I'm going nuts.
>
> Daniel Vesma
> http://www.thewebtree.com
> http://www.thewebtree.com/daniel-vesma
------------------------------
Date: 25 May 1999 10:28:27 -0700
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: removings " "s from strings
Message-Id: <374acfab@cs.colorado.edu>
[courtesy cc of this posting mailed to cited author]
In comp.lang.perl.misc, Alain Walrant <awalrant@softhome.net> writes:
:$preOR =~ s/^[ ]*//g ;
:$preOR =~ s/[ ]*$//g;
Those brackets are wrong, and you mean + not *. Please check
the answer in perlop or perlfaq4.
--tom
--
But be careful how you speak:
Say break and steak, but bleak and streak;
------------------------------
Date: 25 May 1999 16:31:24 GMT
From: sholden@pgrad.cs.usyd.edu.au (Sam Holden)
Subject: Re: removings " "s from strings
Message-Id: <slrn7klk2s.srq.sholden@pgrad.cs.usyd.edu.au>
On 25 May 1999 18:25:56 +0200, Alain Walrant <awalrant@softhome.net> wrote:
>Make use of regular expression like this:
>
>$preOR = " some space before and some space after ";
>
>$preOR =~ s/^[ ]*//g ;
>$preOR =~ s/[ ]*$//g;
What's with the []s???
What's with the /g???
If you have to answer a FAQ instead of helping people learn by pointing them
to the FAQ at least use the code from the FAQ:
perlfaq4 : How do I strip blank space from the beginning/end of a string?
for ($preOR) {
s/^\s+//;
s/\s+$//;
}
--
Sam
Basically, avoid comments. If your code needs a comment to be
understood, it would be better to rewrite it so it's easier to
understand. --Rob Pike
------------------------------
Date: Tue, 25 May 1999 16:46:52 GMT
From: Gareth Rees <garethr@cre.canon.co.uk>
Subject: Re: removings " "s from strings
Message-Id: <si675hcd1f.fsf@cre.canon.co.uk>
Sam Holden <sholden@pgrad.cs.usyd.edu.au> wrote:
> What's with the /g???
It's faster. :-)
use Benchmark;
use constant SPACES => 100;
$data = " " x SPACES . "foo" . " " x SPACES;
timethese
(100000,
{once => sub { $_ = $data; s/^ +//; s/ +$//; },
many => sub { $_ = $data; s/^ +//g; s/ +$//g; },
});
Benchmark: timing 100000 iterations of many, once...
many: 5 wallclock secs ( 4.28 usr + 0.00 sys = 4.28 CPU)
once: 6 wallclock secs ( 4.86 usr + 0.00 sys = 4.86 CPU)
(I guess this is an artifact of something - since the counter-intuitive
result depends on the value of SPACES - but I don't know of what.)
--
Gareth Rees
------------------------------
Date: Tue, 25 May 1999 17:54:27 +0100
From: "Daniel Vesma" <daniel.vesma@thewebtree.com>
Subject: Re: removings " "s from strings
Message-Id: <7ieknq$12k$1@gxsn.com>
>Then you don't have Perl. Please install Perl and consult
>its documentation.
Yes I do. Running under win98.
Daniel Vesma
http://www.thewebtree.com
http://www.thewebtree.com/daniel-vesma
------------------------------
Date: Tue, 25 May 1999 15:08:31 GMT
From: dave@dave.org.uk (Dave Cross)
Subject: Re: Return of array
Message-Id: <374bbbd1.81881066@news.demon.co.uk>
On Tue, 25 May 1999 10:12:10 -0400, digital kensai <kensai@nortel.com>
wrote:
>Kaare Rasmussen wrote:
>
>> Hi
>>
>> Trying to make an OO module with a subprocedure that assigns a reference
>> to an array to $self{'var'}
>>
>> Something like
>>
>> sub sub {
>> my @var = qw(var1 var2 var3);
>> $selv->{'var'} = \@var;
>> }
>>
>> How can I dereference $selv->{'var'} after sub sub has been called?
>
>You have it exactly. You don't even have to explicitly use a return
>statement
>(see perlsub manpage). Here's an example:
>
>ArrayRef.pm
>###########
>package ArrayRef;
>
>sub new { return bless {}; }
>
>sub retArr {
> my @var = qw(1 2 3);
> $self->{'var'} = \@var;
>#return $self->{'var'}; # this is optional
>}
>
>1;
>
>arraytest.pl
>##########
>#!/usr/bin/perl -w
>
>use strict;
>
>require('ArrayRef.pm');
>
>my ($a, $arrayref);
>
>$a = ArrayRef->new;
>$arrayref = $a->retArr;
>
>print @{$arrayref}->[0]; #prints 1
This does work (I've tested it) but I think it's an example of Perl
doing what it thinks you want it to do when you're being unclear (can
anyone confirm this).
I think that what you're doing is confusing two correct ways of
accessing the aray contents. These would be:
# 1. actually still slightly confused as it returns a single element
# array slice.
print @{$arrayref}[0];
# 2. Much better
print $arrayref->[0];
Dave...
--
Dave Cross <dave@dave.org.uk>
<http://www.dave.org.uk>
------------------------------
Date: Tue, 25 May 1999 16:21:03 GMT
From: John Porter <jdporter@min.net>
Subject: Re: Return of array
Message-Id: <7ieild$28k$1@nnrp1.deja.com>
In article <374bbbd1.81881066@news.demon.co.uk>,
dave@dave.org.uk (Dave Cross) wrote:
> I think that what you're doing is confusing two correct ways of
> accessing the aray contents. These would be:
>
> # 1. actually still slightly confused as it returns a single element
> # array slice.
> print @{$arrayref}[0];
This is utterly correct (and not confusing, imho) when you know you
really want a slice, e.g.
print @{$arrayref}[0,9,42];
But the fix, for single elements, is the also-not-confusing
${$arrayref}[0]
or simply
$$arrayref[0]
> # 2. Much better
> print $arrayref->[0];
Ahhh, much.
--
John Porter
Put it on a plate, son. You'll enjoy it more.
--== Sent via Deja.com http://www.deja.com/ ==--
---Share what you know. Learn what you don't.---
------------------------------
Date: Tue, 25 May 1999 15:11:51 GMT
From: dave@dave.org.uk (Dave Cross)
Subject: Re: substituting string with current date
Message-Id: <374cbd58.82272072@news.demon.co.uk>
On 25 May 1999 14:52:40 GMT, sholden@pgrad.cs.usyd.edu.au (Sam Holden)
wrote:
> Khan, Fatima (EXCHANGE:SKY:6S34) <gsoamst@americasm01.nt.com> wrote:
>>Hello..
>>
>>I'm trying to do a simple substitution. Replacing a string with the
>>current date.
>>
>>my program grabs the contents of a file, looks for a string matching
>>/dat.*/ and substitutes with the current date.
>>I invoke 'date' by using the system function i.e system("date +%Y%m&d)
>>
>>the file contains the date hard coded like so: Date = 19820506
>>(yyyymmdd)
>>
>>so I have
>>
>><snip>
>>
>>if ($_ = /Dat.*/) {
>> $_ = s/\d.*/system("date +%Y%m%d");
>>}
>>
>>the digits following "Date=" in my file become substituted
>>with "system('date +%y%m%d')".
>
>No it doesn't. Not with that code anyway...
>
>$_ = is not what you want. Your missing a / as well. Y ne y.
>
>Have a look at the perlop documentation (perldoc perlop) for information
>on the use of s/// and how to evaluate the substitution...
>
>Have a look at perlfunc documentation (perldoc -f system) for information
>on why system() does not do what you want.
>
>Have a look at perlop again for information on how to capture the output of
>an external program, like the system documentation tells you to.
>
>Have a look at the perlre documentation for information on why \d.* is
>probably not what you want to replace (though it might be I guess).
You might also take a look at the perlfunc documentation to see if
there are any Perl functions that would stop you having to call an
external function at all. [hint: localtime].
Dave...
--
Dave Cross <dave@dave.org.uk>
<http://www.dave.org.uk>
------------------------------
Date: 24 May 1999 19:59:16 GMT
From: ada@fc.hp.com (Andrew Allen)
Subject: Re: undef of namespaces
Message-Id: <7icb2k$8av$1@fcnews.fc.hp.com>
Marc Dietrich (marc.dietrich@physik.uni-giessen.de) wrote:
: Hello to all,
: I thought perl is a relativ secure language...
: I depend on the namespaces because I'm using the CGI module which
: imports variables in its own namespace. Importing a new dataset requires
: dele ting the old one.
You could use the Safe module for this.
Andrew
------------------------------
Date: Tue, 25 May 1999 16:55:45 +0100
From: "Mark Hamlin" <mark@artdigital.co.uk>
Subject: Web stats & reinvention avoidance.
Message-Id: <7ieh60$mv1$1@pheidippides.axion.bt.co.uk>
Where & what is the best source to start from in the arena of web page
traffic statistics analysis, If there is a free script that can do
everything it would be time well saved. I have good server side skills now
as well as client side javascript so I can jump right into the middle of
something and manipulate for my own situation.
Requirements:
1: Free
2: Stats by number of different users.
3: Pretty graphics,
I've got a few nice sources / choices for dynamic graphic creation. If you
don't have the perfect freebie for me how about some advice. Can I get all
the information from the http (Apache) access_log or is some more info
recording neccessary, ie with another cooked up server log or cookies.
------------------------------
Date: Tue, 25 May 1999 16:12:00 GMT
From: jim@jibbering.com (Jim Ley)
Subject: Re: Web stats & reinvention avoidance.
Message-Id: <374acb69.28534705@news.mistral.co.uk>
On Tue, 25 May 1999 16:55:45 +0100, "Mark Hamlin"
<mark@artdigital.co.uk> wrote:
>Where & what is the best source to start from in the arena of web page
>traffic statistics analysis, If there is a free script that can do
>everything it would be time well saved. I have good server side skills now
>as well as client side javascript so I can jump right into the middle of
>something and manipulate for my own situation.
>
>Requirements:
>
>1: Free
>2: Stats by number of different users.
>3: Pretty graphics,
>
>I've got a few nice sources / choices for dynamic graphic creation. If you
>don't have the perfect freebie for me how about some advice. Can I get all
>the information from the http (Apache) access_log or is some more info
>recording neccessary, ie with another cooked up server log or cookies.
Not quite sure how comp.lang.javascript found its way into this post,
the other groups are far more sensible, but I quite like Analog myself
http://www.statslab.cam.ac.uk/~sret1/analog/
Jim.
------------------------------
Date: Tue, 25 May 1999 09:28:28 -0700
From: Jerome O'Neil <jeromeo@atrieva.com>
To: Mark Hamlin <mark@artdigital.co.uk>
Subject: Re: Web stats & reinvention avoidance.
Message-Id: <374ACFAC.D6B87D95@atrieva.com>
Mark Hamlin wrote:
>
> Where & what is the best source to start from in the arena of web page
> traffic statistics analysis,
Your server's log files.
> If there is a free script that can do
> everything it would be time well saved. I have good server side skills now
> as well as client side javascript so I can jump right into the middle of
> something and manipulate for my own situation.
Here is a simple one you can use. It doesn't do graphics, but you can
configure it as you see fit.
#!/usr/local/bin/perl -w
use strict;
while(<>){
# Split log enteries into desired fields
# and count as appropriate here.
}
# Print your results here.
>
> Requirements:
>
> 1: Free
Yep. Although I do accept beer as payment.
> 2: Stats by number of different users.
Aint no such animal. You can get approximate eyeballs, but nothing is
going to tell you the exact number.
> I've got a few nice sources / choices for dynamic graphic creation. If you
> don't have the perfect freebie for me how about some advice. Can I get all
> the information from the http (Apache) access_log or is some more info
> recording neccessary, ie with another cooked up server log or cookies.
Apache has a user tracking module you can use, but it's only as accurate
as the number of people using cookies.
Requisite Perl Content: You could cook up your own using the Apache::*
modules available on a CPAN resource near you.
Good Luck!
--
Jerome O'Neil, Operations and Information Services
Atrieva Corporation, 600 University St., Ste. 911, Seattle, WA 98101
jeromeo@atrieva.com - Voice:206/749-2947
The Atrieva Service: Safe and Easy Online Backup http://www.atrieva.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 5775
**************************************
