Fri Feb 16 07:50:32 2018: Request 124445 was acted upon. Transaction: Ticket created by adr-perlc...@linuxtech.net Queue: PAR-Packer Subject: Par-Packer 'falsifies' PerlTk server() and Win32 GetOSName() and GetOSVersion() output on Windows 10 Broken in: (no value) Severity: (no value) Owner: Nobody Requestors: adr-perlc...@linuxtech.net Status: new Ticket <URL: https://rt.cpan.org/Ticket/Display.html?id=124445 >
When calling the Perl-Tk '$mw->server()' function or the Win32 'GetOSName()' and 'GetOSVersion()' funnctions on Windows 10 in a Perl script the output is correct as expected: $mw->server() returns 'Windows 10.0 10586 Win32' Win32::GetOSName() returns 'Win10Business (64-bit)' Win32::GetOSVersion() returns '100105862002561' But when creating an exe with Par::Packer containing the above functions and running it, the output changes to: $mw->server() returns 'Windows 6.2 9200 Win32' Win32::GetOSName() returns 'Win8Professional (64-bit)' Win32::GetOSVersion() returns '6292002002561' Please see the following perlmonks node for examples scripts and for confirmation of the issue by at least one other Perl user: http://www.perlmonks.org/?node_id=1209281 It looks to me like Par-Packer is somehow intercepting and 'falsifying' the return values of these Perl functions.