NAME
Time::Beat - Module to convert from standard time to swatch 'beat' time.
SYNOPSIS
use Time::Beat qw ( beattime );
my $time_in_beats = beattime(time());
DESCRIPTION
Time::Beat is a module to provide you with the time in beats. It takes a time() formatted string, and outputs the time in beats. The basic algorithm for doing this is to take time in GMT+1 hour, convert it into seconds, and divide by 86.4. Hopefully I'll get it converting backwards at some point.
FUNCTIONS
- beattime [time string]
-
beattimeis the one and only function in Time::Beat. It will give you the current time in beats if you do not specify a time string. If you specify a time string it will return that particular time in beats.
CHANGES
If gmtime.hours == 23 before then problems were caused because the hour became 24 - it should have been 0. The problem has now been fixed.
AUTHOR
James A. Duncan <j@mesduncan.co.uk>
SEE ALSO
perl(1)