# ... code before
   {
      my $f = $top->Frame->pack; # frame needed only for layouting purposes
      $f->Label(...)->pack(...);
      $f->Label(...)->pack(...);
      ...
   }
   # ... not interested in $f anymore ...