Sys-Info-Driver-Windows
view release on metacpan or search on metacpan
LPFN_ISWOW64PROCESS fnIsWow64Process;
//PGPI pGPI;
BOOL bOsVersionInfoEx;
BOOL bIsWow;
//DWORD dwType;
TCHAR wProcessorModel [10];
TCHAR wProcessorStepping [10];
TCHAR wProcessorArchitecture2 [64];
unsigned int wProcessBitness;
unsigned int wProcessorBitness;
PPCODE:
/*
See:
- http://msdn.microsoft.com/en-us/library/ms724429(VS.85).aspx
- http://blogs.msdn.com/junfeng/archive/2005/07/01/434574.aspx
*/
ZeroMemory(&si, sizeof(SYSTEM_INFO));
ZeroMemory(&si2, sizeof(SYSTEM_INFO));
ZeroMemory(&osvi, sizeof(OSVERSIONINFOEX));
unsigned infoext[4];
CPUDATA cpu;
ULONG FeatureBits;
unsigned i;
unsigned ebx = 0;
unsigned ecx = 0;
unsigned CpuFeatures = 0;
unsigned Flags;
unsigned KFBits;
unsigned FeatureFlags;
PPCODE:
/*
Resources:
- http://msdn.microsoft.com/en-us/library/hskdteyh(VS.80).aspx
- http://stackoverflow.com/questions/794632/programmatically-get-the-cache-line-size
- http://en.wikipedia.org/wiki/CPUID
__cpuid with an InfoType argument of 0 returns the number of
valid Ids in CPUInfo[0] and the CPU identification string in
the other three array elements. The CPU identification string is
not in linear order. The code below arranges the information
( run in 1.078 second using v1.01-cache-2.11-cpan-5511b514fd6 )