if ($XHTML) {
   my $labelattr = ref $labelattributes eq 'HASH' ? $labelattributes->{$_} : $labelattributes ; 
push @elements, CGI::label($labelattr,