Select Code to Download

..........
pe32.dwSize = sizeof( PROCESSENTRY32 );
...

.....

typedef struct tagPROCESSENTRY32 {  
DWORD dwSize;  
...
TCHAR szExeFile[MAX_PATH];
} PROCESSENTRY32,  *PPROCESSENTRY32;

wchar_t *        T_PV
.......
.......
T_PV
    sv_setpv((SV*)$arg, $var);

: error C2664: 'Perl_sv_setpv' : cannot convert parameter 3 from 'WCHA
+R [260]' to 'const char *const ' (I think it more makes sense tho)