if( my $kids = eval { $tree->get_model->iter_children( $parent )  } ){
   for my $kid ( @$kids ){
      dance($kid);
   }
}