sub fill_hashref{
   my $lref = $_[0] //= {};
   $lref->{RETURNVALUE}="I would like to see this";
}