[17457] in Perl-Users-Digest
Perl-Users Digest, Issue: 4877 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Nov 13 11:05:32 2000
Date: Mon, 13 Nov 2000 08:05:11 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <974131510-v9-i4877@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Mon, 13 Nov 2000 Volume: 9 Number: 4877
Today's topics:
Re: A surprise with vec() (Martien Verbruggen)
Re: A surprise with vec() <iltzu@sci.invalid>
Re: activeperl: reading registry (Martien Verbruggen)
Re: activeperl: reading registry (Red Hat 6.2)
command line perl joelwebb@usa.net
Re: command line perl <frnack.caron@infineon.com>
form won't post locally <cchesnay@nospam_marune.swinternet.co.uk>
Re: FS: "Object Oriented Perl" <latsharj@my-deja.com>
Re: FS: "Perl Cookbook" <latsharj@my-deja.com>
Hanging when reading from socket <owen.sullivan@worldzap.com>
Re: Help about sending over 1000 mails error!! <lukus@hongkong.com>
Re: Help with HTML::Parser module <bart.lateur@skynet.be>
Re: How to call a perl script from HTML <iltzu@sci.invalid>
Re: How to force MSDOS window to stay open after perl? <bart.lateur@skynet.be>
Re: installing perl - help (Andy Dougherty)
Re: Link - the action after "?" (Rafael Garcia-Suarez)
looking for graphing script <andrew_pasetti@harvard.edu>
Re: module install problems with perl2exe on solaris akcrum@my-deja.com
New posters to comp.lang.perl.misc <gbacon@cs.uah.edu>
Not a CODE reference at /usr/share/lib/perl5/File/Find. <Gerard.Breiner@ias.fr>
Re: Perl programming of league tables ? <lmoran@wtsg.com>
Re: Perl syntax and beyond (was: Re: Perl style and mod (Ilya Zakharevich)
pos with s/// <eliseo@cocoon.ulpgc.es>
Re: pos with s/// espen@arne.nextel.no
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 13 Nov 2000 22:23:45 +1100
From: mgjv@tradingpost.com.au (Martien Verbruggen)
Subject: Re: A surprise with vec()
Message-Id: <slrn90vjq0.gs3.mgjv@martien.heliotrope.home>
On Mon, 13 Nov 2000 05:28:23 GMT,
Gwyn Judd <tjla@guvfybir.qlaqaf.bet> wrote:
> I was shocked! How could Martien Verbruggen <mgjv@tradingpost.com.au>
> say such a terrible thing:
>
>>unpack and vec work on the string part of a scalar. A perl scalar has
>>an integer part, and a string part, and Perl will convert on the fly.
>
> Dear god. I don't know if I should feel enlightened or appalled :) The
> documents should spell that out a bit more explicitly I think. Oh well I
> think I can say I sort of understand vec, pack and unpack now.
Well, you almost never have to worry about this sort of thing, since
perl will almost always do what you intended. There are some contexts in
which a scalar will always be used in a certain way (integer, double, or
string), and they are loosely documented, sometimes. You know that a
scalar is always treated as a string when it is used as a hash key, or
when you use it as an argument to length, or substr. Only in the case of
numeric functions, or purely numeric contexts (multiplication, addition,
numerical comparisons, array index, etc..) will a scalar be used as a
integer or double. Certain arguments to functions are always interpreted
as a number (chr, offset and length for substr, splice, etc.). In most
cases it is perfectly clear what you mean, and it is mostly clear to you
what the argument is supposed to be.
In the case of pack and vec, the situation is mostly the same. However,
there is a misunderstanding, because you're not as familiar with them,
and because you're probably used to thinking in bits in terms of
unsigned integers. In the case of vec(): it operates on an (almost)
arbitrarily long bit string. The word string is key here, and also
appears in the first sentence of the documentation on vec(). Whenever
the documentation says 'string' or 'number' or 'integer', you should
take that literally. Only when it uses the more vague 'EXPR' should you
wonder about what goes there, and how it will be interpreted. pack() and
unpack() also use the word 'string'.
Maybe it could be more explicit, but I don't believe it needs be.
Wherever a distinction needs to be made, it gets made, however subtly
:).
Of course, now I've posted this, someone will point out that function
foo() or function bar() actually doesn't mention whether it operates on
a string, integer or float. It won't if it's clear enough (abs(),
alarm(), atan2(), to name only a few), and for the rest: Well, the
documentation isn't perfect. Submit a patch :)
Martien
--
Martien Verbruggen |
Interactive Media Division | System Administration is a dirty job,
Commercial Dynamics Pty. Ltd. | but someone said I had to do it.
NSW, Australia |
------------------------------
Date: 13 Nov 2000 12:43:11 GMT
From: Ilmari Karonen <iltzu@sci.invalid>
Subject: Re: A surprise with vec()
Message-Id: <974118628.17898@itz.pp.sci.fi>
In article <slrn90vjq0.gs3.mgjv@martien.heliotrope.home>, Martien Verbruggen wrote:
[snip]
>scalar is always treated as a string when it is used as a hash key, or
>when you use it as an argument to length, or substr. Only in the case of
>numeric functions, or purely numeric contexts (multiplication, addition,
>numerical comparisons, array index, etc..) will a scalar be used as a
>integer or double. Certain arguments to functions are always interpreted
[snip]
Then there are the bitwise operators. They do both, by DWIMmery and
dark magic. Often they get it right, but.. let's just say that if you
want to do bitwise operations on strings, don't let the scalars get
anywhere near a numeric context.
print '$_ has', ($_^$_) ne 0 && "n't", " been used as a number.\n";
--
Ilmari Karonen -- http://www.sci.fi/~iltzu/
"Get real! This is a discussion group, not a helpdesk. You post
something, we discuss its implications. If the discussion happens to
answer a question you've asked, that's incidental." -- nobull in clpm
------------------------------
Date: Mon, 13 Nov 2000 22:31:39 +1100
From: mgjv@tradingpost.com.au (Martien Verbruggen)
Subject: Re: activeperl: reading registry
Message-Id: <slrn90vk8r.gs3.mgjv@martien.heliotrope.home>
On Mon, 13 Nov 2000 02:42:46 GMT,
gb <gbnews@arcticmail.com> wrote:
>
> The penguin is overrated,has crap usability and hci and doesn't
> recognise a lot of hardware.
It would be better if you emailed inflammatory offtopic material to the
poster directly. Inflammatory on-topic material could be acceptable.
Soothing and happy off-topic material probably could be accepted. But a
flame on a signature which isn't on-topic certainly isn't the right
thing to post.
> In ten years it might become as lean and mean as win95
> on a pc.
That said:
I never thought I'd see the words 'lean', 'mean' and 'win95' in one
sentence.
Note followups
Thank you.
Martien
--
Martien Verbruggen | Since light travels faster than
Interactive Media Division | sound, isn't that why some people
Commercial Dynamics Pty. Ltd. | appear bright until you hear them
NSW, Australia | speak?
------------------------------
Date: Mon, 13 Nov 2000 14:34:27 GMT
From: linuxuser@tux.org (Red Hat 6.2)
Subject: Re: activeperl: reading registry
Message-Id: <3a0ffa9f.69132548@nntp.unsw.edu.au>
On Mon, 13 Nov 2000 02:42:46 GMT, gbnews@arcticmail.com (gb) wrote:
>On Sun, 12 Nov 2000 12:42:44 -0500, H C <carvdawg@patriot.net> wrote:
>
>>Check the docs for Win32::TieRegistry
>>
>>EM wrote:
>>
>>> i have windows me with activeperl installed
>>> is there a way to read/write a key from the windows registry?
>>>
>>> thanks in advance
>>
>>--
>>Q: Why is Batman better than Bill Gates?
>>A: Batman was able to beat the Penguin.
>
>The penguin is overrated
No Argument. Idiots expecting a OS that they can plug in and use like
windows might as well stick with windows (or Corel Linux), and idiot
journalists who don't tell people that they will have to get off their
lazy arse and RTFM to get anywhere with linux should be shot.
>,has crap usability
Unless you get off your lazy arse and RTFM
> and hci and doesn't
>recognise a lot of hardware.
Then use kudzu. Or another hardware sensing program, for that matter.
>
>In ten years it might become as lean and mean as win95
>on a pc.
If 'lean and mean' means it would crash every ten minutes under a
heavy load and multiple programs, would not behave as it should
according to the relevant documentation, and force the user to do
things its way instead of the user's way, then I damn well hope it
doesn't.
>You Linux snobs cannot see past your own bias.
A) That does not seem a valid answer to the guy's question...
B) You are a tool.
>;->
>>
>
------------------------------------------------------------
"One World, one Web, one Program" - Microsoft promotional ad
"Ein Volk, ein Reich, ein Fuhrer" - Adolf Hitler .
------------------------------
Date: Mon, 13 Nov 2000 13:32:12 GMT
From: joelwebb@usa.net
Subject: command line perl
Message-Id: <8uoqgs$oq7$1@nnrp1.deja.com>
Hey guys,
I was wondering. Is there anyway to write a short script from the
command line without executing a script?
I was thinking of doing it like this /opt/perl5 -e whatever
Is this right??
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Mon, 13 Nov 2000 15:21:55 +0100
From: Caron Franck <frnack.caron@infineon.com>
Subject: Re: command line perl
Message-Id: <3A0FF903.580DA7D5@infineon.com>
/opt/perl -e 'your script'
for ex :
/opt/perl -r 'my $a = 2;my $b=3;$c = ($a+$b); print $c."\n";'
this will print
5
--franck
joelwebb@usa.net wrote:
> Hey guys,
>
> I was wondering. Is there anyway to write a short script from the
> command line without executing a script?
>
> I was thinking of doing it like this /opt/perl5 -e whatever
>
> Is this right??
>
> Sent via Deja.com http://www.deja.com/
> Before you buy.
------------------------------
Date: Mon, 13 Nov 2000 11:51:55 -0000
From: "chris chesnay" <cchesnay@nospam_marune.swinternet.co.uk>
Subject: form won't post locally
Message-Id: <RyQP5.2721$Ry5.391004@news3.cableinet.net>
Using a perl script to post form data, if the recipient is local to the
server, mail doesn't get sent.
Mail will be sent if the recipient is xxx@hotmail.com or any other no-local
recipient.
This occurs with 'mailx' or 'sendmail' as the mail software. The OS is a
debian build
any pointers on what to try to get despath to local email appreciated
dvb
------------------------------
Date: Mon, 13 Nov 2000 13:14:09 GMT
From: Dick Latshaw <latsharj@my-deja.com>
Subject: Re: FS: "Object Oriented Perl"
Message-Id: <8uopes$nt9$1@nnrp1.deja.com>
In article <8FE9EF726qx11cornelledu@132.236.56.8>,
qx11@cornell.edu (David) wrote:
> "Object Oriented Perl"
> by Damian Conway, Randal L. Schwartz (Foreword)
> Paperback - 490 pages (August 1999)
> Manning Publications Company; ISBN: 1884777791
> Brand New Condition, Asking $30
>
$27.42 from half.com with coupon 'superstar'.
--
Regards,
Dick
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Mon, 13 Nov 2000 13:13:23 GMT
From: Dick Latshaw <latsharj@my-deja.com>
Subject: Re: FS: "Perl Cookbook"
Message-Id: <8uopdf$nsv$1@nnrp1.deja.com>
In article <8FE9E6C71qx11cornelledu@132.236.56.8>,
qx11@cornell.edu (David) wrote:
> "Perl Cookbook"
> by Tom Christiansen, Nathan Torkington, Larry Wall
> Paperback - 794 pages 1 Ed edition (August 1998)
> O'Reilly & Associates; ISBN: 1565922433
> Brand New Condition, Asking $25
>
$23.42 form half.com with coupon'superstar'.
--
Regards,
Dick
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Mon, 13 Nov 2000 16:04:53 GMT
From: "Owen Sullivan" <owen.sullivan@worldzap.com>
Subject: Hanging when reading from socket
Message-Id: <FiUP5.3208$Nw6.9791@news.iol.ie>
I am writing a small test programs that sends HTTP requests, and reads
responses. I wish to send multiple requests prior to beginning reading the
responses, and for this reason I believe I cannot use the LWP modules.
So instead I have used the code below to read the responses. The responses
are successfully read. However, the program appears to hang after reading
the responses received. Does anyone know what the fix for this is? Thanks.
for (;;) {
for ($curpos = tell($remote); $_ = <$remote>;
$curpos = tell($remote)) {
print LOGFILE "Read: $_";
}
$remote->clearerr;
}
------------------------------
Date: Mon, 13 Nov 2000 21:00:28 +0800
From: "Regent Linus" <lukus@hongkong.com>
Subject: Re: Help about sending over 1000 mails error!!
Message-Id: <8uooj7$rip6@imsp212.netvigator.com>
Thanks..
It seems a system problem of RedHat6.2
I copy the script to run under RedHat5.2, it works fine.
"Logan Shaw" <logan@cs.utexas.edu> ¼¶¼g©ó¶l¥ó
news:8un42i$70l$1@boomer.cs.utexas.edu...
> In article <t0tnfbh8r27hdf@corp.supernews.com>,
> Arthur Dalessandro <adalessandro@odione.com> wrote:
> >Sounds like an O/S problem, more specifically a unix problem.
>
> Sounds more like a file descriptor leak to me.
>
> Also, sounds like the original poster is trying to invoke
> /usr/lib/sendmail 1000 times, which is really not necessary since you
> can open up an SMTP session (using Net::SMTP) and send several
> (hundreds of) messages over that same session.
>
> Or, I believe Mail::Internet objects have a smtpsend() method.
>
> Another option is to look at Mail::BulkMail.
>
> Yet another possibility is that the original poster doesn't want to
> send a zillion separate mail messages, but instead wants to send a
> single mail message to a zillion users. This will be more efficient
> anyway, especially if there are recipients who receive mail on the same
> server, since only one copy must be sent instead of several. In that
> case, the easiest method is to construct a message (with whatever
> headers you like), open up a Net::SMTP session, and then specify a
> zillion addresses when calling the recipient() method.
>
> Of course, info on all these modules can be found at
> http://search.cpan.org/ .
>
> - Logan
------------------------------
Date: Mon, 13 Nov 2000 15:17:51 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: Help with HTML::Parser module
Message-Id: <7e101t47tkpekq5gpjl91ijn45drfm5cv9@4ax.com>
Niklas Frykholm wrote:
>This is one of the things that are easy to do with my HTML::Transform package.
[code example snipped]
Gee, that code looks really neat. A lot more high-level, IMO, than the
raw way you have to process tags in HTML::Parser and XML::Parser, which
DON'T do any tag matching for you. You module does seem to do that.
--
Bart.
------------------------------
Date: 13 Nov 2000 13:10:00 GMT
From: Ilmari Karonen <iltzu@sci.invalid>
Subject: Re: How to call a perl script from HTML
Message-Id: <974120264.22806@itz.pp.sci.fi>
[Followups set to a more appropriate group.]
[Jeopardectomy NOT performed -- it's more appropriate this way.]
In article <3A0EDDA1.F4E8A876@alcatel.be>, David Hiskiyahu wrote:
>
>As such, I believe that HTML should have foreseen an explicit way
>of asking from a downloaded page to run a program and to include
>the output in the viewed page.
But there is one. It's called Server Side Includes. It doesn't
really have anything to do with HTML per se, but neither does the
problem you stated.
>Bill wrote:
>>
>> href="/cgi-bin/myfile.pl"
>> When I do that it simply dispalys the perl program.
..and _that_ problem, of course, has nothing to do with _either_ HTML
or SSI, although it is somewhat closer to the latter, being a server
configuration issue.
Obviously your webserver thinks the URL above points to a page to be
served directly rather than to a script to be executed. You should
ask your system administrator how to set up a CGI script on your
server. If it's your own box, you'll have to look into the docs for
your httpd and possibly search the web for reports of similar problems
others may have experienced before.
--
Ilmari Karonen -- http://www.sci.fi/~iltzu/
"Get real! This is a discussion group, not a helpdesk. You post
something, we discuss its implications. If the discussion happens to
answer a question you've asked, that's incidental." -- nobull in clpm
------------------------------
Date: Mon, 13 Nov 2000 15:21:03 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: How to force MSDOS window to stay open after perl?
Message-Id: <jm101tgjmp4n3pq4ki3jt815lu3bkpu9nq@4ax.com>
Malte Ubl wrote:
>At end of program:
>
>my $bla = <STDIN>;
Or:
END {
<STDIN> if -t STDOUT;
}
--
Bart.
------------------------------
Date: Mon, 13 Nov 2000 14:34:34 -0000
From: doughera@maxwell.phys.lafayette.edu (Andy Dougherty)
Subject: Re: installing perl - help
Message-Id: <slrn90vv1o.vj.doughera@maxwell.phys.lafayette.edu>
In article <bRDP5.133263$ib7.17949325@news1.rdc1.nj.home.com>, Maqo wrote:
>#!/usr/bin/perl
>print "Hello, world!\n"
>
>fails to produce any output when executed. Am I possibly missing something?
I'm going to take you literally at your statement 'fails to produce
any output when executed', i.e. you don't get any 'not found' or
'permission denied' or other such messages, you get no output
whatsoever.
Are you calling your test program "test" by any chance? "test" is a
shell built-in and will get run instead of your test program unless
you explicitly call your test program by something like
/full/path/to/my/test or ./test.
Try using a different name for your test program, e.g. 'try' and then
try executing it with the path included, e.g.
./try
and see how it goes.
Hope this helps,
--
Andy Dougherty doughera@lafayette.edu
Dept. of Physics
Lafayette College, Easton PA 18042
------------------------------
Date: Mon, 13 Nov 2000 11:05:43 GMT
From: rgarciasuarez@free.fr (Rafael Garcia-Suarez)
Subject: Re: Link - the action after "?"
Message-Id: <slrn90vipo.8qn.rgarciasuarez@rafael.kazibao.net>
Calvin wrote in comp.lang.perl.misc:
>If visit http://www.myserver.com/cgi-bin/main.pl?action=new then print "New"
>if visit http://www.myserver.com/cgi-bin/main.pl?action=old then print "Old"
>I don't know why the following program can't work, please help. Thanks.
>[Sorry! My English is not enough]
>
>#!/usr/bin/perl
>
>print "Content-type: text/html\n\n";
>
>if ($in{'action'} ne "new") {
>print "New";
>exit;
>}
>
>elsif ($in{'action'} ne "old") {
>print "Old";
>exit;
>}
>
>else {
>print "Not New and Old";
>exit;
>}
You never define the %in hash.
Putting 'use strict' at the beginning of your script would have told
you this error.
To get the script parameters, use the CGI module :
use strict;
use CGI;
my $q = new CGI;
my $action = $q->param('action');
print $q->header();
if ($action eq 'new') { # use 'eq' and not 'ne'.
print "New"; exit;
}
...
The documentation for CGI.pm is already installed on your system, probably
accessible with the command 'perldoc CGI'.
--
# Rafael Garcia-Suarez / http://rgarciasuarez.free.fr/
------------------------------
Date: Mon, 13 Nov 2000 10:36:49 -0500
From: "Andrew Pasetti" <andrew_pasetti@harvard.edu>
Subject: looking for graphing script
Message-Id: <8up21l$74e$1@plato.harvard.edu>
I'm looking for a reliable graphing script to graph network performance. Can
someone make a few recommendations?
Thanks!
Andrew
andrew_pasetti@harvard.edu
------------------------------
Date: Mon, 13 Nov 2000 14:57:41 GMT
From: akcrum@my-deja.com
Subject: Re: module install problems with perl2exe on solaris
Message-Id: <8uovh1$sua$1@nnrp1.deja.com>
In article <3a0cd6c0.985967@news.ionet.net>,
mag@ionet.net (Maggert) wrote:
> On Fri, 10 Nov 2000 22:00:00 GMT, akcrum@my-deja.com wrote:
>
> >Hi -
> >
> >I'm using perl2exe on a Solaris (SunOS) platform.
> >I'm in need of the Storable.pm module
> >(but this problem is not limited to a particular module).
> >My attempt to do 'perl Makefile.PL' as 1st step of install results
in:
> >---
> >Error: Unable to locate installed Perl libraries or Perl source code.
> >...
> >(You get this message, because MakeMaker could not
> >find "/users/is/isingh/p2x553/SunOS/perl2exe/perl5/lib/5.00503/sun4-
> >solaris/CORE/perl.h")
> >---
> >
> Perl2exe has it's own perl binaries. You need to copy
> Storable.pm to the location its supposed to be in that binary. It
> doesn't use the Perl thats already on your system.
>
> MP
>
Thanks for your response.
I agree with what you've said. BUT, there's a twist...
If I need a module that is fully represented by a single .pm file,
I can do as you say.
The issue I've encountered with Storable.pm is that it creates
additional library (compiled C I suspect) files during the make process.
So, I need to somehow get the whole set of files supporting the module
to the appropriate perl2exe directories.
I thought about building Storable.pm in my 'regular' Perl environment
and going through the unwelcome task of tracking down what files were
created during the make and copying them into the perl2exe environ.
Instead, I decided to write the original posting on this thread and
contact IndigoStar support to see if I could eventually succeed in
doing the module install directly into the perl2exe environ.
and if you have a followup to this, now
knowing what is unique about Storable.pm, I'd welcome it.
- Andrew
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Mon, 13 Nov 2000 15:56:51 -0000
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: New posters to comp.lang.perl.misc
Message-Id: <t103q39okcmbd2@corp.supernews.com>
Following is a summary of articles from new posters spanning a 7 day
period, beginning at 06 Nov 2000 15:43:19 GMT and ending at
13 Nov 2000 13:57:03 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) 2000 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: 168 (40.4% of all posters)
Articles: 287 (21.9% of all articles)
Volume generated: 532.2 kb (22.2% of total volume)
- headers: 223.0 kb (4,496 lines)
- bodies: 301.1 kb (10,241 lines)
- original: 209.3 kb (7,494 lines)
- signatures: 7.8 kb (173 lines)
Original Content Rating: 0.695
Averages
========
Posts per poster: 1.7
median: 1.0 post
mode: 1 post - 115 posters
s: 2.5 posts
Message size: 1898.7 bytes
- header: 795.7 bytes (15.7 lines)
- body: 1074.3 bytes (35.7 lines)
- original: 746.8 bytes (26.1 lines)
- signature: 27.7 bytes (0.6 lines)
Top 10 Posters by Number of Posts
=================================
(kb) (kb) (kb) (kb)
Posts Volume ( hdr/ body/ orig) Address
----- -------------------------- -------
24 48.5 ( 21.1/ 24.4/ 9.4) Christopher Burke <craznar@hotmail.com>
8 10.4 ( 4.3/ 6.1/ 4.8) vidulats@yahoo.co.uk
7 14.2 ( 5.4/ 8.7/ 6.0) "Kurt Stephens" <kstep@pepsdesign.com>
6 17.5 ( 5.7/ 11.8/ 7.4) Rich Parker <RichParker@fssi-ca.com>
6 12.7 ( 6.0/ 6.7/ 3.5) "Geoff Winkless" <geoff-at-farmline-dot-com@127.0.0.1>
5 5.4 ( 4.4/ 0.9/ 0.9) David <qx11@cornell.edu>
5 11.7 ( 4.7/ 7.0/ 3.0) "Paulgee" <paul.g@cableinet.co.uk>
4 4.9 ( 3.2/ 1.7/ 1.7) Milan Miladinovic <vortex@ptt.yu>
3 6.9 ( 3.2/ 3.0/ 1.6) Ilmari Karonen <usenet11274@itz.pp.sci.fi>
3 4.4 ( 2.7/ 1.6/ 0.4) Bertrand =?iso-8859-1?Q?Vall=E9?= <bertrand.valle@travelprice.com>
These posters accounted for 5.4% of all articles.
Top 10 Posters by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Address
-------------------------- ----- -------
48.5 ( 21.1/ 24.4/ 9.4) 24 Christopher Burke <craznar@hotmail.com>
26.1 ( 1.5/ 24.6/ 22.4) 2 mshemer@my-deja.com
17.5 ( 5.7/ 11.8/ 7.4) 6 Rich Parker <RichParker@fssi-ca.com>
14.2 ( 5.4/ 8.7/ 6.0) 7 "Kurt Stephens" <kstep@pepsdesign.com>
13.2 ( 0.7/ 12.5/ 5.6) 1 Dan <imfro@hotmail.com>
12.7 ( 6.0/ 6.7/ 3.5) 6 "Geoff Winkless" <geoff-at-farmline-dot-com@127.0.0.1>
11.7 ( 4.7/ 7.0/ 3.0) 5 "Paulgee" <paul.g@cableinet.co.uk>
10.4 ( 4.3/ 6.1/ 4.8) 8 vidulats@yahoo.co.uk
9.7 ( 2.1/ 7.6/ 1.3) 3 "preetham" <preetham@india.hp.com>
9.7 ( 0.5/ 9.2/ 9.1) 1 azilber@ccgxm.com
These posters accounted for 7.3% of the total volume.
Top 10 Posters by OCR (minimum of three posts)
==============================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
1.000 ( 0.9 / 0.9) 5 David <qx11@cornell.edu>
1.000 ( 1.7 / 1.7) 4 Milan Miladinovic <vortex@ptt.yu>
0.896 ( 1.3 / 1.4) 3 "Frank Schlicht" <fschlicht@tourisline.de>
0.849 ( 3.6 / 4.3) 3 Jan Schaumann <jschauma@www.netmeister.org>
0.789 ( 1.7 / 2.2) 3 Chris <cpr@intergate.ca>
0.785 ( 4.8 / 6.1) 8 vidulats@yahoo.co.uk
0.775 ( 4.2 / 5.5) 3 dhartsough@my-deja.com
0.697 ( 1.6 / 2.4) 3 Ilmari Karonen <usenet11273@itz.pp.sci.fi>
0.682 ( 6.0 / 8.7) 7 "Kurt Stephens" <kstep@pepsdesign.com>
0.662 ( 1.0 / 1.5) 3 gb <gbnews@arcticmail.com>
Bottom 10 Posters by OCR (minimum of three posts)
=================================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.495 ( 1.4 / 2.8) 3 Olivier LACROIX <Olivier.Lacroix@ciril.fr>
0.468 ( 1.8 / 3.9) 3 David Combs <dkcombs@panix.com>
0.430 ( 1.2 / 2.9) 3 "Phil Latio" <support@bedroomisp.co.uk>
0.424 ( 3.0 / 7.0) 5 "Paulgee" <paul.g@cableinet.co.uk>
0.386 ( 9.4 / 24.4) 24 Christopher Burke <craznar@hotmail.com>
0.363 ( 1.1 / 3.1) 3 thamus <thamus@my-deja.com>
0.325 ( 0.9 / 2.7) 3 "Matt Perzel" <thectrain@hotmail.com>
0.298 ( 0.8 / 2.7) 3 otuzow@my-deja.com
0.263 ( 0.4 / 1.6) 3 Bertrand =?iso-8859-1?Q?Vall=E9?= <bertrand.valle@travelprice.com>
0.169 ( 1.3 / 7.6) 3 "preetham" <preetham@india.hp.com>
25 posters (14%) had at least three posts.
Top 10 Targets for Crossposts
=============================
Articles Newsgroup
-------- ---------
23 comp.lang.perl
17 alt.perl
14 comp.lang.perl.modules
10 misc.books.technical
10 alt.books.technical
8 comp.lang.perl.tk
6 comp.text.pdf
4 de.comp.lang.perl.misc
3 comp.lang.perl.moderated
2 comp.text.xml
Top 10 Crossposters
===================
Articles Address
-------- -------
20 David <qx11@cornell.edu>
7 "Paulgee" <paul.g@cableinet.co.uk>
2 Aandi Inston <quite@dial.pipex.com>
1 Ilmari Karonen <usenet11273@itz.pp.sci.fi>
1 Bjoern Hoehrmann <derhoermi@gmx.net>
1 Anton Dischner <dischner@klch.med.uni-muenchen.de>
1 preetham@mailcity.com
1 Sune <sune_stromming@my-deja.com>
1 Ole Bjerregaard <olh@kms.dk>
1 "Steve Jones" <stevej@proact.net>
------------------------------
Date: Mon, 13 Nov 2000 15:20:27 +0100
From: Gerard Breiner <Gerard.Breiner@ias.fr>
Subject: Not a CODE reference at /usr/share/lib/perl5/File/Find.pm
Message-Id: <3A0FF8AB.A400D08@ias.fr>
Hello,
Someone has it ever seen this message in running script Perl:
"Not a CODE reference at /usr/share/lib/perl5/File/Find.pm"
My script use the module File::Find.
with the perl 5.6.0 over linux no problem
with the perl 5.004 over irix 6.5 I get the message above.
An Idea ?
Regards
Gerard Breiner
------------------------------
Date: Mon, 13 Nov 2000 09:53:08 -0500
From: Lou Moran <lmoran@wtsg.com>
Subject: Re: Perl programming of league tables ?
Message-Id: <iuvv0tc20u6vb53406gkc8blcbfksevt0r@4ax.com>
On Sat, 11 Nov 2000 23:05:18 -0000, "Phil Latio"
<support@bedroomisp.co.uk> wrote wonderful things about sparkplugs:
>Has anyone seen any tutorials that covers programming of league tables ?
>
>The basic idea is that the local Sunday league I play football in wants to
>put a simple form on a web page so home captains can submit results into a
>database which can then output a league table. I've searched the web and I
>am surprised to find absolutely nothing on this subject.
>
>My thoughts are of saving the results to a MySQL database so I am going to
>download all the Perl DBI info and see where that takes me but if anyone has
>embarked on such a scheme, I would be grateful for a few pointers.
Pick up the book MySQL by DuBois (New Riders) and learn what you need
from there. The book has a grade keeping project that's fairly close
to a league and it uses MySQL, Perl, Perl DBI and PHP all of which
you'll need to make the app and get it on the web,
>
>Cheers
>
>Phil
>
"Ow, ow, stupid trash, rotten, stinky, hate world, revenge soon,
take out on everyone..."
lmoran@wtsg.com
------------------------------
Date: 13 Nov 2000 03:57:45 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Perl syntax and beyond (was: Re: Perl style and module searches)
Message-Id: <8unorp$7me$1@charm.magnus.acs.ohio-state.edu>
I wrote in article <8un78n$2c0$1@charm.magnus.acs.ohio-state.edu>:
> And I already killed at least 50% of the problem by the weak
> references. Another 50% does not look "easily" manageable outside of
> the user space... Basically, one needs to duplicate the refcounts
> infrastructure in the user space.
>
> Here is how a "graph" object may look like:
>
> 0) There is one special "umbrella" hash with keys being the
[...]
I busted it (though I underspecified the problem, so it may be not
that easy to find out)... Some time ago I reversed my opinion that
linked lists in Perl need some additional support in the kernel, but
this example of mine shows that this reversal was erroneous.
Let me formulate the problem with a "graph": you have some collection
of objects. Each of them may "reference" some other objects of this
collection. Restrict this "reference" to be done in one particular
way (say, as values of a hash $object->{hash}{$key}) - just to make it
easier to control. Some of these objects may be also referenced from
the outside world.
[Each of these objects may also mention some *unique* "instance data",
but this does not concern us now, since there is no problem with
refcounting unique data.]
Objective: provide a way of bookkeeping data which:
a) allows methods for addition/removal of new inter-collection references;
b) allows methods for addition/removal of new object in the collection;
c) whenever an object becomes not reachable from the outside world
(via references from outside chained with inter-collection
references), DESTROY should be called;
Even if the structure of the graph is immutable, and it is a cycled
linked list 1 -> 2 -> 1, I do not see any way to do this without
additional support from the kernel.
Say, suppose we know from the start that 1 is referenced from the
outside world. So we make the reference 2 -> 1 into a weak reference,
so that when this reference goes away, the whole list is destroyed.
However, suppose somebody stores a reference to the object2
$obj2 = $obj1->{next};
then destroys the reference to object1: $obj1 = 12. We need to detect
this situation, and make the reference 2 -> 1 strong, but the
reference 1 -> 2 weak. How can we detect it?
One possible way to design such a core support may be to allow DESTOY
to "vivify" the destroyed object. (So do the strengthening/weakening
in DESTROY.) I prohibited this (by a patch 5 years ago) since this
was leading to horrible very hard to trace segfaults in the core.
Maybe it is time to reconsider this?
But still it is hard to distinguish this case with the last reference
going away... In *this* particular case it may be distinguished since
strengthening/weakening will go across the cycle, and will eventually
lead to a recursive DESTROY call - which is easy to detect. Very
computationally unefficient...
But I have no idea whether this is viable to do with a general graph...
Ilya
------------------------------
Date: 13 Nov 2000 12:57:03 -0100
From: Juan Eliseo Carrasco =?iso-8859-1?Q?D=EDaz?= <eliseo@cocoon.ulpgc.es>
Subject: pos with s///
Message-Id: <3A0FE588.FB85DFAB@cocoon.ulpgc.es>
There is any way to use s/// and get the pos.
I use s/// to find and replace a word, then I would like to find (with
m//g) from the last match.
------------------------------
Date: 13 Nov 2000 15:10:50 +0100
From: espen@arne.nextel.no
Subject: Re: pos with s///
Message-Id: <m3ofzk55ed.fsf@arne.nextel.no>
>There is any way to use s/// and get the pos.
> I use s/// to find and replace a word, then I would like to find (with
>m//g) from the last match.
you can use s/\G$out/$in/g but I think there is a bug in perl5.6 and perl5.005
so it wont work in taint-mode unless you oprate on a global variable.
\G causes pos to be set.
--
espen
------------------------------
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 4877
**************************************
