CPU情報の取得

---

　Win32::SystemInfoモジュールを使います。Windows用です。

use Win32::SystemInfo;

my %cpuinfo;
Win32::SystemInfo::ProcessorInfo(%cpuinfo);

for($i = 0; $i < $cpuinfo{NumProcessors}; $i++) {
	printf "Vendor       : %s\n", $cpuinfo{"Processor$i"}->{VendorIdentifier};
	printf "Identifier   : %s\n", $cpuinfo{"Processor$i"}->{Identifier};
	printf "ProcessorName: %s\n", $cpuinfo{"Processor$i"}->{ProcessorName};
	printf "MHz          : %s\n", $cpuinfo{"Processor$i"}->{MHZ};
	print "\n";
}

---

関連項目

・OS名の取得
・メモリ情報の取得