Hi, I think you want

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

To get the second label:

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

Hope this helps!