do_tree($child) for my $child (@children);