[10182] in Perl-Users-Digest
Perl-Users Digest, Issue: 3775 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Sep 21 11:07:19 1998
Date: Mon, 21 Sep 98 08:00:22 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Mon, 21 Sep 1998 Volume: 8 Number: 3775
Today's topics:
Any hash function out there ? boubaker@dgac.fr
Re: Any hash function out there ? <jdf@pobox.com>
Re: assigning file contents to a string (Greg Bacon)
Can I use perl to run htpasswd for Apache user authenti <Wayne.Schuller@BusEco.monash.edu.au>
Re: CGI <evonzee@tritechnet.com>
Development environment <kar@webline.dk>
Re: Each %HASH question dave@mag-sol.com
Re: even/odd numbers (Michael J Gebis)
Re: even/odd numbers (John Moreno)
Re: even/odd numbers <tchrist@mox.perl.com>
Hash of arrays... mhourahi@ca.ibm.com
Re: Hash of arrays... <gp@gpsoft.de>
Re: Hash of arrays... <jdf@pobox.com>
Re: Hash of arrays... <ajohnson@gpu.srv.ualberta.ca>
Re: Help with perl hashes of hashes and arrays of hashe <ajohnson@gpu.srv.ualberta.ca>
Re: how do I create a new process and then exit the exi <jdf@pobox.com>
HTTP-REFERER one step too late gambler13@my-dejanews.com
Re: I need a script writen, can someone help me please (Gareth Hall)
Re: Need help with a simple program (newbie). droby@copyright.com
New posters to comp.lang.perl.misc <gbacon@cs.uah.edu>
O'Reilly's Win32 Perl Resouce Kit (David Cole)
Re: O'Reilly's Win32 Perl Resouce Kit scott@softbase.com
Re: O'Reilly's Win32 Perl Resouce Kit (Nathan V. Patwardhan)
Re: O'Reilly's Win32 Perl Resouce Kit scott@softbase.com
Re: Perl & Java - differences and uses <pats@acm.org>
Re: Perl & Java - differences and uses (Brent A Ellingson)
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 21 Sep 1998 13:37:55 GMT
From: boubaker@dgac.fr
Subject: Any hash function out there ?
Message-Id: <6u5krj$t2o$1@nnrp1.dejanews.com>
hi,
I'm looking for a hash string function or better for an access to perl
internal hash function any ideas ?
My problem is that I want to generate unique ids for a list of string (that
are guaranteed to be always different) that my program receive `on the fly'
(and even on multiples instances of my program), $id = $^T$$; is not good
because strings could arrive very quickly ($^T not precise enough), and
before reinventing the wheel I expected that there is a faster and cleaner
and safer way by using perl internal hash function.
regards
--
- heddy -
- <URL: http://www.cenatls.cena.dgac.fr/~boubaker/>
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: 21 Sep 1998 16:31:39 +0200
From: Jonathan Feinberg <jdf@pobox.com>
To: boubaker@dgac.fr
Subject: Re: Any hash function out there ?
Message-Id: <m3zpbtsfjo.fsf@joshua.panix.com>
boubaker@dgac.fr writes:
> I'm looking for a hash string function or better for an access to perl
> internal hash function any ideas ?
use B 'hash';
$h = hash('some string');
However, the result is certainly *not* unique for all strings, and is
therefore probably not what you want.
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf
------------------------------
Date: 21 Sep 1998 14:28:34 GMT
From: gbacon@itsc.uah.edu (Greg Bacon)
Subject: Re: assigning file contents to a string
Message-Id: <6u5nqi$ia6$4@info.uah.edu>
In article <6ttqu1$jni$1@monet.op.net>,
mjd@op.net (Mark-Jason Dominus) writes:
: Ali made a mistake. He meant to say
:
: { local $/ = undef; $string = <FILE> }
He might express that a little more concisely:
{ local $/; $string = <FILE> }
Greg
--
I used to be sad because I had no woman. Then I met a man who had no hands.
-- Rick Riebs
------------------------------
Date: Mon, 21 Sep 1998 21:28:02 +1000
From: Wayne Schuller <Wayne.Schuller@BusEco.monash.edu.au>
Subject: Can I use perl to run htpasswd for Apache user authentication?
Message-Id: <36063842.5BAFCC@BusEco.monash.edu.au>
hi all,
How can I use perl to interact with the htpasswd command?
I can't seem to get it to work...
My simple code looks like this:
$name = "testname";
$passwd = "testpassword";
open (HTPASSWD, "|htpasswd -c users $name");
print HTPASSWD "$passwd\n";
print HTPASSWD "$passwd\n";
close (HTPASSWD);
This kind of works. It creates the 'users' file and looks like it has
worked. I can even see the entry in the users file! But of course the
authentication doesn't work. The name appears correctly, but for some
reason the password must be wrong!?
When I use the htpasswd with the command line it works fine, so this
isn't an apache config problem.
Please help.. Via email please, I can't sift through all this newsgroup!
thanks,
wayne
------------------------------
Date: Mon, 21 Sep 1998 09:57:29 -0500
From: Eric Von Zee <evonzee@tritechnet.com>
Subject: Re: CGI
Message-Id: <36066959.D86757E3@tritechnet.com>
Best book I ever read on Perl was 'Perl5 Quick Reference Guide', by
Micheal o Foghlu. If you're looking for examples and walkthoughs, look
elsewhere, but if you're a newbie at Perl but have some programming
experience this is a great book. Lists every command, function,
operator, and special variable. If you learn like I do (read once,
understand forever) this is the book for you.
Cheers,
Eric
Drew Simonis - US Internet Support wrote:
> Anyone know a good reference book for CGI programming?
>
> Regards
--
Best Regards,
Tritech Marketing Inc.
Eric Von Zee
Webmaster
------------------------------
Date: Mon, 21 Sep 1998 13:17:25 +0200
From: Kaare Rasmussen <kar@webline.dk>
Subject: Development environment
Message-Id: <360635C5.903B7766@webline.dk>
I wonder what development environment people are using for writing Perl
code. Of course I know that there are as many answers as there are
programmers (almost), but maybe I can get some hints.
I like vim and have tried to implement 5.2 that should enable some
language features. Unfortunately I don't know how to enable them, so it
just sits there like plain "old" vim. Anyone tried this with success?
Or tried another editor, IDE or whatever.
I'm using Linux.
------------------------------
Date: Mon, 21 Sep 1998 11:11:18 GMT
From: dave@mag-sol.com
Subject: Re: Each %HASH question
Message-Id: <6u5c8m$ihk$1@nnrp1.dejanews.com>
In article <3605821B.FBB47AA7@iprolink.ch>,
Millioud Martial <alby@iprolink.ch> wrote:
> Hello,
>
> I've got some problems with this code :
>
> while(($key,$value) = each %input) {
> print "Yes" if $key eq 'True';
> print "No" if $value eq 'False';
> }
>
> We assume that $Key = 'True' and $value = 'False'
> It seems like the if doesn't work with $value. "Yes" is print but the
> "No" is not print though $value does equal 'False'. Someone could
> explain to me why ?
> Thanks for your help.
Seems to work ok for me. I guess the problem will be in the code that
populates the hash. Given that the hash is called %input, I'm guessing that
maybe you're reading stuff from a command line or prompt and perhaps
forgetting that you may need to 'chomp' the newline character from the input.
Therefore $value might contain "False\n" and therefore the match fails.
Of course this is all supposition. Post the code that populates the hash.
Dave...
--
dave@mag-sol.com
London Perl M[ou]ngers: <http://www.mag-sol.com/London.pm/>
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: 21 Sep 1998 06:33:55 GMT
From: gebis@fee.ecn.purdue.edu (Michael J Gebis)
Subject: Re: even/odd numbers
Message-Id: <6u4s0j$1b9@mozo.cc.purdue.edu>
gbacon@itsc.uah.edu (Greg Bacon) writes:
}If you're not a programmer, you shouldn't be using Perl. Programming
}languages are tools for programmers. I apologize if people see that as
}an elitist statement, but it's true. The mere act of picking up a
}toolbox doesn't make me an auto mechanic. Would you let me work on your
}car just because I had a set of tools? I have a pair of scissors at
}home; you should let me cut your hair.
MacGyver would be disappointed in you. No, I wouldn't let you work on
MY car, but I'd let you work on YOUR car, and I'd even let you ask me
stupid questions. Then again, I might reserve the right to make fun
of your stupid questions. :)
In any case, I would definitely not try to discourage you from
learning how to fix your car, just as I will tell Scott to continue to
learn perl. Of course, a good book and a bit of legwork will save
you from a lot of teasing.
--
Mike Gebis gebis@ecn.purdue.edu mgebis@eternal.net
------------------------------
Date: Mon, 21 Sep 1998 10:12:53 -0500
From: phenix@interpath.com (John Moreno)
Subject: Re: even/odd numbers
Message-Id: <1dfpa3k.bgmi2x1og0668N@roxboro0-036.dyn.interpath.net>
Dan Nguyen <nguyend7@msu.edu> wrote:
> John Moreno <phenix@interpath.com> wrote:
> : "modulus" is of course the easiest and most straightforward way of
> : finding out, but it's hardly the only (although the most obvious way
> : would much simpler if perl had a div command like pascal).
>
> I don't think that perl needs another operator like div.
> You can do
> {
> use integer;
>
> }
>
> And then do your division. Doing something like
> is_odd := num - ((num div 2) * 2); (*in pascal*)
>
> is_even := ((num / 2) = (num div 2));
>
The reason I'd like to have a div operator is to make it easy to do
integer division on a single line. Currently you can either block it
out, or type cast or otherwise fix it ($num =~ s/\..+/;). The type cast
is probably currently the cleanest way of doing it on one line at the
moment - I just think that having a explict "divide with integer
results" would be a good idea. It's one of the few things I miss about
pascal when using perl.
> Isn't really very clear.
Maybe not the is_odd test, but the is_even test seems perfectly clear to
me.
--
John Moreno
------------------------------
Date: 21 Sep 1998 14:30:28 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: even/odd numbers
Message-Id: <6u5nu4$gtg$1@csnews.cs.colorado.edu>
:The reason I'd like to have a div operator is to make it easy to do
:integer division on a single line. Currently you can either block it
:out, or type cast or otherwise fix it ($num =~ s/\..+/;). The type cast
:is probably currently the cleanest way of doing it on one line at the
:moment - I just think that having a explict "divide with integer
:results" would be a good idea.
That's what int() is for.
--tom
--
s = (char*)(long)retval; /* ouch */
--Larry Wall in doio.c from the perl source code
------------------------------
Date: Mon, 21 Sep 1998 13:51:30 GMT
From: mhourahi@ca.ibm.com
Subject: Hash of arrays...
Message-Id: <6u5ll2$tq4$1@nnrp1.dejanews.com>
Hi, everybody! Is it possible to make a hash of arrays? If so, how do
create it? reference it?
I'm trying to store table such as:
foo 1 3 4
bar 2 4 5
foz 4 9 3
baz 3 6 2
and then directly reference the numbers associated with foo, bar, etc.
Any help would be greatly appreciated...
thanks
Mike Hourahine
mhourahi@ca.ibm.com
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Mon, 21 Sep 1998 16:19:25 +0100
From: Guenther Pewny <gp@gpsoft.de>
Subject: Re: Hash of arrays...
Message-Id: <36066E7C.C96E2325@gpsoft.de>
mhourahi@ca.ibm.com schrieb:
> Hi, everybody! Is it possible to make a hash of arrays? If so, how do
> create it? reference it?
%h = ( # the hash
foo => [1, 3, 4], # square brackets create REFERENCES
bar => [2, 4, 5], # to new arrays (vs. round brackets)
foz => [4, 9, 3],
baz => [3, 6, 2]
);
# long, unefficient version for explanation:
@keylist = keys(%h); # 'keys' returns an array of all keys ('foo', 'bar',...)
foreach $key (@keylist) { # $key loops through all of them
print "$key:"; # print out the key
$values_ref = $h{$key}; # get the value accociated with this key
# this value is a reference to an array
@values = @{$values_ref}; # dereference it and copy the array to '@values'
foreach $val (@values) { # $val loops through the contents of this array
print " $val"; # print out the value
} # ...next value
print "\n"; # line feed after dataset
} # ...next key
# short, more efficient version:
foreach $key (keys(%h)) {
print "$key: " . join(' ', @{$h{$key}}) . "\n";
}
------------------------------
Date: 21 Sep 1998 16:32:32 +0200
From: Jonathan Feinberg <jdf@pobox.com>
To: mhourahi@ca.ibm.com
Subject: Re: Hash of arrays...
Message-Id: <m3ww6xsfi7.fsf@joshua.panix.com>
mhourahi@ca.ibm.com writes:
> Hi, everybody! Is it possible to make a hash of arrays? If so, how do
> create it? reference it?
These questions are all answered in the docs. See perlref, perllol,
and perldsc for starters.
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf
------------------------------
Date: Mon, 21 Sep 1998 09:30:22 -0500
From: Andrew Johnson <ajohnson@gpu.srv.ualberta.ca>
Subject: Re: Hash of arrays...
Message-Id: <360662FE.60548614@gpu.srv.ualberta.ca>
mhourahi@ca.ibm.com wrote:
!
! Hi, everybody! Is it possible to make a hash of arrays? If so, how do
! create it? reference it?
yes, please see the following documentation included in perl
distributions:
perldoc perlref (references)
perldoc perllol (lists of lists)
perldoc perldsc (datastructures)
hope that helps
regards
andrew
------------------------------
Date: Mon, 21 Sep 1998 04:04:10 -0500
From: Andrew Johnson <ajohnson@gpu.srv.ualberta.ca>
Subject: Re: Help with perl hashes of hashes and arrays of hashes etc
Message-Id: <3606168A.6D6EC1EA@gpu.srv.ualberta.ca>
Brent Perschbacher wrote:
>
[snip]
> method, so my dynamic declaration of this program must be broken, but I
> still don't see where.
>
> #! /usr/bin/perl
[snip]
> @database = ();
so you set your @database array to an empty list before
assigning your data ... everytime you call getdata()
you are wiping it out.
regards
andrew
------------------------------
Date: 21 Sep 1998 16:23:37 +0200
From: Jonathan Feinberg <jdf@pobox.com>
To: rebel <rebelvideo@hotmail.com>
Subject: Re: how do I create a new process and then exit the existing?
Message-Id: <m33e9ltuhi.fsf@joshua.panix.com>
rebel <rebelvideo@hotmail.com> writes:
> How do I call another script from my running script and then exit the
> existing script, Without waiting for the other script to finish.
Perhaps the FAQ "How do I start a process in the background?" in
perlfaq8 will lead you to a solution.
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf
------------------------------
Date: Mon, 21 Sep 1998 11:33:03 GMT
From: gambler13@my-dejanews.com
Subject: HTTP-REFERER one step too late
Message-Id: <6u5dhf$k7m$1@nnrp1.dejanews.com>
I am trying to create a simple script to track where my visitors were referred
from.
The home page of a site is http://www.it-help.demon.co.uk/cctv/index.html
I cannot use CGI on this site, but can of course refer to another site where I
can have cgi scripts.
The page menu.html which is part of a frameset call the script at www.cctv-
information.co.uk/cgi-bin/wrightlg.cgi to return a gif. Meanwhile, it should
log the HTTP-REFERER into a text file.
The trouble is, it always logs http://www.it-help.demon.co.uk/cctv/menu.html
as the REFERER..... ie, the page the script was called from.... I was hoping
for the site which linked to the menu/index page.... Is this simply because
I'm making a "REFER" to another web server to call the script? Is there any
way to trick this HTTP-REFERER to go back 2 steps for instance?
Any help greatly appreciated j.solly@it-help.demon.co.uk
Many thanks in advance,
Jeremy Solly
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Mon, 21 Sep 1998 09:55:50 GMT
From: guruchoc@bigpond.com (Gareth Hall)
Subject: Re: I need a script writen, can someone help me please
Message-Id: <36072233.11357840@news.bigpond.com>
On Sat, 19 Sep 1998 10:42:03 -0500, tadmc@metronet.com (Tad McClellan)
wrote:
>Gareth Hall (guruchoc@bigpond.com) wrote:
>
>: Can somone write a script for me.
>
>
> If you state how much the job pays you will likely get
> better responses to job offers...
It was just a freebie, no great brain power in this one, it's about 1k
when finished, I have 90% of it done, just needs tweaking.
I didn't realise this was a pay me to write your script newsgroup,
obviously I was mistaken, sorry.
------------------------------
Date: Mon, 21 Sep 1998 13:53:25 GMT
From: droby@copyright.com
Subject: Re: Need help with a simple program (newbie).
Message-Id: <6u5lom$tr7$1@nnrp1.dejanews.com>
In article <MPG.106c2f5d13de36bf9897ab@nntp.hpl.hp.com>,
lr@hpl.hp.com (Larry Rosler) wrote:
> [Posted to comp.lang.perl.misc and a copy mailed.]
>
> In article <35FEE14B.305BA1E@csufresno.edu> on Tue, 15 Sep 1998 14:51:07
> -0700, Vince <vmp12@csufresno.edu> says...
> .> Disclaimer: I'm a newbie.
> .>
> ...
> .> if ($month == 1) {
> .> $temp_month = $day;
> .> }
> .> if ($month == 2) {
> .> $temp_month = 31 + $day;
> .> }
> .> if ($month == 3) {
> .> $temp_month = 59 + $day;
> .> }
> .> if ($month == 4) {
> .> $temp_month = 90 + $day;
> .> }
> .> if ($month == 5) {
> .> $temp_month = 120 + $day;
> .> }
> .> if ($month == 6) {
> .> $temp_month = 151 + $day;
> .> }
> .> if ($month == 7) {
> .> $temp_month = 181 + $day;
> .> }
> .> if ($month == 8) {
> .> $temp_month = 212 + $day;
> .> }
> .> if ($month == 9) {
> .> $temp_month = 243 + $day;
> .> }
> .> if ($month == 10) {
> .> $temp_month = 273 + $day;
> .> }
> . if ($month == 11) {
> .> $temp_month = 304 + $day;
> .> }
> .> if ($month == 12) {
> .> $temp_month = 334 + $day;
> .> }
>
> Without commenting on the rest of lo, these many lines of code, I'll just
> say: Real Programmers use arrays, among other things to avoid this
> hideous repetition.
>
> $temp_month = (0, 31, 59, etc ..., 304, 334)[$day - 1];
>
I think perhaps you intended
$temp_month = (0, 31, 59, etc ..., 304, 334)[$month - 1];
And of course a leap year correction might be nice.
Isn't there a better way to do this stuff with localtime and/or the Date
module anyway?
--
Don Roby
<droby@copyright.com>
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: 21 Sep 1998 14:37:48 GMT
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: New posters to comp.lang.perl.misc
Message-Id: <6u5obs$ia6$5@info.uah.edu>
Following is a summary of articles from new posters spanning a 7 day
period, beginning at 14 Sep 1998 14:34:39 GMT and ending at
21 Sep 1998 07:51:29 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) 1998 Greg Bacon. All Rights Reserved.
Verbatim copying and redistribution is permitted without royalty;
alteration is not permitted. Redistribution and/or use for any
commercial purpose is prohibited.
Totals
======
Posters: 255 (48.9% of all posters)
Articles: 394 (25.7% of all articles)
Volume generated: 678.7 kb (23.7% of total volume)
- headers: 283.8 kb (5,586 lines)
- bodies: 380.4 kb (12,289 lines)
- original: 278.5 kb (9,617 lines)
- signatures: 14.1 kb (330 lines)
Original Content Rating: 0.732
Averages
========
Posts per poster: 1.5
median: 1 post
mode: 1 post - 191 posters
s: 1.7 posts
Message size: 1764.0 bytes
- header: 737.6 bytes (14.2 lines)
- body: 988.7 bytes (31.2 lines)
- original: 723.8 bytes (24.4 lines)
- signature: 36.7 bytes (0.8 lines)
Top 10 Posters by Number of Posts
=================================
(kb) (kb) (kb) (kb)
Posts Volume ( hdr/ body/ orig) Address
----- -------------------------- -------
16 35.4 ( 13.9/ 17.6/ 7.6) dejah@DejahsPrivateIce.com
15 30.0 ( 9.6/ 18.2/ 10.0) Uri Guttman <uri@camel.fastserv.com>
11 25.3 ( 8.4/ 16.9/ 12.0) beyret@my-dejanews.com
7 27.3 ( 7.9/ 19.5/ 15.0) Andrew Dalke <dalke@bioreason.com>
6 19.3 ( 6.7/ 12.6/ 2.5) Ben Sauvin <sauvin@osmic.com>
6 15.3 ( 7.0/ 7.3/ 3.3) "Garrett G. Hodgson" <garry@sage.att.com>
6 14.1 ( 4.1/ 10.0/ 6.5) andy_williams@my-dejanews.com
6 8.0 ( 4.2/ 3.8/ 2.8) jzobel@my-dejanews.com (Joachim Zobel)
6 8.3 ( 3.8/ 4.5/ 1.9) "Jay Guerette" <JayGuerette@pobox.com>
4 10.1 ( 2.8/ 7.3/ 4.0) Tien Pham <tpham@ee.gatech.edu>
These posters accounted for 5.4% of all articles.
Top 10 Posters by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Address
-------------------------- ----- -------
35.4 ( 13.9/ 17.6/ 7.6) 16 dejah@DejahsPrivateIce.com
30.0 ( 9.6/ 18.2/ 10.0) 15 Uri Guttman <uri@camel.fastserv.com>
27.3 ( 7.9/ 19.5/ 15.0) 7 Andrew Dalke <dalke@bioreason.com>
25.3 ( 8.4/ 16.9/ 12.0) 11 beyret@my-dejanews.com
19.3 ( 6.7/ 12.6/ 2.5) 6 Ben Sauvin <sauvin@osmic.com>
15.3 ( 7.0/ 7.3/ 3.3) 6 "Garrett G. Hodgson" <garry@sage.att.com>
14.1 ( 4.1/ 10.0/ 6.5) 6 andy_williams@my-dejanews.com
10.1 ( 2.8/ 7.3/ 4.0) 4 Tien Pham <tpham@ee.gatech.edu>
8.9 ( 1.1/ 7.8/ 7.8) 2 jauderho@transmeta.com
8.3 ( 3.8/ 4.5/ 1.9) 6 "Jay Guerette" <JayGuerette@pobox.com>
These posters accounted for 6.8% of the total volume.
Top 10 Posters by OCR (minimum of three posts)
==============================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
1.000 ( 3.5 / 3.5) 3 jed@glug.hip.berkeley.edu (Jedediah D. Parsons)
1.000 ( 1.4 / 1.4) 3 mgoddard@REMOVETHISrosetta.org (Matt Goddard)
1.000 ( 2.8 / 2.8) 3 khai@expert-market.com
0.885 ( 4.0 / 4.5) 3 kazman@my-dejanews.com
0.817 ( 1.2 / 1.4) 3 Wyatt Draggoo <phraktyl@home.com>
0.770 ( 15.0 / 19.5) 7 Andrew Dalke <dalke@bioreason.com>
0.747 ( 2.8 / 3.8) 6 jzobel@my-dejanews.com (Joachim Zobel)
0.714 ( 12.0 / 16.9) 11 beyret@my-dejanews.com
0.709 ( 1.1 / 1.6) 3 mwoog@pobox.ch
0.688 ( 2.2 / 3.2) 3 Peter Moore <moorep@ssmb.com.au>
Bottom 10 Posters by OCR (minimum of three posts)
=================================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.558 ( 0.9 / 1.6) 3 ka0osk@creighton.edu
0.548 ( 4.0 / 7.3) 4 Tien Pham <tpham@ee.gatech.edu>
0.548 ( 0.8 / 1.5) 3 Srikanth Natarajan <nkanth@cnd.hp.com>
0.547 ( 10.0 / 18.2) 15 Uri Guttman <uri@camel.fastserv.com>
0.453 ( 3.3 / 7.3) 6 "Garrett G. Hodgson" <garry@sage.att.com>
0.433 ( 7.6 / 17.6) 16 dejah@DejahsPrivateIce.com
0.423 ( 1.9 / 4.5) 6 "Jay Guerette" <JayGuerette@pobox.com>
0.415 ( 2.0 / 4.7) 3 miho21@yahoo.com
0.409 ( 0.9 / 2.2) 4 larry@kiev.wall.org (Larry Wall)
0.197 ( 2.5 / 12.6) 6 Ben Sauvin <sauvin@osmic.com>
21 posters (8%) had at least three posts.
Top 10 Crossposters
===================
Articles Address
-------- -------
30 hdoyle@diveweb.com
20 ka0osk@creighton.edu
11 "Garrett G. Hodgson" <garry@sage.att.com>
11 Andrew Dalke <dalke@bioreason.com>
6 khai@expert-market.com
4 Uri Guttman <uri@camel.fastserv.com>
4 "Jerry Gitomer" <jgitomer@erols.com>
4 larry@kiev.wall.org (Larry Wall)
4 "Michael T. Richter" <mtr@ottawa.com>
2 dwmalone@maths.tcd.ie (David Malone)
------------------------------
Date: 21 Sep 1998 04:35:51 GMT
From: coledl@lore.cs.purdue.edu (David Cole)
Subject: O'Reilly's Win32 Perl Resouce Kit
Message-Id: <6u4l37$6u@mozo.cc.purdue.edu>
Does anyone have any experience with this product? I'm looking for
resources to aid me in porting a Unix Perl application to Win32.
The application make heavy use of sockets, threads, and etc.
David Cole
coledl@cs.purdue.edu
------------------------------
Date: 21 Sep 1998 13:37:06 GMT
From: scott@softbase.com
Subject: Re: O'Reilly's Win32 Perl Resouce Kit
Message-Id: <36065682.0@news.new-era.net>
David Cole (coledl@lore.cs.purdue.edu) wrote:
> Does anyone have any experience with this product? I'm looking for
> resources to aid me in porting a Unix Perl application to Win32.
> The application make heavy use of sockets, threads, and etc.
Threads? How does it use threads? Perl doesn't even support them
officially yet.
If you mean "does the PRK for Win32 allow me to use fork()", then no,
it doesn't. Nothing will ever allow fork() to work in NT.
Scott
--
Look at Softbase Systems' client/server tools, www.softbase.com
Check out the Essential 97 package for Windows 95 www.skwc.com/essent
All my other cool web pages are available from that site too!
My demo tape, artwork, poetry, The Windows 95 Book FAQ, and more.
------------------------------
Date: Mon, 21 Sep 1998 13:59:43 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: O'Reilly's Win32 Perl Resouce Kit
Message-Id: <jZsN1.363$_c5.3635193@news.shore.net>
scott@softbase.com wrote:
: Threads? How does it use threads? Perl doesn't even support them
: officially yet.
I believe that Threads are documented in the Win32 PRK _Programming
with Perl Modules_ book.
: If you mean "does the PRK for Win32 allow me to use fork()", then no,
: it doesn't. Nothing will ever allow fork() to work in NT.
Not exactly true -- Cygnus for Win32 and U/WIN both have fork()
implementations. They're slightly different than Unix's fork() and
(from my experience) not nearly as robust, but they're a step in the
right direction.
--
Nate Patwardhan|root@localhost
"Fortunately, I prefer to believe that we're all really just trapped in a
P.K. Dick book laced with Lovecraft, and this awful Terror Out of Cambridge
shall by the light of day evaporate, leaving nothing but good intentions in
its stead." Tom Christiansen in <6k02ha$hq6$3@csnews.cs.colorado.edu>
------------------------------
Date: 21 Sep 1998 15:02:37 GMT
From: scott@softbase.com
Subject: Re: O'Reilly's Win32 Perl Resouce Kit
Message-Id: <36066a8d.0@news.new-era.net>
Nathan V. Patwardhan (nvp@shore.net) wrote:
> I believe that Threads are documented in the Win32 PRK _Programming
> with Perl Modules_ book.
But are threads really part of Perl now? Do they work?
> Not exactly true -- Cygnus for Win32 and U/WIN both have fork()
> implementations.
Things like this require you buy into the entire runtime system for the
development package. You can fork() in DOS if you buy into the right
runtime system. I'm sure NT's POSIX has fork() too, but you have to run
under the POSIX subsystem. A native Win32 application can't use them. A
native win32 fork() isn't going to happen without some changes to the
NT kernel.
If Microsoft is dusting off Xenix, this could happen!
Scott
--
Look at Softbase Systems' client/server tools, www.softbase.com
Check out the Essential 97 package for Windows 95 www.skwc.com/essent
All my other cool web pages are available from that site too!
My demo tape, artwork, poetry, The Windows 95 Book FAQ, and more.
------------------------------
Date: 21 Sep 1998 07:34:30 PDT
From: Patricia Shanahan <pats@acm.org>
Subject: Re: Perl & Java - differences and uses
Message-Id: <36066375.4426A4EC@acm.org>
George Reese wrote:
>
> In comp.lang.java.programmer Patricia Shanahan <pats@acm.org> wrote:
> : George Reese wrote:
> :>
> :> In comp.lang.java.programmer Patricia Shanahan <pats@acm.org> wrote:
> :> : In any case, those aspects of programming that have been reduced to
> :> : algorithms are not what programmers should be spending their time
> :> : doing. There is a natural progression:
> :>
> :> : 1. Algorithms are identified for doing aspect A of programming.
> :>
> :> : 2. The algorithms for doing A are incorporated into software tools.
> :>
> :> : 3. A stops being a everyday part of programming, and the size and
> :> : difficulty of programs that are considered writable is increased so
> :> : that programming is right at the limit of what programmers can do,
> :> : even without having to worry about A.
> :>
> :> This is false because the algorithm is described in human language,
> :> something a computer is incapable of understanding. And we have yet
> :> to find a way to describe these algorithms in a form the computer can
> :> understand. It is totally false to believe that because an algorithm
> :> exists for doing X that a computer can do X.
>
> : As far as I know, the Church-Turing hypothesis still stands
> : uncontradicted. Perhaps you could post an example of a non-computable
> : algorithm? A clear unambigous statement of the algorithm in English
> : would be fine.
>
> This has nothing to do with the Church-Turing hypothesis. Here is an
> algorithm:
...[Now agreed to be non-algorithmic methodology snipped]
>
> That IS an algorithm. One that cannot currently be done by
> computers. Furthermore, you can identify an algorithm for turning the
> UML diagrams into code. Those can ALMOST be done by computers, but
> not quite.
...
Returning after that diversion to the point I was trying to make in
the "> :> :" quotes, I would like to both weaken and strengthen it a
bit:
*Whenever there is a practical algorithm, or a practical and effective
heuristic, for performing a programming task it stops being something
programmers should be doing normally, and moves into the domain of
things software tools can and should do.*
By a "practical algorithm" I mean a procedure that is mindless,
platform neutral, reproducible, certain to be effective and that can
be carried out in reasonable space and time - excluding e.g.
algorithms with O(n!) execution time where real world problems have
large values of n. Such algorithms cannot be realistically applied by
humans or computers - though computers can typically use them for much
larger problems than humans can.
By a "heuristic" I mean a procedure that is like an algorithm in being
mindless and platform neutral, but that may not be reproducible and is
not certain to be effective. By a "practical heuristic" I mean one
that can be executed in reasonable space and time. By "effective" for
a heuristic I mean one that does the job mindlessly about as well as a
competent person applying normal skill and judgement can be expected
to do routinely - similar probability of producing a solution of at
least similar quality.
An "effective heuristic" may not do as well as an unusually skilled
expert giving particular attention to a critical instance. An example
of this is modern compiler code optimization techniques, which do at
least as well as a typical programmer churning out large quantities of
assembly language code, but are not certain to do as well as an expert
with detailed understanding of the target processor hand tuning a
really critical piece of code.
Patricia
------------------------------
Date: 21 Sep 1998 14:35:52 GMT
From: bellings@badlands.NoDak.edu (Brent A Ellingson)
Subject: Re: Perl & Java - differences and uses
Message-Id: <6u5o88$k6c$1@node2.nodak.edu>
George Reese (borg@imaginary.com) wrote:
: * I have never said that OO was proper for everything.
: That Python was written in C does not imply that C was necessarily
: the best tool for the job. In fact, I believe I have seen rather
: lengthy lamentation of this fact in python forums.
Exactly WHO laments that significant parts of Perl, Python,
Emacs, Java, most UNIX's, most LISP's, most Schemes, most C++'s,
Win9x, WinNT, ad infinatum, are written in C?
Does Guido van Rossum lament this? Does Larry Wall lament this?
Do Guy Steel, or Richard Stallman, or James Gosling lament this?
NO. They each took the the cursed hammer in hand, and built screw
drivers, and pipe wrenches, and table saws.
NONE of them sat in a corner and swore at the damned hammer.
--
Brent Ellingson (bellings@badlands.NoDak.edu),
-- who promises never to post to this thread again...
------------------------------
Date: 12 Jul 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 Mar 98)
Message-Id: <null>
Administrivia:
Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.
If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu.
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 3775
**************************************
