Re: Why you should not use Tcl

Tom Christiansen (tchrist@mox.perl.com)
29 Sep 1994 23:03:32 GMT

:-> In comp.lang.tcl, throopw%sheol.uucp@dg-rtp.dg.com (Wayne Throop) writes:
: STk
:
: (define f (make <Frame>))
: (define l (make <Label>
: :parent f
: :text "A simple demo written in STklos"))
:
: tkperl
:
: $f = Frame::new($path);
: $l = Label::new($f, "-text" => "A simple demo written in tkperl");
:
: tcl/tk
:
: frame .f
: label .f.l -text "A simple demo written in tcl/tk"

Actually, that's more noise characters in the perl than you need by a long shot.
That's because

object->method(args)
CLASS::method(args)

May always be expressed

method object args;
method CLASS args;

This reduces our perl version to:

$f = new Frame $path;
$l = new Label $f, "-text" => "A simple demo written in tkperl";

Which is considerably less busy, wouldn't you agree?

One of the results of Larry's attendance at a REXX symposium while
he was writing perl's object system was an appreciation for REXXers
dislike for line noise all over their code. :-)

--tom

-- 
"Lisp has all the visual appeal of oatmeal with fingernail clippings mixed in."
	--Larry Wall in <1994Jul21.173737.16853@netlabs.com>

Tom Christiansen Perl Consultant, Gamer, Hiker tchrist@mox.perl.com