Opened by tonewheel at 2015-01-20 23:11
User since
2011-03-19
3471 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
2011-03-19
3471 Artikel
BenutzerIn
Wenn möglich, verzichte auf Systemkommandos und nutze entsprechende Module, was Deine Scripts portabler macht. Die Version auslesen ist ganz einfach mit Win32::GetOSVersion(), Beispiel:
Die Ausgabe sieht so aus:
Du findest darin das, was c:\>ver => Microsoft Windows XP [Version 5.1.2600] auch ausgibt.
Last edited: 2015-01-21 09:00:18 +0100 (CET)
Code (perl): (dl
)
1 2 3 4 5 6
use strict; use warnings; use Data::Dumper; use Win32; print Dumper @{[Win32::GetOSVersion()]};
Die Ausgabe sieht so aus:
Code: (dl
)
1
2
3
4
5
6
7
8
9
$VAR1 = 'Service Pack 3';
$VAR2 = 5;
$VAR3 = 1;
$VAR4 = 2600;
$VAR5 = 2;
$VAR6 = 3;
$VAR7 = 0;
$VAR8 = 256;
$VAR9 = 1;
Du findest darin das, was c:\>ver => Microsoft Windows XP [Version 5.1.2600] auch ausgibt.
Last edited: 2015-01-21 09:00:18 +0100 (CET)