> -----Original Message----- > From: John Cerney [mailto:[email protected]] > > My google login is [email protected]
done. thanks for joining :) > >* All the perl/tk widget demos work with minimal changes > (typically by just changing the "Use Tk;" to "Use Tcl::Tk > (qw/ :perlTk /)" at the top of the file. > > "use Tk", "use Tcl::Tk" > > The "(qw/ :perlTk /)" is there so that syntax like "$top = > MainWindow->new();" from the perl/tk script will work. I meant lowercase "u" > > > * Tcl::Tk widget objects have been > changed to be a blessed > hash-ref, rather than a blessed array-ref, for > compatibility > with perl/tk. > > > > AFAIR it was done to made widgets quicker - hash and > array both quick, but array quicker, also should take less memory. > Is converting to hash *really* unavoidable? > > Of course this is not the only reason why perl/Tk is slower. > > > > > I think converting to a hash was unavoidable. By doing this, > much of the perl/tk code could be used as-is. I don't thinks > this change by itself would affect the speed significantly, > but there may be other changes I have made that could have > slowed things down. Actually some speed trade-off usually is not a very big issue. But I wonder, is it possible to do it some interchangeable? So if I want faster - then it will be non-compatible but array-based, otherwise hash-based?? And it will be easier to visually compare the speed. > > Is there some sort of benchmark test you have used to look at > speed? It would be interesting to see if there is a speed > penalty for these changes. not right now :) I just used some simple stupid stress-test http://perlmonks.org/?node_id=426089 A slightly better benchmark would be highly desired, especially now, when there will be Tcl::Tk for Rakudo, soon. > * To run the demos without having to install > the package, > type "perl -Mblib -w widgetTclTk" on the command line. > > > this is true, but, as long as we're pure-perl, will work even > > perl -Mblib -w widgetTclTk" > > w/out even invoking "make" > > > Hmmm, this doesn't work for me (tried on win32). On a clean > extract from the tar file. I run "perl Makefile.PL", then > "perl -Mblib widgetTclTk". I get the error message > > Cannot find blib even in C:\ > BEGIN failed--compilation aborted. my fault perl -Ilib -w widgetTclTk" Best regards, Vadim.
