Select Code to Download

my $aref = $obj->answer->[0]->ptrdname->label;

my $aref = $obj->answer->[0]->ptrdname->label->[1];