sub parameter {
   ...
   return NameValTuple->new( name => $name, val => $val );
}

##</code><code>##

sub parameter {
   ...
   return map { +{ name => $_, val => $rv{$_} } } keys(%rv);
}

##</code><code>##

print $_->name, ': ', $_->val, "\n" for $objA->parameter( 'a.x' );

##</code><code>##

print $_->{name}, ': ', $_->{val}, "\n" for $objA->parameter( 'a.x' );