sub get_str { return $str; }
sub get_h { return $h; }
sub get_l { return $l; }

##</code><code>##

print(Dumper(TestModule::get_str()));
print(Dumper(TestModule::get_h()));
print(Dumper(TestModule::get_l()));