in reply to get system info using perl

I think the speed differences can be neglected. When running time uptime and time cat /proc/uptime the variations are much larger than the difference between the respective execution times.

But why do you want to re-invent the wheel? There are tools like Nagios and collectd (which supports perl plugins) that can be used to obtain and collect such data.