问题标签 [poe]

谁能解释变量作用域在 POE 会话中是如何工作的？在不影响其他会话的情况下，在会话中传递状态的正确方法是什么？

谢谢乔什

Here is some test code to illustrate my problem;

If I uncomment the version of the inline state kill_top1, all is well. If I use the version (as shown) that calls the anonymous sub, I get;

In this posting [link text][1] Rocco Caputo explains;

"Tk is not passing the event information to POE.

As you know, postbacks are anonymous subroutine references that post POE events when they're called. They're used as a thin, flexible interface between POE and Tk, among other things.

Postbacks are blessed, and their DESTROY methods are used to notify POE when Tk is done with them. From Tk's point of view, the only difference between a callback and a postback is this blessing.

For some reason, Tk does not pass parameters to a blessed callback."

He gives a workaround, but I am not sure 1) if this is the issue I have uncovered or )2 if it is, how to apply the workaround.

[1]: http://osdir.com/ml/lang.perl.poe/2004-01/msg00002.html :Tk With POE - bind() function for keypresses"

我发布了“如何理解 POE-Tk 对破坏的使用？” 试图将我的生产代码中的错误减少到测试用例。但似乎测试用例的解决方案在完整程序中不起作用。

该程序有 800 多行，所以我不愿完整地发布它。我意识到我在这里提供的片段可能太短而无法使用，但我希望在哪里寻找解决方案或我可以提供哪些其他信息方面获得一些指导。

这是我的 POE-Tk 应用程序的 Session::Create 部分。

add_button_press在这里调用；

validate 创建顶层小部件 $heap->{ih_mw};

按 $ih_but1 会导致这个结果；

C:\scripts\alias\resource>alias_poe_V-3_0_par.pl

按下添加按钮

子验证调用

！输入有效

ih_mw存在于验证中

ih_button_1按下

ih_mw不存在于ih_button_1_press

因此，即使包含“ ” ，匿名子例程$heap->{ih_mw}似乎也不知道该小部件ih_button_1_press($kernel, $session, $heap) = @_[KERNEL, SESSION, HEAP];

我有一个 POE Perl 程序 forking children。

它所分叉的孩子在远程设备中进行日志记录和交互式 telnet。POE 使用 STDOUT 将输出返回到父进程，但由于某种原因它丢失了（不会进入屏幕或任何文件）。

我推测这是因为 STDOUT 被重定向到某个地方——我需要确定在哪里。

我使用 (-t STDOUT) 来确定孩子的 STDOUT 不是 TTY。

在调用子项之前，我还将子项的 STDOUT 重置为父项的 STDOUT - 但此方法似乎避免了 POE 的事件处理程序，它只是将输出转储到父项 STDOUT。

Q) 如何识别当前 STDOUT 指向的位置，以便找到数据的去向

谢谢

西蒙

我正在尝试测试用户是否在 FreeNode 上注册。nick_info() 似乎没有返回有关此信息，所以我想使用 $irc->yield(whois => $nick); 然后获取 irc_whois 事件的回复。问题是我想等到这个事件被触发，所以我创建了一个全局变量 $whois_result 并写了一个这样的子：

irc_whois 处理程序看起来像：

不幸的是，循环运行时事件无法触发，因此挂起。我确信有更好的方法可以做到这一点，但我对这种编程还不够熟悉。任何帮助将不胜感激。

是否有任何 Wheel /POCO /Option 可以在 Perl 中使用 POE 模块执行此操作：我想监视数据库表中的更改记录（删除 /insert/update）并对这些更改做出相应的反应。

如果是的话，可以提供一些代码或显示这一点的链接吗？

How do I put an array on the POE heap, and push/pop data to/from it?

I'm trying to put the following array on the heap:

And how would I be able to access the function references contained within? Currently, I can run them via:

Would I be correct in assuming it would simply be?:

Is there a POE module that identifies PnP events in Windows? If yes, could someone provide idea code snippet?

这是一个示例脚本。当我按下 Ctrl+C 时，机器人会退出 IRC，但它会在一段时间后重新连接。如何正确关闭机器人？

我正在运行一个 IRC Bot ( Bot::BasicBot )，它有两个运行File::Tail的子进程，但是在退出时，它们不会终止。所以我在退出之前使用Proc::ProcessTable杀死他们：

它有效，但我收到此警告：

我还能做些什么来杀死子进程？分叉进程是使用Bot::BasicBot中的forkit方法创建的。

示例脚本：