Masayuki Matsuki > Time-Piece-Plus > Time::Piece::Plus

Download:
Time-Piece-Plus-0.05.tar.gz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 0.05   Source  

NAME ^

Time::Piece::Plus - Subclass of Time::Piece with some useful method

SYNOPSIS ^

  use Time::Piece::Plus;

  my $now = localtime();
  my $today = Time::Piece::Plus->today;

  #As class method
  my $today     = Time::Piece::Plus->today;
  my $yesterday = Time::Piece::Plus->yesterday;
  my $tomorrow  = Time::Piece::Plus->tomorrow;

  #As instance method
  my $time = Time::Piece::Plus->yesterday;
  my $two_days_ago = $time->yesterday;
  my $today = $time->tomorrow;

  #returns hour truncated object
  $time->truncate(to => 'day');

  #parse MySQL DATE
  my $gm_date    = Time::Piece::Plus->parse_mysql_date(str => "2011-11-26", as_localtime => 0);
  my $local_date = Time::Piece::Plus->parse_mysql_date(str => "2011-11-26", as_localtime => 1);
  #default is localtime
  my $local_date = Time::Piece::Plus->parse_mysql_date(str => "2011-11-26");

  #parse MySQL DATETIME
  my $gm_datetime    = Time::Piece::Plus->parse_mysql_datetime(str => "2011-11-26 23:28:50", as_localtime => 0);
  my $local_datetime = Time::Piece::Plus->parse_mysql_datetime(str => "2011-11-26 23:28:50", as_localtime => 1);
  #default is localtime
  my $datetime       = Time::Piece::Plus->parse_mysql_datetime(str => "2011-11-26 23:28:50");

  #calculete
  my $date = localtime();
  $date = $date->add(10);
  $date = $date->add(Time::Seconds->new(10);
  $date = $date->add(days => 1, hours => 12);
  $date = $date + 3600;

  $date = $date->subtract(10);
  $date = $date->subtract(Time::Seconds->new(10);
  $date = $date->subtrace(days => 1, hours => 12);
  $date = $date - 3600;
  $time_seconds = $date - Time::Piece::Plus->today;

DESCRIPTION ^

Time::Piece::Plus is subclass of Time::Piece with some useful method.

METHODS ^

today

If called as a class method returns today. Also, if called as an instance method returns the day. And time is cut.

yesterday

If called as a class method returns yesterday. Also, if called as an instance method returns the previous day. And time is cut.

tomorrow

If called as a class method returns tomorrow. Also, if called as an instance method returns the next day. And time is cut.

truncate

Cut the smaller units than those specified. For example, "day" if you will cut the time you specify. 2011-11-26 02:13:22 -> 2011-11-26 00:00:00 Each unit is a minimum cut.

parse_mysql_date

Parse MySQL DATE string like "YYYY-mm-dd". as_localtime is optional, default is 1.

parse_mysql_datetime

Parse MySQL DATETIME string like "YYYY-mm-dd HH:MM:SS". as_localtime is optional, default is 1.

mysql_date

Format MySQL DATE string like "YYYY-mm-dd". If you call a class method and returns the format today. Also, if called as an instance method returns the date and format of the instance.

mysql_datetime

Format MySQL DATE string like "YYYY-mm-dd HH:MM:SS". If you call a class method and returns the format now. Also, if called as an instance method returns the date and format of the instance.

add(Int|Time::Seconds|Hash)

subtract(Int|Time::Seconds|Time::Piece|Hash)

Calculate and return new Time::Piece::Plus or Time::Seconds object using specified argument. If you specify Int, Time::Seconds or Time::Piece(::Plus)?, behavior is same as original Time::Piece. Operator overload is also available.

If you specify Hash(not HashRef), behavior is similar to DateTime's these methods. But, they don't change object itself and returns new object. Available Hash keys are as follows, and Hash values are Int.

seconds
hours
days
months
years

AUTHOR ^

Nishibayashi Takuji <takuji {at} senchan.jp>

SEE ALSO ^

Time::Piece,Time::Piece::MySQL,DateTime

LICENSE ^

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

syntax highlighting: