[PerlChina] perl如何获取linux系统的硬件信息

大家好

    最近想用perl来获取linux系统的硬件信息，比如： 该硬件的厂商、硬件序列号、bios信息等

版本高一点的linux系统似乎有自带pmtools包（dmidecode）,但是版本低的却没有，所以想纯使用perl来获取这些信息，请问是否可以做的到？ 如何做？

谢谢！