I was able to let it work with the following: my confusion was due (I guess it's usual) to my bad understanding of MainLoop: I believed it was <always> necessary, and I didnt know where to put it.
Instead with DoOneEvent in the right place everything seems ok now...
init(); $mw->bind("KeyPress>",sub {exit}); while(1) { life(); DoOneEvent(); } sub life { updatecells(); showcells(); }
thanks again!
alessandro
In reply to Re^2: Perl/Tk without events
by alexxxm
in thread Perl/Tk without events
by alexxxm
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |