perl - 怎样才能弃用 Net::SSH->poll 避免

Question

Net::SSH2->投票文档：

不推荐使用：不推荐使用 libssh2 中的轮询功能，并且忽略其使用。会话方法“sock”和“block_directions”可用于将 Net::SSH2 集成到外部事件循环中。

有人可以举例说明如何使用“sock”和“block_directions”来代替不推荐使用的 poll 函数吗？