$button1->bind('<ButtonPress-1>',sub{print "Button 1 gedrueckt"});