[7470] in Perl-Users-Digest
Perl-Users Digest, Issue: 1095 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Sep 29 03:07:13 1997
Date: Mon, 29 Sep 97 00:00:30 -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, 29 Sep 1997 Volume: 8 Number: 1095
Today's topics:
Re: Advanced Perl Programming - Error p. 91??? (Woody Jin)
Re: Advanced Perl Programming - Error p. 91??? (Tad McClellan)
Re: Advanced Perl Programming - Error p. 91??? (Woody Jin)
Re: Advanced Perl Programming - Error p. 91??? (Tushar Samant)
Detecting a client disconnect in a TCP Server <anthony.j.hawes@corpmail.telstra.com.au>
Evaluateable Object? (Daniel Walton)
Re: Learning Perl for CGI on the WWW <rpsavage@ozemail.com.au>
logic question . . . <gmatz@spacelab.net>
Re: Many CGI/PERL forms don't work with Lynx? (Patrick Kellum)
Re: Many CGI/PERL forms don't work with Lynx? (Patrick Kellum)
Re: Need Help With Redirect Script <palincss@nicom.com>
Re: Need tokenizer code; example from FAQ doesn't seem <merlyn@stonehenge.com>
Re: Newbie ques: How to concatenate two strings? (Tad McClellan)
Re: Newbie ques: How to concatenate two strings? <jgostin@shell2.ba.best.com>
Re: Newbie ques: How to concatenate two strings? (Tad McClellan)
PERL under DOS bschlank@pacificnet.net
Re: PERL under DOS (Martien Verbruggen)
String Concat Acting Weird (Raymon Jones)
Re: String Concat Acting Weird (Tad McClellan)
Re: String Concat Acting Weird (brian d foy)
Re: TCL Speed vs PERL <ivler@net-quest.com>
Re: TCL Speed vs PERL (Ilya Zakharevich)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 29 Sep 1997 01:57:39 GMT
From: wjin@cs.uh.edu (Woody Jin)
Subject: Re: Advanced Perl Programming - Error p. 91???
Message-Id: <60n2jk$6f9$1@Masala.CC.UH.EDU>
In article <342D98E0.56C92D59@unix.tamu.edu>, rsl3047@unix.tamu.edu wrote:
>Hi,
>
> I am reading "Advanced Perl Programming" from O'Reilly & Assoc. I think
>I found an error on p.91. However, I am not very good with modules and
>it may not be an error. Anyway...
>
> In the book on p. 91, they have
> ...
It is not just that example. I hope that the authors *TRY* the programs
first and ensure that they work correctly, before they simply put them
in the text. I am amazed by the fact that
they fail to do this simple thing.
For example, there is a client perl program which uses IO::Socket.
At first, I trusted the source program and was wondering why it won't
work. After wasting lots of time, I found that it was not PeerHost as
printed in the book, but that it was PeerPort (or PeerAddr).
--
Woody
------------------------------
Date: Sun, 28 Sep 1997 23:27:39 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Advanced Perl Programming - Error p. 91???
Message-Id: <rnan06.rm3.ln@localhost>
Woody Jin (wjin@cs.uh.edu) wrote:
: In article <342D98E0.56C92D59@unix.tamu.edu>, rsl3047@unix.tamu.edu wrote:
: >Hi,
: >
: > I am reading "Advanced Perl Programming" from O'Reilly & Assoc. I think
: >I found an error on p.91. However, I am not very good with modules and
: >it may not be an error. Anyway...
: >
: > In the book on p. 91, they have
: > ...
: It is not just that example. I hope that the authors *TRY* the programs
^^^^^^^^^^^
There are *lots* of people between the author and the printed page.
Editors, typesetters...
: first and ensure that they work correctly, before they simply put them
: in the text. I am amazed by the fact that
: they fail to do this simple thing.
How do you *know* that they fail to do this simple thing.
Maybe they did, and then someone else broke it...
--
Tad McClellan SGML Consulting
tadmc@flash.net Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 29 Sep 1997 05:01:40 GMT
From: wjin@cs.uh.edu (Woody Jin)
Subject: Re: Advanced Perl Programming - Error p. 91???
Message-Id: <60ndcl$7oe$1@Masala.CC.UH.EDU>
In article <rnan06.rm3.ln@localhost>, tadmc@flash.net (Tad McClellan) wrote:
>Woody Jin (wjin@cs.uh.edu) wrote:
>: In article <342D98E0.56C92D59@unix.tamu.edu>, rsl3047@unix.tamu.edu wrote:
>: >Hi,
>: >
>: > I am reading "Advanced Perl Programming" from O'Reilly & Assoc. I
> think
>: >I found an error on p.91. However, I am not very good with modules and
>: >it may not be an error. Anyway...
>: >
>: > In the book on p. 91, they have
>: > ...
>
>: It is not just that example. I hope that the authors *TRY* the programs
> ^^^^^^^^^^^
>
>There are *lots* of people between the author and the printed page.
>
>Editors, typesetters...
I agree, but your such elusion is wrong in two aspects:
1) They don't touch the "example codes". It is quite unlikely that
an editor or typesetter to change from PeerAddr to PeerHost.
2) ORA usually supports some LaTeX macros and mostly authors
are actually typesetters. Again, typesetting and changing the
contents of example codes are different thing.
>: first and ensure that they work correctly, before they simply put them
>: in the text. I am amazed by the fact that
>: they fail to do this simple thing.
>
>
>How do you *know* that they fail to do this simple thing.
>Maybe they did, and then someone else broke it...
Before you say the above kind of judgement, see the example.tar.gz
which you can get from ora site. Many example are not in there.
This means that they simply didn't type and test it. If they actually
typed in, ran, and tested, there is no reason why the examples are
not in that file. The file is not big either.
------------------------------
Date: 29 Sep 1997 01:07:42 -0500
From: scribble@shoga.wwa.com (Tushar Samant)
Subject: Re: Advanced Perl Programming - Error p. 91???
Message-Id: <60ngje$rd4@shoga.wwa.com>
wjin@cs.uh.edu writes:
>It is not just that example. I hope that the authors *TRY* the programs
>first and ensure that they work correctly, before they simply put them
>in the text. I am amazed by the fact that
>they fail to do this simple thing.
>
>For example, there is a client perl program which uses IO::Socket.
>At first, I trusted the source program and was wondering why it won't
>work. After wasting lots of time, I found that it was not PeerHost as
>printed in the book, but that it was PeerPort (or PeerAddr).
The book is indeed a little sloppy in some places. There's a place
where a paragraph is abruptly cut off -- I tried looking for it
right now but couldn't find it. The book also doesn't seem to know
what to head page 169 with; I guess the intro to Ch 11 spilled past
an odd numbered page -- not that I care. I probably won't run any
code in there (unless it's on CPAN). I understand that O'Reilly has
a web page with a list of the errata and I will look at it pretty
soon. For me the book has been informative and enjoyable, and the
bibliographies are useful.
------------------------------
Date: 29 Sep 1997 04:53:49 GMT
From: "Tony Hawes" <anthony.j.hawes@corpmail.telstra.com.au>
Subject: Detecting a client disconnect in a TCP Server
Message-Id: <01bccc94$471d9b40$e50b8991@w000223>
I am writing a simple TCP Server that reads from a pipe to another process
and writes it out the the client socket. I am geting into trouble when the
client disconnects as I cannot tell when the client shutsdown the socket.
See code fragment below.
Is there a signal type mechanism I can use for this.
Any help is much appreciated.
TIA
Tony Hawes
********************************************
#TCP Stuff
$proto = getprotobyname('tcp');
$iaddr = gethostbyname('cosmo.drift');
$port=6666;
socket(SERVER, PF_INET, SOCK_STREAM, $proto);
#setsockopt(SERVER, SOL_SOCKET, SO_REUSEADDR, pack("1",1)) or die
"setsockopt: $!";
bind(SERVER, sockaddr_in($port, INADDR_ANY)) or die "bind: $!";
listen(SERVER, 0) or die "listen: $!";
for(;accept(CLIENT,SERVER);close CLIENT)
{ autoflush STDOUT 1;
open(STDOUT,">&CLIENT");
while(<STDIN>)
{ print "$_";
}
}
********************************************
------------------------------
Date: Mon, 29 Sep 1997 05:59:01 GMT
From: dan@okdirect.com (Daniel Walton)
Subject: Evaluateable Object?
Message-Id: <342f3ff4.364579555@okdirect.com>
Is there a way to create a safe (Safe module) object instance that is
run much like an eval in that any errors would be reported back to
it's parent rather than shutting down the whole process?
I have a server daemon project that I am working on in Perl and I need
a way to extend the server with modules in such a way that if there is
a problem with one module, it doesn't take the rest of the modules out
of commission. Each module will be performing a task and those tasks
are not necessarily related.
I thought of using separate processes for each module and connecting
them together with the main server using STDIN and STDOUT but this is
not really an option because the main server could only do select on
256 filehandles and because each process would take too much system
resources.
I know eval is usually used for this sort of thing but each module is
run as an object instance and those instances need to keep state
between each call. By using eval, I would loose state between each
call.
Is there a solution to this or am I just up a creek?
Thanks!
Daniel Walton
------------------------------
Date: Mon, 29 Sep 1997 15:15:54 +1100
From: Ron Savage <rpsavage@ozemail.com.au>
Subject: Re: Learning Perl for CGI on the WWW
Message-Id: <342F2B7A.6593@ozemail.com.au>
[snip]
> >Can anyone recommend some ultra basic resources: books, websites or
> >classes (I9m in Berkeley California)?[snip]
Web Client Programming with Perl
Clinton Wong
O'Reilly
1-56592-214-X
------------------------------
Date: Sun, 28 Sep 1997 23:05:50 -0400
From: Guy Matz <gmatz@spacelab.net>
Subject: logic question . . .
Message-Id: <342F1B0E.7818@spacelab.net>
anyone have have a slick perl way to do this:
if expression = this or that
then . . .
without having to say:
if expression = this or expression = that
then . . .
thanks,
guy
--
-----------------------------------------------
gmatz@matz.spacelab.net
Guy Matz
Systems Administrator @ matz.spacelab.net
"That's weird, it's like something out of that twilighty show about that
zone."
- homer
------------------------------
Date: 29 Sep 1997 05:57:34 GMT
From: patrick@syix.com (Patrick Kellum)
Subject: Re: Many CGI/PERL forms don't work with Lynx?
Message-Id: <60ng0f$mda$1@neko.syix.com>
For some reason, Tom Phoenix was chatting and out came these words of greatness:
>Perl doesn't know whether the browser at the other end is Lynx or not. In
Could Lynx be sending the form data back wrong? I know the copy of Lynx
that my ISP uses for its shell accounts can't handle mailto: properly
either (it won't let me enter any message text). I'll ask my ISP if they
can try another port, maybe that will help.
>If you can make a small script (say, ten lines or so) which fails to get
>the info it needs only when the remote browser is Lynx, please post it
>here so that we can tell whether it's a bug in Lynx or in your code. :-)
It'll have to wait a few days, I don't have access to perl until my next
day off. I'll look into testing this when I can.
Thanks,
Patrick
---
A Title For This Page -- http://www.syix.com/patrick/
Bow Wow Wow Fan Page -- http://www.syix.com/patrick/bowwowwow/
"Pity there are no Martians to witness the spectacle of a kind of 15-foot
beach ball suddenly falling out of the sky and bouncing all about."
- Description of the Mars Pathfinder landing on Mars.
From a New York Times News Service story by John Noble Wilford
------------------------------
Date: 29 Sep 1997 06:02:01 GMT
From: patrick@syix.com (Patrick Kellum)
Subject: Re: Many CGI/PERL forms don't work with Lynx?
Message-Id: <60ng8p$mda$2@neko.syix.com>
For some reason, brian d foy was chatting and out came these words of greatness:
>if a certain client is acting wierd, it's normally the client's fault,
>though i've never had any trouble with Lynx
I've had a few probs with the copy of Lynx I use :-( I think it could be
the version I use, but I told my ISP people about this a few times and
never even recived a response AFAICR :-( I'm hoping it's just my version
since I want to make my pages available to everybody no matter what
browser.
Another strange thing is that some pages that use CGI scripts often appear
with large parts of the page missing, I'm not sure if this is related
though.
Thanks,
Patrick
---
A Title For This Page -- http://www.syix.com/patrick/
Bow Wow Wow Fan Page -- http://www.syix.com/patrick/bowwowwow/
"Pity there are no Martians to witness the spectacle of a kind of 15-foot
beach ball suddenly falling out of the sky and bouncing all about."
- Description of the Mars Pathfinder landing on Mars.
From a New York Times News Service story by John Noble Wilford
------------------------------
Date: Thu, 25 Sep 1997 07:35:54 -0700
From: Steve Palincsar <palincss@nicom.com>
Subject: Re: Need Help With Redirect Script
Message-Id: <342A76C9.4886@nicom.com>
Not sure I see what's so terribly hard about this. You include the URLs
in your listbox. When you hit the submit button this data is sent to
your CGI, which parses out the value, puts it in a variable, and issues
a "Location:" using the URL you got. Nothing there that requires
Javascript
that I can see. Am I missing something here?
Steve Palincsar
Joel Shellman wrote:
>
> Eric Neuman wrote:
> >
> > Folks,
> >
> > I have a dropdown form combobox that lists a variety of websites, and
> > I'd like to be able to have a user select a site, hit the "Go" button,
> > and be redirected to that site. I've been looking all over for a simple
> > PERL script to do this, but haven't been able to find anything yet.
> > Does anyone out here know how to do this, or know of any good examples?
> > Thanks!
> > --
> >
> > Eric Neuman
> > Associate Editor
> > Entermedia
> > http://www.entermedia.net
>
> You may be better off looking for a Javascript solution to this.
>
> -Joel
>
> --
> TaoTree Research and Development
> Web Development/Design, Virtual Servers, hosting, Perl/CGI programming
> http://www.tou.com/rd/
>
> Revolutionary new clicks-based Banner Exchange Guarantees you traffic
> http://www.tou.com/ite/
------------------------------
Date: 28 Sep 1997 20:15:10 -0700
From: Randal Schwartz <merlyn@stonehenge.com>
To: lott@bellcore.com (Christopher Lott), perlbug@perl.com
Subject: Re: Need tokenizer code; example from FAQ doesn't seem to work
Message-Id: <8cg1qo7qv5.fsf@gadget.cscaper.com>
>>>>> "Christopher" == Christopher Lott <lott@bellcore.com> writes:
Christopher> Dear Perl experts,
Christopher> If you can please find a moment, I would appreciate the help.
Christopher> I plucked this bit of code straight from the FAQ, where it is
Christopher> credited to Jeffrey Friedl:
Christopher> ---
Christopher> while (<>) {
Christopher> chomp;
Christopher> PARSER: {
Christopher> m/ \G( \d+\b )/gx && do { print "number: $1\n"; redo; };
Christopher> m/ \G( \w+ )/gx && do { print "word: $1\n"; redo; };
Christopher> m/ \G( \s+ )/gx && do { print "space: $1\n"; redo; };
Christopher> m/ \G( [^\w\d]+ )/gx && do { print "other: $1\n"; redo; };
Christopher> }
Christopher> }
If that's in the FAQ exactly that way, it was written before /gc was added,
and probably after someone thought /g should act like /gc.
The fix, therefore, is to change all those /gx to /gxc.
Christopher> This snippet appears under the question "What good is \G
Christopher> in a regular expression?" in
Christopher> http://www.perl.com/CPAN-local/doc/FAQs/FAQ/PerlFAQ.html
Yes. The FAQ is wrong. I'm cc'ing this message to perlbug@perl.com
in hopes that the proper authorities will be notified, and we'll
round up the usual suspects to take the blame. :-)
Thanks for pointing out the error in the FAQ.
print "Just another Perl hacker," # but not what the media calls "hacker!" :-)
## legal fund: $20,990.69 collected, $186,159.85 spent; just 337 more days
## before I go to *prison* for 90 days; email fund@stonehenge.com for details
--
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@ora.com)
Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me
------------------------------
Date: Sun, 28 Sep 1997 20:54:11 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Newbie ques: How to concatenate two strings?
Message-Id: <3o1n06.883.ln@localhost>
Jeff Gostin (jgostin@shell2.ba.best.com) wrote:
: Joseph <jglosz@san.rr.com> wrote:
: : I want to concatenate the string values of the NAME and VALUE pair so
: : that the VALUE has the "Name" in it as well. Is it something as simple
: : as
: : $value = $name + $value;
: From another relative newbie, here's the easy way:
: $value = $name . $value;
or
$value = "$name$value"; # this is called 'interpolation' but it
# has the same effect if used as shown
: "." is the concatenatation operator. It takes the leftside value (lvalue)
^^^^^^
But please don't call it that.
'lvalue' already has a meaning, and it isn't that ;-)
$name and $value are *both* lvalues...
--
Tad McClellan SGML Consulting
tadmc@flash.net Perl programming
Fort Worth, Texas
------------------------------
Date: 29 Sep 1997 03:10:19 GMT
From: Jeff Gostin <jgostin@shell2.ba.best.com>
Subject: Re: Newbie ques: How to concatenate two strings?
Message-Id: <60n66r$317$1@nntp1.ba.best.com>
Tad McClellan <tadmc@flash.net> wrote:
: $value = "$name$value"; # this is called 'interpolation' but it
: # has the same effect if used as shown
Ah, cool... Yet Another Way. :) When would one use interpolation rather than
concatenation?
: But please don't call it that. 'lvalue' already has a meaning, and it
: isn't that ;-) $name and $value are *both* lvalues...
Do I get style points at least? :) They were bad choices, admittedly, but
were the first ones to come to mind. I probably should've called them value1
and value2. Ah, what's in a name? ;)
--Jeff
------------------------------
Date: Sun, 28 Sep 1997 23:32:35 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Newbie ques: How to concatenate two strings?
Message-Id: <31bn06.rm3.ln@localhost>
Jeff Gostin (jgostin@shell2.ba.best.com) wrote:
: Tad McClellan <tadmc@flash.net> wrote:
: : $value = "$name$value"; # this is called 'interpolation' but it
: : # has the same effect if used as shown
: Ah, cool... Yet Another Way. :) When would one use interpolation rather than
: concatenation?
When one feels interpolaty rather than concatenaty ;-)
I think interpolation is easier to read, and I *always* optimize for
ease of maintenance, so I seldom use the concatenation operator.
--
Tad McClellan SGML Consulting
tadmc@flash.net Perl programming
Fort Worth, Texas
------------------------------
Date: Sun, 28 Sep 1997 03:32:48 GMT
From: bschlank@pacificnet.net
Subject: PERL under DOS
Message-Id: <342dce3a.10290244@news.pacificnet.net>
Does anyone know how to pass variables along to a script at the DOS
command line? I am trying to use perl to analyze our server's logs,
but for security reasons, I am not allowed on the server and have to
do it under DOS (Windows is outlawed for productivity purposes).
I took the script home and it works fine on my ISP server using this
syntax:
http://www.myserver.com/report.cgi?month=12&day=23
but I can't take the data home to do it here. How can I do this under
the command line at DOS? Or can I?
You can post them answer here or e-mail me directly at
bschlank@pacificnet.net . Thank you for your time and help.
-- Brett
------------------------------
Date: 29 Sep 1997 05:57:00 GMT
From: mgjv@mali.comdyn.com.au (Martien Verbruggen)
Subject: Re: PERL under DOS
Message-Id: <60nfvc$p57$1@comdyn.comdyn.com.au>
In article <342dce3a.10290244@news.pacificnet.net>,
bschlank@pacificnet.net writes:
> Does anyone know how to pass variables along to a script at the DOS
> command line? I am trying to use perl to analyze our server's logs,
> but for security reasons, I am not allowed on the server and have to
> do it under DOS (Windows is outlawed for productivity purposes).
Use CGI.pm. it will nicely ask you what your parameters should be
sfter you start up the script.
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | If at first you don't succeed, try
Commercial Dynamics Pty. Ltd. | again. Then quit; there's no use being
NSW, Australia | a damn fool about it.
------------------------------
Date: 29 Sep 1997 01:55:39 GMT
From: rkjones@fas.harvard.edu (Raymon Jones)
Subject: String Concat Acting Weird
Message-Id: <60n1qr$r6k$1@news.fas.harvard.edu>
Greetings,
I'm having a strange problem with string concatenation, and wondered what
in the $#(#$* I'm doing wrong.
I'm working with the UnixDate function in the Date::Manip module. Here's
the scoop . . .
I'm trying to get back the current year and month from this function, so
I've got something along the lines of:
$curyear, $curmonth = &UnixDate($date, "%Y %m");
This much seems to be working fine. But, if then go to concatenate the
stuff, such that I can create a date string 09-01-1997 (so that I can call
ParseDate with it), the concatenation is funny. I've been doing something
like this:
$firstday = $curmonth . '-01-' . $curyear;
Then, when I print it out, instead of the 09-01-1997 that I expected, I
get something more along the lines of:
-01-1997 03
Any ideas as to what is going on here?
Kyle
------------------------------
Date: Sun, 28 Sep 1997 23:23:55 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: String Concat Acting Weird
Message-Id: <rgan06.rm3.ln@localhost>
Raymon Jones (rkjones@fas.harvard.edu) wrote:
: $curyear, $curmonth = &UnixDate($date, "%Y %m");
($curyear, $curmonth) = &UnixDate($date, "%Y %m");
--
Tad McClellan SGML Consulting
tadmc@flash.net Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 29 Sep 1997 00:55:12 -0400
From: comdog@computerdog.com (brian d foy)
Subject: Re: String Concat Acting Weird
Message-Id: <comdog-ya02408000R2909970055120001@news.panix.com>
In article <60n1qr$r6k$1@news.fas.harvard.edu>, rkjones@fas.harvard.edu (Raymon Jones) wrote:
>I'm trying to get back the current year and month from this function, so
>I've got something along the lines of:
>$curyear, $curmonth = &UnixDate($date, "%Y %m");
hmmmm.... what's all that then?
>This much seems to be working fine. But, if then go to concatenate the
>stuff, such that I can create a date string 09-01-1997
>$firstday = $curmonth . '-01-' . $curyear;
>Then, when I print it out, instead of the 09-01-1997 that I expected, I
>get something more along the lines of:
>-01-1997 03
>Any ideas as to what is going on here?
sure, but let's strengthen your debugging skills a bit. immediately
before you assign a value to $firstday, print the values of $curmonth
and $curyear. you might be surprised. once you've done that, examine
the line in which you thought you assigned to both of them. you'll
find a problem.
then ask yourself "why not use localtime()?".
--
brian d foy <comdog@computerdog.com>
NY.pm - New York Perl M((o|u)ngers|aniacs)* <URL:http://ny.pm.org/>
CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
------------------------------
Date: 29 Sep 1997 03:09:50 GMT
From: J.M. Ivler <ivler@net-quest.com>
Subject: Re: TCL Speed vs PERL
Message-Id: <60n65u$7p9$1@news.net-quest.com>
In comp.lang.tcl Ilya Zakharevich <ilya@math.ohio-state.edu> wrote:
: In article <34293A70.7F5E1E20@metacard.com>,
: Scott Raney <raney@metacard.com> wrote:
: > Tcl is comparable, or even faster, than Perl and MetaTalk in a couple
: > of areas, specifically running subprocesses and some file system I/O
: > operations.
: Can you be more specific, please?
: I'm puzzled by this statement. Most overhead in these operation would
: come from OS, *and* Perl uses some *dirty* tricks to work quickier
: than C (yes!) with at least "I" part of I/O.
Ilya, stop bothering Scott. Scott has one job, to sell his proprietary
langauge. That's all. He isn't there to be fair, to be just, to be
anything other than as biased as he can be on why his product is the best.
Logical arguments as to how the best language for a task is defined by the
task and the needs of a client are like whispers to a deaf man who is
screaming so he can hear himself. Scott doesn't participate, he *must*
dominate, his business requires it.
jmi
------------------------------
Date: 29 Sep 1997 06:41:06 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: TCL Speed vs PERL
Message-Id: <60nii2$nb2@agate.berkeley.edu>
In article <60n65u$7p9$1@news.net-quest.com>,
J.M. Ivler <ivler@net-quest.com> wrote:
> In comp.lang.tcl Ilya Zakharevich <ilya@math.ohio-state.edu> wrote:
> : > Tcl is comparable, or even faster, than Perl and MetaTalk in a couple
> : > of areas, specifically running subprocesses and some file system I/O
> : > operations.
> : Can you be more specific, please?
> : I'm puzzled by this statement. Most overhead in these operation would
> : come from OS, *and* Perl uses some *dirty* tricks to work quickier
> : than C (yes!) with at least "I" part of I/O.
>
> Ilya, stop bothering Scott. Scott has one job, to sell his proprietary
> langauge. That's all. He isn't there to be fair, to be just, to be
> anything other than as biased as he can be on why his product is the best.
> Logical arguments as to how the best language for a task is defined by the
> task and the needs of a client are like whispers to a deaf man who is
> screaming so he can hear himself. Scott doesn't participate, he *must*
> dominate, his business requires it.
OK, OK!
However, Scott or somebody else may have some comparisons at hand. It
would be very interesting and *useful* in which operations TCL managed
to outperform Perl.
These parts of Perl are obviously broken ;-).
Ilya
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
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.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 1095
**************************************
