本段的***给出一段基于 Perl 的例子代码，在 AIX系统5.3 和 6.1 上测试通过，可以侦测当前的AIX系统环境和 CPU 的类型和数量。这段代码首先运行系统命令 oslevel 得到当前系统的版本，如果是 AIX6.1 则运行命令 lparstat 判断当前系统是否为 WPAR。

无论 AIX 系统的版本如何，都加参数 -i 运行命令 lparstat 来获得分区的个数，并以此判断是否使用了微分区技术。***调用命令 prtconf 输出 CPU 的一些参数。

该段代码可以帮助用户快速了解当前环境，尤其适用于工作环境复杂或频繁变更的场景。需要指出的是对于使用了微分区技术的系统，代码的***输出的是虚拟处理器的数量。需要了解AIX系统中物理处理器和逻辑处理器状态的用户，可以参阅本文其他段落加以补充。

清单 4. 获得当前的AIX系统环境和 CPU 的类型和数量的代码示例
     

# WPAR 仅存在于 AIX 6.1 系统  
my $oslevel =  `oslevel`;   
if ($oslevel =~ m/6\.1/)   
{   
# 在 WPAR 中不带参数运行 lparstat 命令只返回警告信息  
my $output = `lparstat`;   
if ($output =~ m/The output is applicable only to the Global Environment/)   
{   
print "This machine is one WPAR with following CPU assigned.\n";   
system ("prtconf | grep Processor");   
exit 0;   
}   
}   
 
# 使用– i 参数列出详细的配置信息  
my @outputs = `lparstat -i`;   
foreach my $line (@outputs)   
{   
# 解析命令输出并得到分区个数  
if ($line !~ m/Partition Number/) {next;}   
my ($blank, $partition_num) = split /Partition Number\s+:\s/, $line;   
chomp $partition_num;   
if ($partition_num eq '-') # full system 环境没有划分微分区  
{   
print "This machine is one full system without LPARs. The system has following   
physical CPUs installed.\n";   
}elsif ($partition_num > 1) # 如果存在多于一个的分区，该AIX系统使用了微分区技术  
{   
print "This machine is one LPAR with virtual following CPUs installed.   
To check the assignment of physical CPU, please log on HMC or AMM.\n";   
}else   
{   
print "Can not decide whether current environment is one LPAR or not.   
Please check HMC or AMM to decide this.\n";   
}   
}   
# 打印处理器本身的参数  
system ("prtconf | grep Processor");   
exit 0;   

这样，在AIX系统中获得处理器资源的知识我们就讲解完毕。

【编辑推荐】

1. 讲解如何来使用AIX svmon
2. 怎样灵活运用AIX vmstat
3. AIX操作系统知识讲解
4. 使用Unix scp 在主机之间复制文件
5. AIX内存调整命令简介