perllib.c:171:    GetModuleFileName(NULL, szModuleName, sizeof(szModuleName));
win32.c:135:    GetModuleFileName((HMODULE)((w32_perldll_handle == INVALID_HANDLE_VALUE)
win32.c:136:                            ? GetModuleHandle(NULL)