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
