[23089] in Perl-Users-Digest
Perl-Users Digest, Issue: 5310 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Aug 2 14:05:58 2003
Date: Sat, 2 Aug 2003 11:05:09 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sat, 2 Aug 2003 Volume: 10 Number: 5310
Today's topics:
Re: "web" vs. "traditional" development (was Re: Web de <cwilbur@mithril.chromatico.net>
Re: File+Data from Java to Perl & back again. (SOAP?) <jon@joncruz.org>
Re: LWP::Request <gisle@ashn89ty262h.bc.hsia.telus.net>
Re: LWP::Request <flavell@mail.cern.ch>
Re: LWP::Request <minceme@start.no>
Re: No Question - Just Posting some Code I'm Proud of <mikeflan@earthlink.net>
Re: No Question - Just Posting some Code I'm Proud of <pinyaj@rpi.edu>
Re: No Question - Just Posting some Code I'm Proud of (Greg Bacon)
Re: Perl Objects (Paul)
Some pointers need for a CGI script & Mysql <dlaw001@yahoonospam.co.uk>
Re: Some pointers need for a CGI script & Mysql <mgarrish@rogers.com>
Re: Some pointers need for a CGI script & Mysql <NOSPAM@bigpond.com>
Re: Substitution Question <spamblock@junkmail.com>
Re: Web development and Perl 6 <abigail@abigail.nl>
Re: Web development and Perl 6 <tassilo.parseval@rwth-aachen.de>
Re: Web development and Perl 6 <noreply@gunnar.cc>
Web hosts and mod_perl [was: Web development and Perl 6 <noreply@gunnar.cc>
Re: Web page with frames... <mbudash@sonic.net>
Re: win32 - kill 0 and handle leaks. (Daniel Berger)
Re: <bwalton@rochester.rr.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 02 Aug 2003 04:25:54 GMT
From: Charlton Wilbur <cwilbur@mithril.chromatico.net>
Subject: Re: "web" vs. "traditional" development (was Re: Web development and Perl 6)
Message-Id: <87n0essnh0.fsf@mithril.chromatico.net>
Gunnar Hjalmarsson <noreply@gunnar.cc> writes:
> Charlton went as far as claiming that it's _good_ (for him) that new
> web developers turn to PHP, which made me express my doubt whether
> that is good for Perl.
No, I claimed that it was good for *clueless* new web developers to
turn to PHP. The "clueless" in that phrase is *critical*.
A clueful new web developer will quickly learn enough to look at the
tools available, and pay $5 a month more for access to mod_perl.
Charlton
------------------------------
Date: Sat, 02 Aug 2003 09:46:04 -0700
From: "Jon A. Cruz" <jon@joncruz.org>
Subject: Re: File+Data from Java to Perl & back again. (SOAP?)
Message-Id: <3F2BEACC.90106@joncruz.org>
Tim M wrote:
> The benefits to using SOAP would be:
>
> -Simplicity (Too optimistic?)
I'd have to almost completely disagree with this one. SOAP might give
you many things, but simplicity is not really one of them.
> -Standardized method would be ideal as we may want to integrate other
> systems and even allow public integration with the Perl system.
> (Basically we want to keep it flexible enough so we can integrate our
> Perl system with another system written in any other language)
Might be ok. For text based systems. IIRC, even MS uses proprietary
binary protocols for their own use, and only uses SOAP for externals to
connect in.
> -SOAP currently seems to be the most prominent method for servers to
> communicate
Not really. It's perhaps the most 'buzzed' or 'pushed' or 'hyped'. If
that's what you mean by 'prominent'.
> -Lack of other suitable methods that don't seem to be quick hacks
Depends on the needs.
Just skim the RFC's for a few protocols that are non-SOAP, but very well
suited for certain things.
> What other standardized methods are used for production quality
> systems in the corporate world? Are they supported by all mainstream
> languages?
CORBA jumps right to mind.
>
> Share your thoughts now, and the penny will be in the mail! :)
Well, what SOAP does give you is a way for any old system to generically
plug into any other, where you don't know beforehand what's going to be
going on or who's going to be talking to who. It's really not the best
server-server protocol.
So if ambiguity and ad-hoc connections are what you favor, then SOAP
seems pretty good.
If binary data, bandwidth and/or speed come into play, then it might not
be the thing.
If you have servers that do some things, and will mainly do those
things, then look at that. If not, and you want your servers to do
everything, then SOAP might be more appropriate.
OK. Time to come down off the soapbox and look at your problem:
Needs:
Send parameters
Send large binary files
I think the nebulous term "send parameter data" is a problem. It's a
little too vaugue to say.
Hmmm...
I hate to say it, but straight HTTP sounds like a fit.
:-)
At the least, then you won't have to base-64 all your binary data.
(Although personally I dislike HTTP for server-server communications)
Maybe WebDAV
Again, it's a little hard to say without details on your needs.
------------------------------
Date: Sat, 02 Aug 2003 03:36:24 GMT
From: Gisle Aas <gisle@ashn89ty262h.bc.hsia.telus.net>
Subject: Re: LWP::Request
Message-Id: <m3ptjosp94.fsf@ashn89ty262h.bc.hsia.telus.net>
"Gregory Toomey" <NOSPAM@bigpond.com> writes:
> "programmer" <int.consultNOCAPITALS@macmail.com> wrote in message
> news:bg8nm4>
> ...
> > That works OK for Internet Explorer, but not for Opera.
> >
>
> It's part of the HTTP definition. Blame Opera.
It's not. RFC 2616 does not allow userinfo in HTTP URLs.
--
Gisle Aas,
ActiveState
------------------------------
Date: Sat, 2 Aug 2003 11:47:07 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: LWP::Request
Message-Id: <Pine.LNX.4.53.0308021122140.27133@lxplus095.cern.ch>
On Thu, Jul 31, Gregory Toomey inscribed on the eternal scroll:
[re: user:password credentials embedded in a URL:]
> "programmer" <int.consultNOCAPITALS@macmail.com> wrote in message
> news:bg8nm4>
^^^^^^^^^^^
(your usenet client appears to have problems with quoting message-ids,
by the way, although your References header looks OK)
> ...
> > That works OK for Internet Explorer, but not for Opera.
>
> It's part of the HTTP definition.
It's part of the generic URL/URI definition, but the http: scheme
excludes it. See
http://www.w3.org/Protocols/rfc2616/rfc2616-sec3.html#sec3.2.2
I don't see this issue discussed explicitly in section 15 "Security",
but, reading the text there, it's obviously relevant to a number of
the issues covered there, such as the presence of sensitive
information in server logs.
See also RFC2396 section 3.2.2, which I would interpret as being a
general deprecation of its use in any "scheme".
> Blame Opera.
For following security recommendations?
all the best
------------------------------
Date: Sat, 2 Aug 2003 14:51:24 +0000 (UTC)
From: Vlad Tepes <minceme@start.no>
Subject: Re: LWP::Request
Message-Id: <bggj5c$ptm$1@troll.powertech.no>
programmer <int.consultNOCAPITALS@macmail.com> wrote:
>> You can type URLS of the form
>> http://username:password@site.com/restofurl straight into your
>> browser to avoid getting the popup for basic authentication.
> That works OK for Internet Explorer, but not for Opera.
Such urls work in opera 7. If you attempt to go to such an address,
opera warns about a username in the url and asks you to confirm if you
want to go to the site.
--
Vlad
------------------------------
Date: Sat, 02 Aug 2003 15:24:24 GMT
From: Mike Flannigan <mikeflan@earthlink.net>
Subject: Re: No Question - Just Posting some Code I'm Proud of
Message-Id: <3F2BD836.599489C4@earthlink.net>
Brian McCauley wrote:
> Why do you start at 10 not 2? If you want to discard the top row (a
> legend?) then I would take it out of @temp and put it in a diffent
> variable.
Just realized I never answered this one. I'm not interested in
changing the first line of the file, only the following lines.
> Look up what [] mean in regular expressions - then remove them when
> you discover that [] is in no way related to what you were tring to
> do.
"Matches any one of the class of characters contained within
the brackets". That leads me to believe I could remove my
or (pipe) and just use:
$temp[$turn+5] =~ s/([^\s])East(\s)/$1E$2/g;
but that does not work either.
Your word boundary (/b) works great.
Thanks for all the suggestions. I wish I understood this script
100%, but not quite. I'm still working on understanding all
parts of it, but here is what I finally wound up with:
# This file takes a text file in CSV format,
# removes offending characters from the name fields
# and gives the 6 digit names field unique names.
# It also shortens the long name field a little.
use strict;
use warnings;
use constant COL1 => 0;
use constant COL2 => 1;
use constant COL3 => 2;
use constant COL4 => 3;
use constant COL5 => 4;
use constant COL6 => 5;
use constant COL7 => 6;
use constant COL8 => 7;
my $old_file = 'bran2.csv';
my $new_file = 'WPout.txt';
open WPIN, $old_file or die "Cannot open $old_file: $!";
my @data = map [ split /,/, $_, 8 ], <WPIN>;
close WPIN;
# Replace bad characters
for my $line ( @data ) {
$line->[ COL3 ] =~ tr|()#.:/?'&!||d;
for ( $line->[ COL8 ] ) {
s/\(historical\)/\(hist\)/g;
s/\(abandoned\)/\(aban\)/g;
s/National Recreation Area/NRA/g;
s/Cemetery/Cem/g;
s/\b(North|South|East|West)\b/substr($1,0,1)/eg;
s/High School/HS/g;
s/Community College/College/g;
s/Campground/Campgr/g;
s/Post Office/PO/g;
s/Junior/Jr/g;
s/Mountain/Mtn/g;
}
}
# Rename duplicate name1's
my %saw;
for my $line (@data) {
if ($saw{ $line->[ COL3 ] }++) {
# $line->[ COL3 ] =~ s|{^(.{0,4}) (..)? (.*) $}|
# {$1 . sprintf("%02d", $saw{ $line->[ COL3 ] }) . $3
# |ex;
$line->[ COL3 ] =~ s{^(.{0,4}) (..)? (.*) $} {
$1 . sprintf("%02d", $saw{ $line->[ COL3 ] }) . $3
}ex;
}
}
# print to the wpout.txt file
open WPOUT, ">", $new_file or die "$0: open $new_file: $!";
for (@data) {
print WPOUT join("," => @$_);
}
close WPOUT or warn "$0: close $new_file: $!";
__END__
------------------------------
Date: Sat, 2 Aug 2003 11:59:53 -0400
From: Jeff 'japhy' Pinyan <pinyaj@rpi.edu>
To: Mike Flannigan <mikeflan@earthlink.net>
Subject: Re: No Question - Just Posting some Code I'm Proud of
Message-Id: <Pine.SGI.3.96.1030802115629.190902A-100000@vcmr-64.server.rpi.edu>
[posted & mailed]
On Sat, 2 Aug 2003, Mike Flannigan wrote:
>> Look up what [] mean in regular expressions - then remove them when
>> you discover that [] is in no way related to what you were tring to
>> do.
>
>"Matches any one of the class of characters contained within
>the brackets". That leads me to believe I could remove my
>or (pipe) and just use:
>$temp[$turn+5] =~ s/([^\s])East(\s)/$1E$2/g;
>but that does not work either.
You need to read more -- the '^' symbol, when the first character of a
char-class, means "match any character except those following...". So
that means [abc] matches a, b, or c, while [^abc] matches any character
except a, b, or c. Even if that wasn't the case, a character class is
used for matching CHARACTERS, and in a regex, ^ doesn't match a character,
it matches a location.
>use constant COL1 => 0;
>use constant COL2 => 1;
>use constant COL3 => 2;
>use constant COL4 => 3;
>use constant COL5 => 4;
>use constant COL6 => 5;
>use constant COL7 => 6;
>use constant COL8 => 7;
Eww. Eww. I would remove that from my code. Either that, or change the
names of the constants to something meaningful. I'd rather write '5' than
'COL6'.
--
Jeff Pinyan RPI Acacia Brother #734 2003 Rush Chairman
"And I vos head of Gestapo for ten | Michael Palin (as Heinrich Bimmler)
years. Ah! Five years! Nein! No! | in: The North Minehead Bye-Election
Oh. Was NOT head of Gestapo AT ALL!" | (Monty Python's Flying Circus)
------------------------------
Date: Sat, 02 Aug 2003 16:12:12 -0000
From: gbacon@hiwaay.net (Greg Bacon)
Subject: Re: No Question - Just Posting some Code I'm Proud of
Message-Id: <vinomsantgl995@corp.supernews.com>
In article <Pine.SGI.3.96.1030802115629.190902A-100000@vcmr-64.server.rpi.edu>,
Jeff 'japhy' Pinyan <pinyaj@rpi.edu> wrote:
: [...]
: >use constant COL8 => 7;
:
: Eww. Eww. I would remove that from my code. Either that, or change the
: names of the constants to something meaningful. I'd rather write '5' than
: 'COL6'.
Agreed, those constants should be the names of the columns, not more
magic numbers that require more typing.
Greg
--
Generally speaking, bugs don't go away just because you document them.
-- Abigail
------------------------------
Date: 1 Aug 2003 18:59:48 -0700
From: elegans@lycos.com (Paul)
Subject: Re: Perl Objects
Message-Id: <d2992faa.0308011759.1f46b2a9@posting.google.com>
Thank you Steve... This program and the XML files are rather large, so
it is important to me to control memory leaks.
Thanks to everyone for the excellent information.
Paul
------------------------------
Date: Sat, 2 Aug 2003 05:37:24 +0100
From: "Newbie" <dlaw001@yahoonospam.co.uk>
Subject: Some pointers need for a CGI script & Mysql
Message-Id: <HbHWa.7$Vg.3@newsfep1-gui.server.ntli.net>
Hi
I'm rather new to cgi, (I've done the ice cream and other tutorials), so I'm
not that
raw, however I'm running into a brick wall when trying to interface with
Mysql.
I can do queries ectra, but I'm hitting the wall hard when trying to add
information
to the database (it doesn't seem to be adding the infomation into the
database).
And was wondering if anyone outhere knows of any good tutorials, sample
code,
or books dealing with cgi/perl ? (I've done some searches and haven't come
up with
what I'm looking for).
At this stage I'm trying to work out whats going on and what are common
pitfalls
so at least if I hit the wall again I'll have some sort of reference point
for me to start.
( for that reason I haven't included any code, as I may be doing other
"things wrong")
Thus any pointers would be greatly appreciated.
Later
David
------------------------------
Date: Sat, 02 Aug 2003 05:11:31 GMT
From: "mgarrish" <mgarrish@rogers.com>
Subject: Re: Some pointers need for a CGI script & Mysql
Message-Id: <7KHWa.72355$rsJ.40115@news04.bloor.is.net.cable.rogers.com>
"Newbie" <dlaw001@yahoonospam.co.uk> wrote in message
news:HbHWa.7$Vg.3@newsfep1-gui.server.ntli.net...
> I'm rather new to cgi, (I've done the ice cream and other tutorials), so
I'm
> not that
> raw, however I'm running into a brick wall when trying to interface with
> Mysql.
> I can do queries ectra, but I'm hitting the wall hard when trying to add
> information
> to the database (it doesn't seem to be adding the infomation into the
> database).
> And was wondering if anyone outhere knows of any good tutorials, sample
> code,
> or books dealing with cgi/perl ?
Paul Dubois has put out a couple of good books on Perl and MySQL. I believe
they're published by New Riders. Before buying a book though, I would
recommend reading over the user guides at www.mysql.com.
Matt
------------------------------
Date: Sat, 2 Aug 2003 15:24:55 +1000
From: "Gregory Toomey" <NOSPAM@bigpond.com>
Subject: Re: Some pointers need for a CGI script & Mysql
Message-Id: <bgfhte$o1b31$1@ID-202028.news.uni-berlin.de>
"Newbie" <dlaw001@yahoonospam.co.uk> wrote in message
news:HbHWa.7$Vg.3@newsfep1-gui.server.ntli.net...
> Hi
>
> I'm rather new to cgi, (I've done the ice cream and other tutorials), so
I'm
> not that
> raw, however I'm running into a brick wall when trying to interface with
> Mysql.
> I can do queries ectra, but I'm hitting the wall hard when trying to add
> information
> to the database (it doesn't seem to be adding the infomation into the
> database).
> And was wondering if anyone outhere knows of any good tutorials, sample
> code,
> or books dealing with cgi/perl ? (I've done some searches and haven't come
> up with
> what I'm looking for).
Add the following line to your cgis. Errors are then sent to the browser and
debugging cgi is MUCH easier.
use CGI::Carp qw(fatalsToBrowser);
Check you 'insert' syntax http://www.mysql.com/doc/en/INSERT.html
If you have access to the shell, you can run mysql directly and cut/paste
you query to check syntax:
mysql -u username -ppassword database
I find mysqlman very useful in administering mysql from the web
http://www.gossamer-threads.com/scripts/mysqlman/
gtoomey
------------------------------
Date: Sat, 2 Aug 2003 10:42:53 -0700
From: "David Oswald" <spamblock@junkmail.com>
Subject: Re: Substitution Question
Message-Id: <vinu39l07b2ca6@corp.supernews.com>
"Mike Flannigan" <mikeflan@earthlink.net> wrote in message
news:3F29CCB7.44CB834A@earthlink.net...
> Nice idea. I'm going to give this and the 'length'
> function some thought tomorrow.
Mike,
One question for you. Are you doing some sort of uniqueness checking before
truncating everything after the first three significant characters and
concatenating onto the end a 01? In other words, if there is a Josh and a
Josey, and a Jose, and a Joseppi, would they all become Jos01? If so, is
this what you want to have happen?
If you are striving for three alpha characters followed by a number as a
means to create a short yet significant identifier or hash key, you should
probably be ensuring that the newly modified name hasn't been used...before
you modify it, of course. That being the case, you'll want to store the
substitution temporarily, or perform a match of what the substitution would
become, or something to that effect.
My, somewhat new to Perl logic would flow as follows:
Truncate the full name down to a three character name.
Check to see if there are any other identifiers in your hash or whatever
that have the same first three alphas.
If there are already other identifiers with the same first three, check to
see what the highest suffix (number) is.
Whatever the highest suffix turns out to be, add one to it and concatenate
it into your identifier.
Store the identifier wherever it is that you're storing it (a hash key
maybe?)
If you prefer not to append on a number suffix to two character only names,
that can be done too, though
you'll still have to check for duplicate two-char names and append on a
number if necessary.
The other thing to worry about is that if you're using math to create a
suffix, by adding one to whatever the last suffix for a given prefix was,
your suffix's won't automatically end up with a preceeding 0 as a
placeholder. In other words, if you take 01 + 1, or even 01 + 01, you're
going to end up with 2, not 02. You'll have to use sprintf or something
like that to assure that there is a preceeding 0 in the tens column.
Finally, are two digits sufficient to differentiate between all of the
possible similar prefixes? For example, And could be Anderson, Andersen,
Andy, Anders, Andar, etc. What if you have more than 99 people whos names
begin with And? Your code may not go anywhere beyond what you're
envisioning right now. But nevertheless, for the sake of utility,
portability, extendability, reusability, and general lazyness (as a quality
rather than a flaw), it's a good idea not to hard-wire limitations that
would hinder all of the aforementioned qualities. Setting a double-digit
"uniqueness" suffix limits you to 100 people of equal first-three-letter
names, which could prevent you from extending or utilizing the same code
somewhere else in your life. It's possible to go too far overboard with all
this stuff, but if an arbitrary limitation can be removed without causing
too much trouble you might consider it.
------------------------------
Date: 02 Aug 2003 11:13:11 GMT
From: Abigail <abigail@abigail.nl>
Subject: Re: Web development and Perl 6
Message-Id: <slrnbin767.ba.abigail@alexandra.abigail.nl>
Gunnar Hjalmarsson (noreply@gunnar.cc) wrote on MMMDCXXIII September
MCMXCIII in <URL:news:bgf16a$nu6sp$1@ID-184292.news.uni-berlin.de>:
@@ Abigail wrote:
@@ > Gunnar Hjalmarsson (noreply@gunnar.cc) wrote on MMMDCXXII September
@@ > MCMXCIII in <URL:news:bgce21$nk32u$1@ID-184292.news.uni-berlin.de>:
@@ > ==
@@ > == Personally I believe that any program needs a big user base,
@@ >
@@ > I disagree. Quality matters, quantity doesn't. I don't think Windows
@@ > is a better OS because more people use it.
@@
@@ Ever heard of money? ;-)
@@
@@ many users => better funding opportunities => better software
So, languages designed in Redmond must be far, far better than Perl?
@@ I suppose that's (indirectly) true also for an open source product
@@ like Perl.
Then why bother at all with Perl? Perl will never have the user base
of Java or C, so with that reasoning, Java and C will be much better
languages.
Besides, Perl being an open source product isn't at all funded by
its users. There won't be more mony available if more people use
Perl.
Abigail
--
srand 123456;$-=rand$_--=>@[[$-,$_]=@[[$_,$-]for(reverse+1..(@[=split
//=>"IGrACVGQ\x02GJCWVhP\x02PL\x02jNMP"));print+(map{$_^q^"^}@[),"\n"
------------------------------
Date: 2 Aug 2003 12:45:22 GMT
From: "Tassilo v. Parseval" <tassilo.parseval@rwth-aachen.de>
Subject: Re: Web development and Perl 6
Message-Id: <bggbp2$j2q$1@nets3.rz.RWTH-Aachen.DE>
Also sprach Abigail:
> Gunnar Hjalmarsson (noreply@gunnar.cc) wrote on MMMDCXXIII September
> MCMXCIII in <URL:news:bgf16a$nu6sp$1@ID-184292.news.uni-berlin.de>:
> @@ Abigail wrote:
> @@ > Gunnar Hjalmarsson (noreply@gunnar.cc) wrote on MMMDCXXII September
> @@ > MCMXCIII in <URL:news:bgce21$nk32u$1@ID-184292.news.uni-berlin.de>:
> @@ > ==
> @@ > == Personally I believe that any program needs a big user base,
> @@ >
> @@ > I disagree. Quality matters, quantity doesn't. I don't think Windows
> @@ > is a better OS because more people use it.
> @@
> @@ Ever heard of money? ;-)
> @@
> @@ many users => better funding opportunities => better software
>
> So, languages designed in Redmond must be far, far better than Perl?
According to Larry himself, money does matter. See
http://www.perl.com/pub/a/2003/07/16/soto2003.html?page=9
bottom of the page. And, on the next page something that has already
been quoted here a while ago:
"There's a lot going on behind the scenes that you don't hear about
every day. Many people have sacrificed to give us time to work on
these things. People have donated their own time and money to it.
O'Reilly and Associates have donated phone conferences and other
infrastructure. The Perl 6 design team in particular has borne a
direct financial cost but also a tremendous opportunity cost in
pursuing this at the expense of career and income. I'm not looking
for sympathy, but I want you to know that I almost certainly could
have landed a full-time job 20 months ago if I'd been willing to
forget about Perl 6. I'm extremely grateful for the grants the Perl
Foundation has been able to give toward the Perl 6 effort. But I
just want you to know that it's costing us more than that."
This paragraph says two things: It needs people to develop something but
it also needs the money to keep them funded. So far people involved in
Perl5/6 development have been driven by idealism. But there are some
natural limits for that (like when you have a family that demands time
and, again, money). Considering the impatience people have towards
Perl6, it's best to pay the main people behind it (Larry, Damian, Dan
and others) money. Ideally, enough money so that they don't need a
separate job that would only delay the development. Otherwise the quality
will suffer because no one wants to wait ten years for Perl6 to happen.
No, this old clichée that money is nothing is obsolete. Actually, it has
always been a lie.
> @@ I suppose that's (indirectly) true also for an open source product
> @@ like Perl.
>
> Then why bother at all with Perl? Perl will never have the user base
> of Java or C, so with that reasoning, Java and C will be much better
> languages.
>
> Besides, Perl being an open source product isn't at all funded by
> its users. There won't be more mony available if more people use
> Perl.
Of course there will. Some of the donations to the Perl Foundation were
by companies who have gain productivity by using Perl. When they grant
money it's not so much in order to express their gratefulness. It is
because they want the development to continue.
Some money was donated by companies on behalf of some of their employees
who used Perl to solve some tasks on the job. So the more Perl
programmers there are, the more Perl will be used in those spots where
money can be expected from.
Tassilo
--
$_=q#",}])!JAPH!qq(tsuJ[{@"tnirp}3..0}_$;//::niam/s~=)]3[))_$-3(rellac(=_$({
pam{rekcahbus})(rekcah{lrePbus})(lreP{rehtonabus})!JAPH!qq(rehtona{tsuJbus#;
$_=reverse,s+(?<=sub).+q#q!'"qq.\t$&."'!#+sexisexiixesixeseg;y~\n~~dddd;eval
------------------------------
Date: Sat, 02 Aug 2003 18:08:48 +0200
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: Web development and Perl 6
Message-Id: <bggo22$of31k$1@ID-184292.news.uni-berlin.de>
Abigail wrote:
> Gunnar Hjalmarsson wrote:
>> Abigail wrote:
>>> Gunnar Hjalmarsson wrote:
>>>> Personally I believe that any program needs a big user base,
>>>
>>> I disagree. Quality matters, quantity doesn't. I don't think
>>> Windows is a better OS because more people use it.
>>
>> Ever heard of money? ;-)
>>
>> many users => better funding opportunities => better software
>
> So, languages designed in Redmond must be far, far better than
> Perl?
Well, I don't think that the quality of a program is strictly
proportional to the financial resources behind it. There are of course
other factors involved as well.
>> I suppose that's (indirectly) true also for an open source
>> product like Perl.
>
> Then why bother at all with Perl?
Because I like it. Because it serves my current need (web stuff) very
well. Because I feel it has a huge potential besides that. Because I
like the open source idea. Because it's important that people in
Redmond and elsewhere get competition by quality concious developers
who focus on the users' needs.
> Perl being an open source product isn't at all funded by its users.
> There won't be more mony available if more people use Perl.
I'm convinced there will. I'm debating this out from intuition (I
happen to be an economist), while Tassilo gave a couple of discerning
examples.
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: Sat, 02 Aug 2003 03:24:46 +0200
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Web hosts and mod_perl [was: Web development and Perl 6]
Message-Id: <bgf479$o2jrh$1@ID-184292.news.uni-berlin.de>
Eric Schwartz wrote:
> "Tassilo v. Parseval" <tassilo.parseval@rwth-aachen.de> writes:
>> Even from a selfish point of view, that wouldn't be so bad. I
>> might some day be in the situation where I have use for a good
>> webhoster. I am sure I'll get very sick if all I have is some
>> mod_php crap.
>
> Speaking of mod_*, what is it about mod_php vs. mod_perl that makes
> people happy to install the former, but not the latter?
As regards _shared_ hosting environments, this is one problem area:
Take a Perl program with program specific *.pm files. It may work fine
if it's installed by one of the users, but the consequenses if that
same program, maybe of a different version, is installed by one or
more other users on the same server, may become ... interesting. (If I
have understood it correctly, you share the same %INC variable.)
Global variables is another potential problem, I suppose.
It would be great if it was possible to configure a server in a way
that handles such potential problems properly. Is there anybody who
knows if that is possible?
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: Sat, 02 Aug 2003 05:17:50 GMT
From: Michael Budash <mbudash@sonic.net>
Subject: Re: Web page with frames...
Message-Id: <mbudash-F2ED8F.22174901082003@typhoon.sonic.net>
In article
<agDWa.46211$hOa.38509@news02.bloor.is.net.cable.rogers.com>,
"mgarrish" <mgarrish@rogers.com> wrote:
> "Eric Schwartz" <emschwar@ldl.fc.hp.com> wrote in message
> news:eton0et57s7.fsf@wormtongue.emschwar...
> >
> > Or you could just pop on, insult a number of people who have been
> > writing Perl years before you ever heard of it, and feel morally
> > superior.
> >
>
> Ooh, I feel insulted...
>
> Nope, it just a little indigestion. Must be all the tripe.
>
> Matt
nope, must be the tripe all over your face, you ingrate. there goes your
last chance of EVER getting any useful advice from this group.
*plonk*
--
Michael Budash
------------------------------
Date: 1 Aug 2003 22:12:20 -0700
From: djberg96@hotmail.com (Daniel Berger)
Subject: Re: win32 - kill 0 and handle leaks.
Message-Id: <6e613a32.0308012112.745279b7@posting.google.com>
"W K" <hyagillot@tesco.net> wrote in message news:<bgdtcr$e2h$1@hercules.btinternet.com>...
> "Sisyphus" <kalinabears@iinet.net.au> wrote in message
> news:3f29c950$0$23613$5a62ac22@freenews.iinet.net.au...
> >
> > "W K" <hyagillot@tesco.net> wrote in message
> > news:bgatab$b1a$1@titan.btinternet.com...
> > > I have a process that needs to check pids of other processes on win2000.
> > >
> > > However, whenever when I do a kill 0, $pid - the number of handles (seen
> in
> > > task manager) goes up by one.
> <snip>
>
> > Afaict, you're doing nothing wrong - and when I run your script I see
> > precisely what you're seeing (with both perl 5.6.1 and 5.8.0).
> >
> > I can't find any documentation warning of this behaviour and I can't find
> > any way of clearing those handles without having the script exit.
>
> Thank you. I'm not insane then.
Nope, you've found a bug in win32.c. It appears that when returning a
value from signal 0 (or 2) a CloseHandle() call was omitted. Since
this is only noticable when calling kill in a loop, no one noticed
until now. :)
I've submitted a bug report to perl5porters and it will (hopefully) be
patched for 5.8.1.
Regards,
Dan
------------------------------
Date: Sat, 19 Jul 2003 01:59:56 GMT
From: Bob Walton <bwalton@rochester.rr.com>
Subject: Re:
Message-Id: <3F18A600.3040306@rochester.rr.com>
Ron wrote:
> Tried this code get a server 500 error.
>
> Anyone know what's wrong with it?
>
> if $DayName eq "Select a Day" or $RouteName eq "Select A Route") {
(---^
> dienice("Please use the back button on your browser to fill out the Day
> & Route fields.");
> }
...
> Ron
...
--
Bob Walton
------------------------------
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 5310
***************************************
