sub GetValue{ my $return = $wxGlobals{mValue}; }