Sys::Statistics::Linux::SysInfo (3pm)

    use Sys::Statistics::Linux::SysInfo;

    my $lxs  = Sys::Statistics::Linux::SysInfo->new;
    my $info = $lxs->get;

Sys::Statistics::Linux::SysInfo gathers system information from the virtual /proc filesystem (procfs).

For more information read the documentation of the front-end module Sys::Statistics::Linux.

Generated by /proc/sys/kernel/{hostname,domainname,ostype,osrelease,version} and /proc/cpuinfo, /proc/meminfo, /proc/uptime, /proc/net/dev.

hostname - The host name. domain - The host domain name. kernel - The kernel name. release - The kernel release. version - The kernel version. memtotal - The total size of memory. swaptotal - The total size of swap space. uptime - The uptime of the system. idletime - The idle time of the system. pcpucount - The total number of physical CPUs. tcpucount - The total number of CPUs (cores, hyper threading). interfaces - The interfaces of the system. arch - The machine hardware name (uname -m).

# countcpus is the same like tcpucount countcpus - The total (maybe logical) number of CPUs.

\*(C`pcpucount\*(C' and \*(C`tcpucount\*(C' are really easy to understand. Both values are collected from \*(C`/proc/cpuinfo\*(C'. \*(C`pcpucount\*(C' is the number of physical CPUs, counted by \*(C`physical id\*(C'. \*(C`tcpucount\*(C' is just the total number counted by \*(C`processor\*(C'.

If you want to get \*(C`uptime\*(C' and \*(C`idletime\*(C' as raw value you can set

$Sys::Statistics::Linux::SysInfo::RAWTIME = 1; # or with Sys::Statistics::Linux::SysInfo->new(rawtime => 1)

\fInew()\fP

Call \*(C`new()\*(C' to create a new object.

my $lxs = Sys::Statistics::Linux::SysInfo->new;

\fIget()\fP

Call \*(C`get()\*(C' to get the statistics. \*(C`get()\*(C' returns the statistics as a hash reference.

my $info = $lxs->get;

No exports.

proc\|(5)

Please report all bugs to <jschulz.cpan(at)bloonix.de>.

Jonny Schulz <jschulz.cpan(at)bloonix.de>.

Copyright (c) 2006, 2007 by Jonny Schulz. All rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.