[18680] in Perl-Users-Digest
Perl-Users Digest, Issue: 848 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon May 7 14:10:45 2001
Date: Mon, 7 May 2001 11:10:09 -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: <989259009-v10-i848@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Mon, 7 May 2001 Volume: 10 Number: 848
Today's topics:
New posters to comp.lang.perl.misc <gbacon@cs.uah.edu>
Re: redirect to a url & avoiding hacks <flavell@mail.cern.ch>
Re: redirect to a url & avoiding hacks <godzilla@stomp.stomp.tokyo>
Re: sessions and closures (Abigail)
Re: sessions and closures (Logan Shaw)
Re: Simple Regex <ren@tivoli.com>
Re: Simple Regex (Craig Berry)
Statistics for comp.lang.perl.misc <gbacon@cs.uah.edu>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 07 May 2001 14:36:47 -0000
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: New posters to comp.lang.perl.misc
Message-Id: <tfdcnv14hm4kd8@corp.supernews.com>
Following is a summary of articles from new posters spanning a 7 day
period, beginning at 30 Apr 2001 15:20:22 GMT and ending at
07 May 2001 13:29:52 GMT.
Notes
=====
- A line in the body of a post is considered to be original if it
does *not* match the regular expression /^\s{0,3}(?:>|:|\S+>|\+\+)/.
- All text after the last cut line (/^-- $/) in the body is
considered to be the author's signature.
- The scanner prefers the Reply-To: header over the From: header
in determining the "real" email address and name.
- Original Content Rating (OCR) is the ratio of the original content
volume to the total body volume.
- Find the News-Scan distribution on the CPAN!
<URL:http://www.perl.com/CPAN/modules/by-module/News/>
- Please send all comments to Greg Bacon <gbacon@cs.uah.edu>.
- Copyright (c) 2001 Greg Bacon.
Verbatim copying and redistribution is permitted without royalty;
alteration is not permitted. Redistribution and/or use for any
commercial purpose is prohibited.
Totals
======
Posters: 116 (37.8% of all posters)
Articles: 176 (16.8% of all articles)
Volume generated: 320.7 kb (16.1% of total volume)
- headers: 153.0 kb (2,955 lines)
- bodies: 164.7 kb (5,819 lines)
- original: 113.6 kb (4,120 lines)
- signatures: 2.8 kb (82 lines)
Original Content Rating: 0.689
Averages
========
Posts per poster: 1.5
median: 1.0 post
mode: 1 post - 77 posters
s: 1.3 posts
Message size: 1866.1 bytes
- header: 890.0 bytes (16.8 lines)
- body: 958.5 bytes (33.1 lines)
- original: 660.7 bytes (23.4 lines)
- signature: 16.5 bytes (0.5 lines)
Top 10 Posters by Number of Posts
=================================
(kb) (kb) (kb) (kb)
Posts Volume ( hdr/ body/ orig) Address
----- -------------------------- -------
5 8.9 ( 5.4/ 3.4/ 1.2) "Tom Beer" <tom.beer@btfinancialgroup.spamfilter.com>
5 8.8 ( 5.0/ 3.8/ 2.7) "BarryK" <notmyrealemail@example.com>
5 11.7 ( 5.7/ 6.1/ 3.4) carlfox <carlfox@netdoor.com>
4 7.7 ( 3.9/ 3.3/ 2.1) Ilmari Karonen <usenet11446@itz.pp.sci.fi>
4 9.1 ( 4.3/ 4.1/ 1.5) idrather@you.not
4 6.9 ( 2.6/ 3.9/ 3.6) Doug O'Leary <dkoleary@ro05-24-29-232-217.ce.mediaone.net>
4 8.3 ( 3.9/ 4.5/ 2.3) admin@nospam.m2n.co.uk
3 5.4 ( 2.4/ 3.1/ 1.9) "Perl Programación Web" <perl@programacionweb.com>
3 6.1 ( 3.1/ 3.0/ 2.8) "W.W.J.D. Black" <jdblack@black.metronet.com>
3 8.8 ( 3.0/ 5.9/ 1.5) "Jason Pratt" <jpratt@ssr-inc.com>
These posters accounted for 3.8% of all articles.
Top 10 Posters by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Address
-------------------------- ----- -------
11.7 ( 5.7/ 6.1/ 3.4) 5 carlfox <carlfox@netdoor.com>
10.1 ( 1.0/ 9.1/ 8.0) 2 Barry Allwood <barryallwood@aol.com>
9.1 ( 2.7/ 6.4/ 4.6) 3 "Shannon Brown" <news@shannonbrown.net>
9.1 ( 4.3/ 4.1/ 1.5) 4 idrather@you.not
8.9 ( 5.4/ 3.4/ 1.2) 5 "Tom Beer" <tom.beer@btfinancialgroup.spamfilter.com>
8.8 ( 3.0/ 5.9/ 1.5) 3 "Jason Pratt" <jpratt@ssr-inc.com>
8.8 ( 5.0/ 3.8/ 2.7) 5 "BarryK" <notmyrealemail@example.com>
8.3 ( 3.9/ 4.5/ 2.3) 4 admin@nospam.m2n.co.uk
7.7 ( 3.9/ 3.3/ 2.1) 4 Ilmari Karonen <usenet11446@itz.pp.sci.fi>
6.9 ( 2.6/ 3.9/ 3.6) 4 Doug O'Leary <dkoleary@ro05-24-29-232-217.ce.mediaone.net>
These posters accounted for 4.5% of the total volume.
Top 10 Posters by OCR (minimum of three posts)
==============================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.950 ( 2.8 / 3.0) 3 "W.W.J.D. Black" <jdblack@black.metronet.com>
0.940 ( 3.6 / 3.9) 4 Doug O'Leary <dkoleary@ro05-24-29-232-217.ce.mediaone.net>
0.720 ( 4.6 / 6.4) 3 "Shannon Brown" <news@shannonbrown.net>
0.707 ( 2.7 / 3.8) 5 "BarryK" <notmyrealemail@example.com>
0.643 ( 2.1 / 3.3) 4 Ilmari Karonen <usenet11446@itz.pp.sci.fi>
0.608 ( 1.9 / 3.1) 3 "Perl Programación Web" <perl@programacionweb.com>
0.561 ( 3.4 / 6.1) 5 carlfox <carlfox@netdoor.com>
0.508 ( 2.3 / 4.5) 4 admin@nospam.m2n.co.uk
0.357 ( 1.5 / 4.1) 4 idrather@you.not
0.334 ( 1.2 / 3.4) 5 "Tom Beer" <tom.beer@btfinancialgroup.spamfilter.com>
Bottom 10 Posters by OCR (minimum of three posts)
=================================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.940 ( 3.6 / 3.9) 4 Doug O'Leary <dkoleary@ro05-24-29-232-217.ce.mediaone.net>
0.720 ( 4.6 / 6.4) 3 "Shannon Brown" <news@shannonbrown.net>
0.707 ( 2.7 / 3.8) 5 "BarryK" <notmyrealemail@example.com>
0.643 ( 2.1 / 3.3) 4 Ilmari Karonen <usenet11446@itz.pp.sci.fi>
0.608 ( 1.9 / 3.1) 3 "Perl Programación Web" <perl@programacionweb.com>
0.561 ( 3.4 / 6.1) 5 carlfox <carlfox@netdoor.com>
0.508 ( 2.3 / 4.5) 4 admin@nospam.m2n.co.uk
0.357 ( 1.5 / 4.1) 4 idrather@you.not
0.334 ( 1.2 / 3.4) 5 "Tom Beer" <tom.beer@btfinancialgroup.spamfilter.com>
0.256 ( 1.5 / 5.9) 3 "Jason Pratt" <jpratt@ssr-inc.com>
11 posters (9%) had at least three posts.
Top 10 Targets for Crossposts
=============================
Articles Newsgroup
-------- ---------
28 comp.lang.perl.modules
23 comp.lang.perl
14 alt.perl
10 alt.comp.perlcgi.freelance
9 alt.perl.sockets
4 fj.net.ldap
3 comp.lang.perl.tk
3 alt.perl.flame
3 de.comp.lang.perl.cgi
3 cz.comp.lang.perl
Top 10 Crossposters
===================
Articles Address
-------- -------
9 "JohnB" <john@art-ave.com>
9 havoc <havoc@harrisdev.com>
9 admin@webmeeters.net
4 "Ralph Cranberry" <rcranberry@hotmail.com>
4 "Philippe Hamel" <hamel@hotmail.com>
4 dave turner <dt@area.com>
4 Daneel van Tonder <linuxos@ananzi.co.za>
4 "Fermín" <perlNO-SPAM@NO-SPAMprogramacionweb.com>
2 "Perl Lover" <dj@syntaxerror.crazydj.de>
2 "steveFarris" <fm_duende@yahoo.com>
------------------------------
Date: Mon, 7 May 2001 15:12:03 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: redirect to a url & avoiding hacks
Message-Id: <Pine.LNX.4.30.0105071452500.30987-100000@lxplus003.cern.ch>
This is O.T for a Perl language group, but if we're going to tackle
it at all...
On 7 May 2001, Tina Mueller wrote:
> ok, my suggestions if you wanna avoid using CGI.pm is,
Normally, my suggestion would be "think again". But if you really and
truly are going to use none of the other tried and tested facilities
of CGI.pm in your script, and you're fully acquainted with the
relevant details of the specification, then it's OK, I suppose.
> print at least these three lines:
Not necessarily, because status 302 is defined to be the default
when a Location: response is issued from a parsed-headers script.
So it could be left out.
(And if it were an NPH script, then Status: would be wrong anyway).
> print <<EOM;
> Status: 302 Moved
> Location: url
>
> EOM
It might also be useful to remind the hon. Usenaut that there are two
fundamentally different kinds of CGI Location: response. If you want
a redirection, then you are mandated by the CGI spec to supply a full
URL - not merely an absolute URLpath, which is specified to product a
different effect (and I suspect would be in violation of the spec if
issued with a 30x status).
(And relative URLpaths are not legal there, period.)
Coming back to the CGI.pm issue, I would say in general that anyone
who needs to ask, would be well advised to use it. Anyone who can
confidently program without it, would not need to ask.
best regards
------------------------------
Date: Mon, 07 May 2001 08:06:54 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: redirect to a url & avoiding hacks
Message-Id: <3AF6BA0E.C166CF2B@stomp.stomp.tokyo>
Tina Mueller wrote:
> Godzilla! wrote:
> > Keith G wrote:
(snippage by Mueller not noted; context changed)
> >> is this the best way to do this:
> >> print $query->redirect('http://www.mypage.com/thepage.htm');
> > This is your worst possible choice. You are using quarter of
> > a megabyte of coding, well over six-thousand lines of code
> > to accomplish what can be done in one line of code:
> > print "Location: url/path/to/new/page";
> hmm... didn't you forget something? at least four keystrokes?
I count seven keystrokes if all are to abide by your dictates.
Use of "url" or "URL" is commonly accepted to imply an http
style path, formatted as needed.
> >> any suggestions?
> > Use of CGI.pm in almost all cases is massive overkill.
> > Learn to how program
> =) is this an advice to yourself?
Mine is advice to those who desire to become programmers
rather than copy and paste babies. You have snipped my
comments to change context. Doing this is to tell a
lie of omission which calls into question, your ethics.
Clearly you have no compunction about lying.
> > Doing this will teach you
> > how to write fast, efficient scripts which are
> > relatively bug free.
> ^^^^^^^^^^
> hmmm...
Those of us who are programmers will quickly acknowledge
there are few commonplace scripts which are completely
free of all bugs. My use of "relatively" indicates a range
of zero bugs to few bugs, inclusively; an acceptable amount.
> ok, my suggestions if you wanna avoid using CGI.pm is,
> print at least these three lines:
> print <<EOM;
> Status: 302 Moved
> Location: url
> EOM
You need to read about and research http response header formats
and, how to use http headers correctly. Why are you using "url"
in light of just previously implying this is wrong? Hypocrisy?
Wait! Those are really cute shoes! Hey, aren't those the latest
in designer bozo shoes, size eighteen?
Godzilla!
------------------------------
Date: Mon, 7 May 2001 15:08:12 +0000 (UTC)
From: abigail@foad.org (Abigail)
Subject: Re: sessions and closures
Message-Id: <slrn9fdeis.n8p.abigail@tsathoggua.rlyeh.net>
F. Xavier Noria (fxn@isoco.com) wrote on MMDCCCVI September MCMXCIII in
<URL:news:3af63e47.647682@news.iddeo.es>:
:)
:) Well, the article gives some more details, I didn't write them because
:) I thought that paragraph suggested how the logic works. It seems a
:) natural application of closures I quote two more paragraphs for the
:) sake of illustration and sharing (note they were writing Lisp) [*]:
:)
:) When most based-software generates a link on a page, it tends
:) to be thinking, if the user clicks on this link, I want to
:) call this cgi script with this arguments. When our software
:) generated a link, it could think, if the user clicks on this
:) link, I want to run this piece of code. And the piece of code
:) could [be] an arbitrary piece of code, possibly (in fact, usually)
:) containing free variables whose value came from the surrounding
:) context.
:)
:) The way we did this was to write a macro that took an initial
:) argument expected to be a closure, followed by a body of code.
:) The code would then be stored in a global hash table under a
:) unique id, and whatever output was generated by the code if the
:) body would appear within a link whose url contained that hash
:) key. If that link was the next clicked on, our software would
:) find and call the corresponding bit of code, and the chain
:) would continue. Effectively we were writing cgi scripts on the
:) fly, except that they were closures that could refer to the
:) surronding context.
:)
:) I think this approach deserves study. Perhaps the closures could be easily
:) generated thanks to Lisp macros and their lack in Perl would imply this
:) approach to be impractical, I don't know. That's why I asked whether someone
:) had written (or had considered to write) cgis like that and would like to
:) share his or her thoughts.
I fail to see why Perl lacks this. Perl happily stores a reference to
a closure in a hash.
The only drawback with this system is, what are you going to do if the
user does not click the link? Or to be more precise, how are you going
to determine whether the user will click on the link some time in the
future? But that's a question both LISP and Perl programmers face.
Abigail
--
BEGIN {my $x = "Knuth heals rare project\n";
$^H {integer} = sub {my $y = shift; $_ = substr $x => $y & 0x1F, 1;
$y > 32 ? uc : lc}; $^H = hex join "" => 2, 1, 1, 0, 0}
print 52,2,10,23,16,8,1,19,3,6,15,12,5,49,21,14,9,11,36,13,22,32,7,18,24;
------------------------------
Date: 7 May 2001 10:57:07 -0500
From: logan@cs.utexas.edu (Logan Shaw)
Subject: Re: sessions and closures
Message-Id: <9d6gkj$7p1$1@boomer.cs.utexas.edu>
In article <slrn9fdeis.n8p.abigail@tsathoggua.rlyeh.net>,
Abigail <abigail@foad.org> wrote:
>The only drawback with this system is, what are you going to do if the
>user does not click the link? Or to be more precise, how are you going
>to determine whether the user will click on the link some time in the
>future? But that's a question both LISP and Perl programmers face.
I agree that's a drawback. I think you can sort of address that by
walking the hash periodically and expiring references to closures that
haven't been used.
The drawback I see with the whole thing, though, is that on a typical
web server, there are several distinct server processes running at
once, and any request could go to any process. So, how do you ensure
that the request goes to the right process? Alternatively, if you
only have one process (and thus ensure that all requests in a chain
are handled by the same process), how do you get performance?
I don't know much about LISP, so maybe there is an answer here that I'm
missing. Perhaps there is some trick with LISP that allows multiple
processes to access the same hash and get at the same closure. I don't
see how you could do this with Perl except to use threads, and as I
understand it, threads in Perl are not ready for prime time. (I could
be wrong about threads though -- I haven't looked at threads in Perl in
about a year and I didn't look hard then.)
This all relates to another method of handling CGI requests that I've
thought of before, which is to pass some sort of session identifier
with *every* web page. Then, the CGI (or mod_perl code or whatever
receives the request from the web browsing user) simply looks up the
session ID in a table of some time and hands off the request to an
existing process; that existing process is dedicated to that one user's
session. So, the whole thing would operate much like I imagine
sessions do in IBM VM machiens with 3270 series terminals. The
advantage would be that programming would be much easier and there
would be less overhead to process requests. The disadvantage would be
that it'd be less scalable (you have to keep everyone's session in RAM
at once, even if people only load a page every 5 minutes, and it takes
3 seconds to respond to a request) and that URLs would become
meaningless outside of the context of a session.
- Logan
--
my your his her our their _its_
I'm you're he's she's we're they're _it's_
------------------------------
Date: 07 May 2001 10:51:21 -0500
From: Ren Maddox <ren@tivoli.com>
Subject: Re: Simple Regex
Message-Id: <m33dahjgxy.fsf@dhcp9-172.support.tivoli.com>
[Jeopardectomy]
On Mon, 7 May 2001, carlos@plant.student.utwente.nl wrote:
> "BUCK NAKED1" <dennis100@webtv.net> wrote in message
> news:13525-3AF65095-30@storefull-246.iap.bryant.webtv.net...
>> How do I grab the part of a string from the last slash to EOL? for
>> example: if I want to replace "http://my.com/images/banner.gif"
>> with "banner.gif".
>>
>> I tried
>> $name =~ s/\/(.*?)\n/(.*?)\n/e and it failed.
>>
> split /\//, $name; pop $name;
Um, no.
$ perl -we 'my $name="http://my.com/images/banner.gif";
split /\//, $name;
pop $name;
print "$name\n";'
Type of arg 1 to pop must be array (not scalar dereference) at -e line 3, near "$name;"
Execution of -e aborted due to compilation errors.
Perhaps you meant:
$ perl -we 'my $name="http://my.com/images/banner.gif";
my @parts = split /\//, $name;
$name = pop @parts;
print "$name\n";'
banner.gif
For quite some time now, my preference has been for:
$name = substr($name, rindex($name, "/") + 1);
though it's not clear that there's really ever any reason not to
simply use:
$name =~ s!.*/!!;
I started using the former at a point where I was probably way too
particular about the relative performance. To be fair, I was also
using a separate variable, which doesn't really change the former, but
changes the latter to:
($file = $path) =~ s!.*/!!;
Still, this version seems much more readable, and I'll likely switch
back to it for future projects.
--
Ren Maddox
ren@tivoli.com
------------------------------
Date: Mon, 07 May 2001 17:58:30 -0000
From: cberry@cinenet.net (Craig Berry)
Subject: Re: Simple Regex
Message-Id: <tfdoi658dkdb87@corp.supernews.com>
BUCK NAKED1 (dennis100@webtv.net) wrote:
: How do I grab the part of a string from the last slash to EOL? for
: example: if I want to replace "http://my.com/images/banner.gif" with
: "banner.gif".
:
: I tried
: $name =~ s/\/(.*?)\n/(.*?)\n/e and it failed.
That 'e' isn't doing anything, you know. And you can't write pattern
stuff on the replacement side (and have it mean anything close to what you
seem to intend).
$name =~ s!(.*)/.*!$1!s;
The first .* will at first match to end of string, and then backtrack to
just before the last / (if any) matching the / in the pattern. The
substitution then takes only that first (.*) match, discarding the / and
what lies beyond it.
--
| Craig Berry - http://www.cinenet.net/~cberry/
--*-- "God becomes as we are that we may be as he is."
| - William Blake
------------------------------
Date: Mon, 07 May 2001 14:36:13 -0000
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: Statistics for comp.lang.perl.misc
Message-Id: <tfdcmt639ihkc6@corp.supernews.com>
Following is a summary of articles spanning a 7 day period,
beginning at 30 Apr 2001 15:20:22 GMT and ending at
07 May 2001 13:29:52 GMT.
Notes
=====
- A line in the body of a post is considered to be original if it
does *not* match the regular expression /^\s{0,3}(?:>|:|\S+>|\+\+)/.
- All text after the last cut line (/^-- $/) in the body is
considered to be the author's signature.
- The scanner prefers the Reply-To: header over the From: header
in determining the "real" email address and name.
- Original Content Rating (OCR) is the ratio of the original content
volume to the total body volume.
- Find the News-Scan distribution on the CPAN!
<URL:http://www.perl.com/CPAN/modules/by-module/News/>
- Please send all comments to Greg Bacon <gbacon@cs.uah.edu>.
- Copyright (c) 2001 Greg Bacon.
Verbatim copying and redistribution is permitted without royalty;
alteration is not permitted. Redistribution and/or use for any
commercial purpose is prohibited.
Excluded Posters
================
perlfaq-suggestions\@(?:.*\.)?perl\.com
faq\@(?:.*\.)?denver\.pm\.org
Totals
======
Posters: 307
Articles: 1046 (456 with cutlined signatures)
Threads: 268
Volume generated: 1993.7 kb
- headers: 883.4 kb (17,125 lines)
- bodies: 1049.5 kb (34,963 lines)
- original: 667.4 kb (23,986 lines)
- signatures: 59.7 kb (1,380 lines)
Original Content Rating: 0.636
Averages
========
Posts per poster: 3.4
median: 1 post
mode: 1 post - 155 posters
s: 6.6 posts
Posts per thread: 3.9
median: 3.0 posts
mode: 1 post - 65 threads
s: 8.2 posts
Message size: 1951.8 bytes
- header: 864.8 bytes (16.4 lines)
- body: 1027.5 bytes (33.4 lines)
- original: 653.3 bytes (22.9 lines)
- signature: 58.5 bytes (1.3 lines)
Top 10 Posters by Number of Posts
=================================
(kb) (kb) (kb) (kb)
Posts Volume ( hdr/ body/ orig) Address
----- -------------------------- -------
50 70.6 ( 44.3/ 26.0/ 15.4) Bart Lateur <bart.lateur@skynet.be>
43 149.6 ( 38.4/111.2/ 72.6) Jfreeman <jfreeman@tassie.net.au>
41 69.4 ( 31.5/ 37.8/ 16.5) Anno Siegel <anno4000@lublin.zrz.tu-berlin.de>
40 66.5 ( 30.8/ 32.7/ 19.3) nobull@mail.com
34 75.0 ( 31.0/ 34.8/ 13.6) eins@durchnull.de
27 60.9 ( 24.0/ 36.5/ 26.4) "Godzilla!" <godzilla@stomp.stomp.tokyo>
26 55.2 ( 25.0/ 26.4/ 25.4) abigail@foad.org
20 42.2 ( 21.6/ 17.9/ 11.7) tadmc@augustmail.com
18 61.5 ( 19.2/ 40.9/ 24.0) Benjamin Goldberg <goldbb2@earthlink.net>
16 23.5 ( 9.4/ 11.7/ 6.6) Craig Berry <cberry@cinenet.net>
These posters accounted for 30.1% of all articles.
Top 10 Posters by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Address
-------------------------- ----- -------
149.6 ( 38.4/111.2/ 72.6) 43 Jfreeman <jfreeman@tassie.net.au>
75.0 ( 31.0/ 34.8/ 13.6) 34 eins@durchnull.de
70.6 ( 44.3/ 26.0/ 15.4) 50 Bart Lateur <bart.lateur@skynet.be>
69.4 ( 31.5/ 37.8/ 16.5) 41 Anno Siegel <anno4000@lublin.zrz.tu-berlin.de>
66.5 ( 30.8/ 32.7/ 19.3) 40 nobull@mail.com
61.5 ( 19.2/ 40.9/ 24.0) 18 Benjamin Goldberg <goldbb2@earthlink.net>
60.9 ( 24.0/ 36.5/ 26.4) 27 "Godzilla!" <godzilla@stomp.stomp.tokyo>
55.2 ( 25.0/ 26.4/ 25.4) 26 abigail@foad.org
42.2 ( 21.6/ 17.9/ 11.7) 20 tadmc@augustmail.com
34.1 ( 9.3/ 22.4/ 12.4) 14 Chris Stith <mischief@velma.motion.net>
These posters accounted for 34.4% of the total volume.
Top 10 Posters by OCR (minimum of five posts)
==============================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
1.000 ( 6.7 / 6.7) 7 Rafael Garcia-Suarez <rgarciasuarez@free.fr>
0.999 ( 4.6 / 4.6) 7 "Scott R. Godin" <webmaster@webdragon.unmunge.net>
0.962 ( 2.1 / 2.1) 5 BUCK NAKED1 <dennis100@webtv.net>
0.960 ( 25.4 / 26.4) 26 abigail@foad.org
0.795 ( 4.7 / 5.9) 6 "Mr. Sunray" <djberge@uswest.com>
0.788 ( 11.9 / 15.1) 9 "Samuel Kilchenmann" <skilchen@swissonline.ch>
0.744 ( 2.6 / 3.4) 8 "Just in" <justin.devanandan.allegakoen@intel.com>
0.742 ( 7.4 / 10.0) 8 Logan Shaw <logan@cs.utexas.edu>
0.737 ( 3.6 / 4.9) 8 "Philip 'Yes, that's my address' Newton" <nospam.newton@gmx.li>
0.732 ( 5.1 / 7.0) 8 mgjv@tradingpost.com.au
Bottom 10 Posters by OCR (minimum of five posts)
=================================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.472 ( 4.7 / 10.0) 15 Randal L. Schwartz <merlyn@stonehenge.com>
0.466 ( 4.7 / 10.1) 12 Jon Ericson <Jonathan.L.Ericson@jpl.nasa.gov>
0.455 ( 2.4 / 5.2) 6 Tony Curtis <tony_curtis32@yahoo.com>
0.440 ( 1.6 / 3.6) 5 Eric Bohlman <ebohlman@omsdev.com>
0.436 ( 16.5 / 37.8) 41 Anno Siegel <anno4000@lublin.zrz.tu-berlin.de>
0.390 ( 13.6 / 34.8) 34 eins@durchnull.de
0.386 ( 2.2 / 5.6) 9 "flash" <bop@mypad.com>
0.367 ( 1.3 / 3.5) 5 John W Krahn <krahnj@acm.org>
0.347 ( 2.8 / 8.2) 8 Andras Malatinszky <andras@mortgagestats.com>
0.334 ( 1.2 / 3.4) 5 "Tom Beer" <tom.beer@btfinancialgroup.spamfilter.com>
46 posters (14%) had at least five posts.
Top 10 Threads by Number of Posts
=================================
Posts Subject
----- -------
35 Hacker challenge. Can you break this script for me?
25 Should Perl be first?
24 Help on optimization wanted
20 Strange string -> num conversion
19 Recursing a directory tree
18 one-line stderr, stdout redirection
18 Problem with the subroutine (closure?) for the "sort"
17 Hacker Challenge. Can you break this script for me?
14 How to: Create Regex which extracts N number of words before target word
13 Test for integer?
These threads accounted for 19.4% of all articles.
Top 10 Threads by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Subject
-------------------------- ----- -------
100.7 ( 32.3/ 66.7/ 41.9) 35 Hacker challenge. Can you break this script for me?
58.9 ( 23.3/ 32.3/ 19.0) 25 Should Perl be first?
52.0 ( 15.3/ 35.7/ 24.0) 17 Hacker Challenge. Can you break this script for me?
47.6 ( 20.8/ 25.1/ 16.6) 24 Help on optimization wanted
44.6 ( 20.4/ 21.3/ 11.1) 20 Strange string -> num conversion
39.5 ( 17.0/ 21.5/ 12.5) 18 Problem with the subroutine (closure?) for the "sort"
35.7 ( 15.5/ 19.7/ 12.5) 19 Recursing a directory tree
32.2 ( 16.5/ 13.5/ 7.1) 18 one-line stderr, stdout redirection
26.4 ( 13.2/ 12.1/ 6.7) 14 How to: Create Regex which extracts N number of words before target word
23.6 ( 9.7/ 13.1/ 9.1) 12 Downloading images with HTTP/LWP libraries
These threads accounted for 23.1% of the total volume.
Top 10 Threads by OCR (minimum of five posts)
==============================================
(kb) (kb)
OCR orig / body Posts Subject
----- -------------- ----- -------
0.843 ( 4.8/ 5.7) 7 Allocating people like in a cinema
0.822 ( 4.4/ 5.4) 9 Posting Guidelines for comp.lang.perl.misc ($Revision: 1.1 $)
0.811 ( 10.6/ 13.1) 5 Parsing
0.777 ( 8.1/ 10.4) 7 Algorithm ?
0.754 ( 5.5/ 7.2) 6 a few quick questions
0.739 ( 4.2/ 5.6) 7 Alorithm ? addendum
0.739 ( 2.0/ 2.7) 5 calling C functions
0.733 ( 7.3/ 10.0) 5 Passing references via recursion
0.723 ( 3.0/ 4.1) 7 Simple Regex
0.722 ( 4.1/ 5.7) 5 HELP - Please
Bottom 10 Threads by OCR (minimum of five posts)
=================================================
(kb) (kb)
OCR orig / body Posts Subject
----- -------------- ----- -------
0.489 ( 2.2 / 4.5) 5 Familiar with this perl fix permission script
0.488 ( 5.8 / 11.8) 13 Test for integer?
0.474 ( 5.2 / 10.9) 6 RegExp Teaser
0.473 ( 4.5 / 9.6) 10 Help slim down Perl code
0.472 ( 1.5 / 3.2) 5 Corrupted scripts Winows to UNIX
0.453 ( 2.9 / 6.4) 9 simple problem (ugh)
0.452 ( 3.8 / 8.4) 5 Removing attributes
0.429 ( 1.5 / 3.5) 5 prevent empty message being sent?
0.396 ( 1.7 / 4.3) 5 How to execute a perl script from a perl script? - nearly got it right !
0.395 ( 1.5 / 3.9) 6 RegEx optimization assistance
68 threads (25%) had at least five posts.
Top 10 Targets for Crossposts
=============================
Articles Newsgroup
-------- ---------
28 comp.lang.perl.modules
23 comp.lang.perl
14 alt.perl
10 alt.comp.perlcgi.freelance
9 alt.perl.sockets
4 fj.net.ldap
3 comp.lang.perl.tk
3 alt.perl.flame
3 de.comp.lang.perl.cgi
3 cz.comp.lang.perl
Top 10 Crossposters
===================
Articles Address
-------- -------
13 "Dodger" <dodger@necrosoft.net>
9 admin@webmeeters.net
9 "JohnB" <john@art-ave.com>
9 havoc <havoc@harrisdev.com>
4 morpheus@here.not.there
4 Daneel van Tonder <linuxos@ananzi.co.za>
4 dave turner <dt@area.com>
4 "Fermín" <perlNO-SPAM@NO-SPAMprogramacionweb.com>
4 "Philippe Hamel" <hamel@hotmail.com>
4 "Ralph Cranberry" <rcranberry@hotmail.com>
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
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.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V10 Issue 848
**************************************
