sub _register_hooks {
    my ($self, $token) = @_;
 
    ...