The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Vulcan::SysInfo - Get various system statistics through sar, df, etc.

SYNOPSIS

 use Vulcan::SysInfo;

 my $sar = Vulcan::SysInfo->new( interval => 6 );

 my %info = $sar->info;
 my $stable = $sar->eval( 'MISC{data}{uptime} > 86400 * 1000' );

METHODS

info( $type )

Returns data of $type if $type is specified. Otherwise returns record and legend indexed by type.

eval( $test )

Evaluate a test, Returns $test when true, undef otherwise.