$top->bind($can, '<Button-1>', sub{my_test(root)});