for my $child ( $sub->children ) {
 $child->start->add_content($caller)
 if ref $child eq "PPI::Structure::Block";
}