sub method { my @args = @_; $args[0] = tied(%{$args[0]}); my $result = C++CODE::method(@args); return $result; }