SYNOPSIS
use Sys::Statistics::Linux::PgSwStats;
my $lxs = Sys::Statistics::Linux::PgSwStats->new;
$lxs->init;
sleep 1;
my $stat = $lxs->get;
Or
my $lxs = Sys::Statistics::Linux::PgSwStats->new(initfile => $file); $lxs->init; my $stat = $lxs->get;
DESCRIPTION
Sys::Statistics::Linux::PgSwStats gathers paging and swapping statistics from the virtual /proc filesystem (procfs).For more information read the documentation of the front-end module Sys::Statistics::Linux.
PAGING AND SWAPPING STATISTICS
Generated by /proc/stat or /proc/vmstat.
pgpgin - Number of pages the system has paged in from disk per second. pgpgout - Number of pages the system has paged out to disk per second. pswpin - Number of pages the system has swapped in from disk per second. pswpout - Number of pages the system has swapped out to disk per second. The following statistics are only available by kernels from 2.6. pgfault - Number of page faults the system has made per second (minor + major). pgmajfault - Number of major faults per second the system required loading a memory page from disk.
METHODS
new()
Call "new()" to create a new object.
my $lxs = Sys::Statistics::Linux::PgSwStats->new;
Maybe you want to store/load the initial statistics to/from a file:
my $lxs = Sys::Statistics::Linux::PgSwStats->new(initfile => '/tmp/pgswstats.yml');
If you set "initfile" it's not necessary to call sleep before "get()".
It's also possible to set the path to the proc filesystem.
Sys::Statistics::Linux::PgSwStats->new( files => { # This is the default path => '/proc', stat => 'stat', vmstat => 'vmstat', } );
init()
Call "init()" to initialize the statistics.
$lxs->init;
get()
Call "get()" to get the statistics. "get()" returns the statistics as a hash reference.
my $stat = $lxs->get;
raw()
Get raw values.EXPORTS
No exports.REPORTING BUGS
Please report all bugs to <jschulz.cpan(at)bloonix.de>.AUTHOR
Jonny Schulz <jschulz.cpan(at)bloonix.de>.COPYRIGHT
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.