perl - 如何在不使用第三方工具的情况下在 perl 中获取远程机器操作系统版本

Question

我有一个要求，我必须在 perl 中找到在远程机器上运行的操作系统。该机器可以在任何操作系统上运行，从 windows、linux 到 aix。我见过很少的解决方案，但不幸的是，所有这些都需要安装在这种情况下无法完成的第三方工具。

您能否指导我以某种方式获取远程机器操作系统的详细信息（名称和版本），而无需安装第三方工具。

Answer 1

您有一台远程机器R和一台本地机器L。你到底在做什么？

• 在访问远程机器R的机器L上运行 Perl 脚本。
• 在机器L上运行一个在机器R上运行 Perl 脚本的程序。

如果您正在执行第二种方案，请查看Config模块。这是一个标准的 Perl 模块，并且至少从 Perl 5.8 开始就包含在所有版本的 Perl 中。您可以提取数百个参数。看看osname和osver。

使用起来非常简单：

use Config;   #Imports $Config hash

print "Operating system is $Config{osname}\n";
print "The version of the OS is $Config{osvers}\n";

Answer 2

如果您可以登录到每台远程计算机并且该计算机上安装了 perl，那么只需解析perl -V. 例如

$ perl -V

我的perl5（revision 5 version 12 subversion 0）配置总结：

  平台：
    osname=MSWin32，osvers=5.1，archname=MSWin32-x86-多线程
    uname='Win32 草莓perl 5.12.0.0 #1 Wed Apr 28 11:51:06 2010 i386'
    ……