{
  local $|=1;
  ...
  return;
}

##</code><code>##

{
    local $|=1;
    my $app = MyCGIAppSubclass->new;
    $app->run;
}