sub get_myscalar {
  return $myscalar
}

##</code><code>##

my %exported_lex ={
   myscalar  => \$myscalar,
   myscalar2 => \$myscalar2,
}

sub get_lex_ref {
   return $exported_lex{$_[0]}
}

sub get_lex_val {
   return ${$exported_lex{$_[0]}}
}