Help for this page
$_ -> configure(-state => 'disabled') for @check_button;
for $i (1..6){$check_button[$i] -> configure(-state => 'disabled');}