$canvas->bind("blue", "<Enter>",
                 [ sub { print "hi" }]);