请问如何在win下获取某个窗口的进程名

langq235

我的最终目的是获取拥有键盘焦点的程序的进程名，比如我正在用qq聊天，我就想获得“qq.exe”；

通过下面的代码，我能够得到这个窗口，但是找不到办法通过这个信息获取它进程的信息了。。

use Win32::GuiTest qw(:ALL);
my $dkwd = GetForegroundWindow();#拥有焦点的窗口
GetWindowText($dkwd)#这个是窗口名