#名称

Perl::OSType - 将 Perl 操作系统名称映射到通用类型

#版本

版本 1.010

use Perl::OSType ':all';

$current_type = os_type();
$other_type = os_type('dragonfly'); # gives 'Unix'

提供特定于操作系统的行为的模块通常需要知道当前操作系统是否与更通用的操作系统类型匹配。例如，“linux”是“Unix”操作系统的类型，“freebsd”也是如此。

此模块提供了一个映射，将 $^O 给出的操作系统名称映射到一个更通用的类型。初始版本基于 Module::Build 和 ExtUtils::CBuilder 中提供的操作系统类型映射。（因此，Microsoft 操作系统被赋予类型“Windows”而不是“Win32”。）

默认情况下不导出任何函数。导出标记“：all”将导出下面列出的所有函数。

$os_type = os_type();
$os_type = os_type('MSWin32');

返回给定操作系统名称的单个通用操作系统类型。如果没有参数，则返回 $^O 当前值的 OS 类型。如果操作系统无法识别，该函数将返回空字符串。

$is_windows = is_os_type('Windows');
$is_unix    = is_os_type('Unix', 'dragonfly');

给定 OS 类型和 OS 名称，如果 OS 名称属于给定类型，则返回 true 或 false。与 os_type 一样，如果未提供 OS 名称，它将使用当前操作系统作为默认值。

请通过 https://github.com/Perl-Toolchain-Gang/Perl-OSType/issues 上的问题跟踪器报告任何错误或功能请求。您将自动收到有关您问题进展的通知。

这是一个开源软件。根据许可证条款，代码存储库可供公众审查和贡献。

git clone https://github.com/Perl-Toolchain-Gang/Perl-OSType.git

David Golden <dagolden@cpan.org>

这是一个免费软件；您可以在与 Perl 5 编程语言系统本身相同条款下重新分发或修改它。