foreach my $child ($obj->children()) {
    next unless $child->name eq 'paragraph';
    # code goes here
  }