Time::Seconds - a simple API to convert seconds to other date values
use Time::Piece;use Time::Seconds;my $t = localtime;$t += ONE_DAY;my $t2 = localtime;my $s = $t - $t2;print "Difference is: ", $s->days, "\n";This module is part of the Time::Piece distribution. It allows the user to find out the number of minutes, hours, days, weeks or years in a given number of seconds. It is returned by Time::Piece when you delta two Time::Piece objects.
Time::Seconds also exports the following constants:
ONE_DAYONE_WEEKONE_HOURONE_MINUTEONE_MONTHONE_YEARONE_FINANCIAL_MONTHLEAP_YEARNON_LEAP_YEARSince perl does not (yet?) support constant objects, these constants are in seconds only, so you cannot, for example, do this:print ONE_WEEK->minutes;
The following methods are available:
my $val = Time::Seconds->new(SECONDS)$val->seconds;$val->minutes;$val->hours;$val->days;$val->weeks;$val->months;$val->financial_months; # 30 days$val->years;$val->pretty; # gives English representation of the deltaThe usual arithmetic (+,-,+=,-=) is also available on the objects.
The methods make the assumption that there are 24 hours in a day, 7 days in a week, 365.24225 days in a year and 12 months in a year. (from The Calendar FAQ at http://www.tondering.dk/claus/calendar.html)
Matt Sergeant, matt@sergeant.org
Tobias Brox, tobiasb@tobiasb.funcom.com
Balázs Szabó (dLux), dlux@kapu.hu
Copyright 2001, Larry Wall.
This module is free software, you may distribute it under the same terms as Perl.
Currently the methods aren't as efficient as they could be, for reasons of clarity. This is probably a bad idea.
Perldoc Browser is maintained by Dan Book (DBOOK). Please contact him via theGitHub issue tracker oremail regarding any issues with the site itself, search, or rendering of documentation.
The Perl documentation is maintained by the Perl 5 Porters in the development of Perl. Please contact them via thePerl issue tracker, themailing list, orIRC to report any issues with the contents or format of the documentation.