for (HBox->new) {
  $_->config1($param1);
  $_->config2($param2);
  my $sb = Scrollbar->new;
  for ($sb) {
    $_->config1($param3);
    $_->config2($param4);
  }
  $_->add($sb);
  $window->add($_);
}

##</code><code>##

$window->add(do {
  my $hbox = HBox->new;
  for ($hbox) {
    $_->config1($param1);
    $_->config2($param2);
    $_->add(do {
      my $sb = Scrollbar->new;
      for ($sb) {
        $_->config1($param3);
        $_->config2($param4);
      }
      $sb;
    });
  $hbox;
});