It's pretty much all in /proc, but you need to know how to interpret it. You may also need to run the script as root, to get all system info.

This isn't Perl, but it does a nice job. See lshw It contains some hardware database info, to assist you in interpreting whats in /proc. Maybe you could use the info and do it with Perl.