On 2019-11-22 23:41, ToddAndMargo via perl6-users wrote:
     > Hi All,
     >
     > In Perl6 for Windows, how do I tell if I am
     > in Windows 7 or 10?
     >
     > Many thanks,
     > -T

    What I have so far:

    Windows 6.  I am not even going to ask...


    Windows version:

    Windows 10:

    C:\>ver
    Microsoft Windows [Version 10.0.18363.476]

    perl6 -e "my $Rtn = qx ( ver ); my $Ver = $Rtn.lines[1].words[3]; $Ver
    ~~ s/ \] //; $Ver ~~ s/ \. .* //; say $Ver;"
    10



    Windows 7:

    C:\>ver
    Microsoft Windows [Version 6.1.7601]

    perl6 -e "my $Rtn = qx ( ver ); my $Ver = $Rtn.lines[1].words[3]; $Ver
    ~~ s/ \] //; $Ver ~~ s/ \. .* //; say $Ver;"
    6


On 2019-11-23 10:22, Brad Gilbert wrote:
Windows before Windows 10 had different internal and external numbers.

https://www.gaijin.at/en/infos/windows-version-numbers


Hi Brad,

Hmmmm.  Sounds like a table of hashes in the making.

Thank you!

-T

Reply via email to