my @labels;
push @lable, $textarea->Label();
...

##</code><code>##

my @labels = grep { $_->class eq 'Label' } $textarea->children;