sub FETCH {
        # ...
        $val= $refToTiedHash->{$key};
        # ...
    }