Perl/Tk saves your favourite tools

back: Tk interaction -1
next: Tk interaction -3

Mind the dirty trick where the argument-list of the select function is partially unpacked in global variables. Those values of $x and $y are required later to have the selected object moved.

Tk interaction -1 Tk interaction -3

Created by Mark Overmeer with PPresenter on 11 juli 2001.