sub render {
   my ($self, $obj) = @_;
   ...
   ... if (...) { ... } else { ... } ...
   ...
}

##</code><code>##

sub render {
   my ($self, $obj) = @_;
   ...
   ... $obj->render_foo(...) ...
   ...
}