diff options
| author | Peter Prymmer <PPrymmer@factset.com> | 2001-02-20 06:51:55 -0800 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-02-21 14:26:02 +0000 |
| commit | 34aaaa845400abfb74d5e84f98d1d59cdb650982 (patch) | |
| tree | 1fdc2482f629932d65d8a1b036a9363e014e1065 /pod/perlport.pod | |
| parent | b896c7a5a6c831ac6dcdfa1bf97349e5249a98b7 (diff) | |
| download | perl-34aaaa845400abfb74d5e84f98d1d59cdb650982.tar.gz | |
[patch perl@8841] One URL update and a possible OS Version snag for perlport.pod
Message-ID: <Pine.OSF.4.10.10102201447380.501692-100000@aspara.forte.com>
p4raw-id: //depot/perl@8874
Diffstat (limited to 'pod/perlport.pod')
| -rw-r--r-- | pod/perlport.pod | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/pod/perlport.pod b/pod/perlport.pod index de2d855ff3..457584c0cb 100644 --- a/pod/perlport.pod +++ b/pod/perlport.pod @@ -675,6 +675,15 @@ DOSish perls are as follows: Windows NT MSWin32 MSWin32-ppc Cygwin cygwin +The various MSWin32 Perl's can distinguish the OS they are running on +via the value of the fifth element of the list returned from +Win32::GetOSVersion(). For example: + + if ($^O eq 'MSWin32') { + my @os_version_info = Win32::GetOSVersion(); + print +('3.1','95','NT')[$os_version_info[4]],"\n"; + } + Also see: =over 4 @@ -1225,7 +1234,7 @@ Be OS, F<README.beos> =item * HP 300 MPE/iX, F<README.mpeix> and Mark Bixby's web page -http://www.cccd.edu/~markb/perlix.html +http://www.bixby.org/mark/perlix.html =item * |