Time::Seconds(3p) Perl Programmers Reference Guide Time::Seconds(3p) #

Time::Seconds(3p) Perl Programmers Reference Guide Time::Seconds(3p)

NNAAMMEE #

 Time::Seconds - a simple API to convert seconds to other date values

SSYYNNOOPPSSIISS #

     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";

DDEESSCCRRIIPPTTIIOONN #

 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_DAY #

ONE_WEEK #

ONE_HOUR #

ONE_MINUTE #

ONE_MONTH #

ONE_YEAR #

ONE_FINANCIAL_MONTH #

LEAP_YEAR #

NON_LEAP_YEAR #

 Since perl does not (yet?) support constant objects, these constants are
 in seconds only, so you cannot, for example, do this: "print
 ONE_WEEK->minutes;"

MMEETTHHOODDSS #

 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 delta

 The 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)

AAUUTTHHOORR #

 Matt Sergeant, matt@sergeant.org

 Tobias Brox, tobiasb@tobiasb.funcom.com

 Balázs Szabó (dLux), dlux@kapu.hu

CCOOPPYYRRIIGGHHTT AANNDD LLIICCEENNSSEE #

 Copyright 2001, Larry Wall.

 This module is free software, you may distribute it under the same terms
 as Perl.

BBuuggss Currently the methods aren’t as efficient as they could be, for reasons of clarity. This is probably a bad idea.

perl v5.36.3 2021-03-02 Time::Seconds(3p)