Perl/Tk saves your favorite tools | |||
Main back: Tk interaction -1 next: Tk interaction -3 |
select
function is partially unpacked in global variables. Those values of
$x and $y are required later to have the selected
object moved.
| ||
Created by Mark Overmeer with PPresenter on 22 May 2000. |