Unix::Uptime - Determine the current uptime, in seconds, and load averages, across different *NIX architectures
# Standard Usage use Unix::Uptime; my $uptime = Unix::Uptime->uptime(); # 2345 # "HiRes" mode use Unix::Uptime qw(:hires); my $uptime = Unix::Uptime->uptime_hires(); # 2345.123593 # Load Average my ($load1, $load5, $load15) = Unix::Uptime->load(); # (1.0, 2.0, 0.0)
This is a rather simple module that abstracts the task of figuring out the current system uptime, in seconds. It was born out of a desire to do this on non-Linux systems, without SNMP. If you want to use SNMP, there are pleanty of modules on CPAN already.
Additionally, since version 0.33_02, it supports retrieving the load average.
Currently, this module just supports Linux, FreeBSD, Darwin (Mac OS X), OpenBSD, and NetBSD. It should be easy enough to add support for other operating systems, though.
While this module doesn't provide any functions for exporting, if the tag :hires is given, then uptime_hires static method will be available. It returns decimal numbers when possible, but on some systems it is simply an alias for uptime(). This will likely require the Time::HiRes module to be available. Otherwise, they will simply be whole seconds.
:hires
uptime()
The following static (class) methods are available:
This takes no arguments, and simply returns the number of seconds this system has been running. This will always be an integer.
This is only available if the :hires import tag is used. It returns the system uptime with a greater resolution than one second on supported platforms. On some platforms, its results may not be any more precise than uptime(), though. On different platforms, this requires different additional modules:
No additional requirements.
Requires Time::HiRes
No more precise than uptime()
This returns an array of the load averages for the last 1, 5, and 15 minutes. The degree of precision varies from system to system.
Sys::Load(3) and Sys::Uptime(3) for Linux-specific implementations.
Win32::Uptime for Win32.
This currently doesn't support more than Linux, FreeBSD, Darwin (Mac OS X), OpenBSD, and NetBSD. Contributions for other operating systems would be welcome.
NOTE: This module is still a work in progress, under fairly heavy development. While I think the final API should be mostly finalized at this point, I won't commit to an API freeze until version 1.0.
This project is developed using git. The repository may be browsed at: https://github.com/pioto/Unix-Uptime
Patches in git-format-patch style are preferred. Either send them to me by email, or open an RT ticket http://rt.cpan.org/Public/Bug/Report.html?Queue=Unix-Uptime.
Mike Kelly <pioto@pioto.org>
Copyright (C) 2008-2014, Mike Kelly.
This module is free software; you can redistribute it and/or modify it under the same terms as Perl 5.10.0. For more details, see the full text of the licenses at <http://www.perlfoundation.org/artistic_license_1_0>, and <http://www.gnu.org/licenses/gpl-2.0.html>.
This program is distributed in the hope that it will be useful, but without any warranty; without even the implied warranty of merchantability or fitness for a particular purpose.
To install Unix::Uptime, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Unix::Uptime
CPAN shell
perl -MCPAN -e shell install Unix::Uptime
For more information on module installation, please visit the detailed CPAN module installation guide.