Perl/Tk function to handle double and single clicks

 Tk::DoubleClick provides a single function to create bindings for
 single and double click events.
 .
 These bindings can be used instead of the bindings provided by Tk
 widgets (which do not always work)