$mw -> bind('<Button-1>' => sub {print "actioned"});