Button-1, Button-2, ... are mouse buttons.

Take a look at perldoc Tk::bind for more informations, just as castaway said.