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

##</code><code>##

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

##</code><code>##

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