$buttons-Button(...)->pack(...) allocates and packs a new Tk::Button widget. If you want to replace existing Button widgets, you can invoke the destroy method against each existing Button's reference. If you think the number of Buttons will remain constant during run-time, allocate the Buttons once, then invoke the configure method (see perldoc Tk::options) against each button to change its attributes.