tie my %h, MyPackage;
$h{Hello} = "world";
# use tied to call object methods
print tied(%h)->to_string, "\n"; # -> 'Hello World'