my $array_ref = $adsobj_child->{member};
foreach (@{$array_ref})
{
  print "$_\n";
}