从 WMI 类方法计算私有工作集内存

Question

我正在使用以下 perl 程序，它使用 WMI 类 Win32_Process 来确定进程的内存使用情况

use strict;
use warnings;
use Win32::OLE qw/in/;
sub memory_usage()
{
    my $objWMI = Win32::OLE->GetObject('winmgmts:\\\\.\\root\\cimv2');
    my $processes = $objWMI->ExecQuery("select * from Win32_Process where Name=\'notepad.exe\'");
    my $memory = 0;

    foreach my $proc (in($processes))
    {
         $memory = $memory + $proc->{WorkingSetSize};
    }
    return $memory;
}
print 'Memory usage: ', memory_usage(), "\n";

WMI类Win32_Process的和它的属性被赋予在MSDN上这里

问题是它计算工作集内存，我想计算私有工作集内存，链接页面上没有定义任何属性

有什么方法可以从这个类中计算私有工作集内存吗？

Answer 1

更改Win32_Process为Win32_PerfRawData_PerfProc_Process并将WorkingSetSize属性更改为WorkingSetPrivate。这将为您提供私有工作集。

http://msdn.microsoft.com/en-us/library/windows/desktop/aa394323(v=vs.85).aspx