diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-06-08 12:14:48 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-06-08 12:14:48 +0000 |
| commit | 7939d86b6493e69ec9cce44090fe18827c92abfa (patch) | |
| tree | 3bc5d01f35bf89ba7307a5d7c76eca9a4d9d7580 | |
| parent | d10f8d7a35cd614b8cd13ba7c35b1eff548c9414 (diff) | |
| download | perl-7939d86b6493e69ec9cce44090fe18827c92abfa.tar.gz | |
Advertise the upcoming Win32::GetOSName().
p4raw-id: //depot/perl@17086
| -rw-r--r-- | pod/perlport.pod | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/pod/perlport.pod b/pod/perlport.pod index fa1d70bea8..0ebd3f60bd 100644 --- a/pod/perlport.pod +++ b/pod/perlport.pod @@ -832,8 +832,9 @@ 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>. The very portable POSIX::uname() will work too: +There are also Win32::IsWinNT() and Win32::IsWin95(), try C<perldoc Win32>, +and as of libwin32 0.19 (not part of the core Perl distribution) +Win32::GetOSName(). 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 |