NAME

Time::Consts - Define time constants with specified base

SYNOPSIS

# Define all constants.
use Time::Consts qw/ :ALL /;

# Define just MIN and HOUR.
use Time::Consts qw/ MIN HOUR /;

# Set MIN to base, i.e. SEC = 1/60, MIN = 1, etc.
use Time::Consts qw/ min SEC MIN /;

DESCRIPTION

Time::Consts can define time constants for you. Those available are

MSEC
SEC
MIN
HOUR
DAY
WEEK

and are provided as arguments to the use() statements. An ':ALL' tag is provided to export all of the above. Default base is seconds, but that can be changed by supplying a lowercase version of any of the constants to the use statement. Note that giving a lowercase base doesn't mean that the corresponding constant automatically will be defined.

If you at any time would want to have any of the constants in another base than the one given to the use() statement just divide with that constant. E.g. WEEK / HOUR will always return 168, i.e. the number of hours per week.

If you do calendar math consider using a module designed for that.

DIAGNOSTICS

Bad argument(s): %s

(F) Self-explanatory.

Too many units: %s

(F) Self-explanatory.

AUTHOR

Johan Lodin <lodin@cpan.org>

COPYRIGHT

Copyright 2004-2005 Johan Lodin. All rights reserved.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

SEE ALSO

Time::Seconds