Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW
 
PerlMonks  

Re: get hardware and OS configuration information

by pvaldes (Chaplain)
on Nov 07, 2011 at 23:44 UTC ( #936611=note: print w/replies, xml ) Need Help??


in reply to get hardware and OS configuration information

Upgraded and improved:

use Sys::Info; use Sys::Info::Constants qw( :device_cpu ); my $info = Sys::Info->new; my $cpu = $info->device('CPU'); printf "\nWe have %s ", scalar $cpu->count; printf "%s-bit CPU", scalar $cpu->bitness; printf " %s\n", scalar $cpu->identify; printf "The CPU speed is: %s\n", scalar $cpu->speed; print "We are running a ",$^O", system\n";

if you are in win you can also Use Win32::GetOSName(); Use Win32::GetOSVersion();

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://936611]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (2)
As of 2022-08-19 18:08 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?