use Tkx; my $mw = Tkx::widget->new('.'); #Main Window #buttons #used to be: #$mw->new_ttk__button(-text=>'button 1') #now: #$mw-> new_button(-text=>'button 1') my @btns = ( $mw->new_button(-text=>'button 1'), $mw->new_button(-text=>'button 2'), $mw->new_button(-text=>'button 3') ); #Place elements (buttons) in table grid #column x row coordinates $btns[0]->g_grid(-row=>0, -column=>0); $btns[1]->g_grid(-row=>0, -column=>1); $btns[2]->g_grid(-row=>1, -column=>1); #Event Loop Tkx::MainLoop();