for (my $i = 0; $i < $rows; $i++) {
    $tl->gridRowconfigure($i, -weight => 1, -minsize => 80);
}