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.