NAME

Unix::Getrusage - Perl interface to the Unix getrusage system call

SYNOPSIS

use Unix::Getrusage;

my $usage = getrusage; # getrusage(RUSAGE_SELF, ...)
print "CPU time: ", $usage->{ru_utime}, "\n";

DESCRIPTION

Both getrusage and getrusage_children (no arguments) return what the getrusage() call returns: ressource utilization of either the calling process or its children. They return hash references (to avoid unneccessary copying) of the rusage struct:

use Unix::Getrusage;
use Data::Dumper;

my $usage = getrusage; # see above
print Data::Dumper->new([$usage])->Dump;

which outputs something like this:

$VAR1 = {
          'ru_nivcsw' => '12',
          'ru_nvcsw' => '0',
          ...,
          'ru_utime' => '0.104414',
          'ru_stime' => '0.008031',
          'ru_nsignals' => '0'
        };

EXPORT

getrusage, getrusage_children

SEE ALSO

man 2 getrusage

AUTHOR

David Kroeber, <dk83@gmx.li>

COPYRIGHT AND LICENSE

Copyright (C) 2006 by David Kroeber

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.6 or, at your option, any later version of Perl 5 you may have available.