Select Code to Download

$mw->bind( 'Tk::Canvas','<Motion>' => \&making_rect );

$mw->bind('<ButtonPress>' =>
...
                 }
);