$tmp = $tab->Checkbutton(-text => $frnum,
                    -variable => \$tab[$i][$j],
                    -command => sub { }
                )->pack(-side => 'top', -anchor => 'nw');