in reply to Re: Re: Conveting SNMP-returned ticks to
in thread Conveting SNMP-returned ticks to
#!/usr/bin/perl use strict; # Calculate ticks per second, minute, hour, and day my $TICKS_PER_SECOND = 100; my $TICKS_PER_MINUTE = $TICKS_PER_SECOND * 60; my $TICKS_PER_HOUR = $TICKS_PER_MINUTE * 60; my $TICKS_PER_DAY = $TICKS_PER_HOUR * 24; sub tick2time { my $ticks = shift; my $seconds = int($ticks / $TICKS_PER_SECOND) % 60; my $minutes = int($ticks / $TICKS_PER_MINUTE) % 60; my $hours = int($ticks / $TICKS_PER_HOUR) % 24; my $days = int($ticks / $TICKS_PER_DAY); return ($days, $hours, $minutes, $seconds); }
-Matt
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Re: Re: Re: Conveting SNMP-returned ticks to
by salsa (Acolyte) on Nov 27, 2001 at 01:44 UTC |