diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-06-07 16:12:20 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-06-07 16:12:20 +0000 |
| commit | 1d65be3a6a280824a66294902ffa798d54d7fac2 (patch) | |
| tree | 9d1873b1fe52f9a6f6d78ff6877457510bffb685 /pod/perlport.pod | |
| parent | 5ccaa66fd601abc56edb6e5699fb98e3e36cfac7 (diff) | |
| download | perl-1d65be3a6a280824a66294902ffa798d54d7fac2.tar.gz | |
There are many ways to skin a Win32 (from Sarathy).
p4raw-id: //depot/perl@17063
Diffstat (limited to 'pod/perlport.pod')
| -rw-r--r-- | pod/perlport.pod | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/pod/perlport.pod b/pod/perlport.pod index 9ce42f293c..d589423c0d 100644 --- a/pod/perlport.pod +++ b/pod/perlport.pod @@ -832,8 +832,11 @@ Win32::GetOSVersion(). For example: print +('3.1','95','NT')[$os_version_info[4]],"\n"; } -There are also Win32::IsWinNT() and Win32::IsWin95(), -try C<perldoc Win32>. +There are also Win32::IsWinNT() and Win32::IsWin95(), tryC<perldoc Win32>. +The very portable POSIX::uname() will work too: + + c:\> perl -MPOSIX -we "print join '|', uname" + Windows NT|moonru|5.0|Build 2195 (Service Pack 2)|x86 Also see: |