NAME
Sys::Statistics::Linux::DiskStats - Collect linux disk statistics.
SYNOPSIS
use Sys::Statistics::Linux::DiskStats;
my $lxs = Sys::Statistics::Linux::DiskStats->new;
$lxs->init;
sleep 1;
my $stat = $lxs->get;
Or
my $lxs = Sys::Statistics::Linux::DiskStats->new(initfile => $file);
$lxs->init;
my $stat = $lxs->get;
DESCRIPTION
Sys::Statistics::Linux::DiskStats gathers disk statistics from the virtual /proc filesystem (procfs).
For more information read the documentation of the front-end module Sys::Statistics::Linux.
DISK STATISTICS
Generated by /proc/diskstats or /proc/partitions.
major - The mayor number of the disk
minor - The minor number of the disk
rdreq - Number of read requests that were made to physical disk per second.
rdbyt - Number of bytes that were read from physical disk per second.
wrtreq - Number of write requests that were made to physical disk per second.
wrtbyt - Number of bytes that were written to physical disk per second.
ttreq - Total number of requests were made from/to physical disk per second.
ttbyt - Total number of bytes transmitted from/to physical disk per second.
METHODS
new()
Call new()
to create a new object.
my $lxs = Sys::Statistics::Linux::DiskStats->new;
Maybe you want to store/load the initial statistics to/from a file:
my $lxs = Sys::Statistics::Linux::DiskStats->new(initfile => '/tmp/diskstats.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::DiskStats->new(
files => {
# This is the default
path => '/proc',
diskstats => 'diskstats',
partitions => 'partitions',
}
);
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.
SEE ALSO
proc(5)
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.