HPUX::Pstat - Perl wrapper for
$pst = HPUX::Pstat::getstatic();
$psd = HPUX::Pstat::getdynamic();
$psv = HPUX::Pstat::getvminfo();
$pss = HPUX::Pstat::getswap(size = 1, start = 0);
$pss = HPUX::Pstat::getproc(size = 1, start = 0);
$pss = HPUX::Pstat::getprocessor(size = 1, start = 0);
This Perl modules lets you call some of the pstat(2) functions and returns system performance data in Perl data structures.
HPUX::Pstat is meant as a foundation to build performance monitoring tools upon.
HPUX::Pstat::getvminfo functions each return a hashref containing most of the respective C structure members.
HPUX::Pstat::getprocessor functions take up to two arguments and return a reference to an array-of-hashes.
The arguments specify the number of records to fetch and the index of the first record and are equivalents to the
index arguments of the respective
In any case only valid data is returned (Example: If you call
HPUX::Pstat::getprocessor(4) on a 2-processor box,
the resulting array will contain only two entries).
example1.pl dumps the data structures of all functions.
For more information read /usr/include/sys/pstat.h.
According to the pstat(2) manpage the calling interface is kernel dependent.
So do not expect too much.
HPUX::Pstat was written and tested on a HPUX 11.0 box and compiles well with Perl 5.6.1 and gcc.
So far the list of imported struct members is hardcoded in
pack.c. I also left out some of the more obscure struct members and all of the members marked as deprecated.
As any software this package may contain bugs. Please feel free to contact me if you find one.
Axel Schwenke <email@example.com>
Copyright (c) 2003 Axel Schwenke. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Version 1.01 (31 March 2003)