名前¶
Date::Simple - 簡単な日付オブジェクト
概要¶
my $date = Date::Simple->new('1972-01-17');
my $year = $date->year;
my $month = $date->month;
my $day = $date->day;
my $date2 = Date::Simple->new($year, $month, $day);
my $today = Date::Simple->new;
my $tomorrow = $today + 1;
print "Tomorrow's date (in ISO 8601 format) is $tomorrow.\n";
if ($tomorrow->year != $today->year) {
print "Today is New Year's Eve!\n";
}
if ($today > $tomorrow) {
die "warp in space-time continuum";
}
# you can also do this:
($date cmp "2001-07-01")
# and this
($date <=> [2001, 7, 1])
説明¶
このモジュールは、簡単な日付オブジェクトを作ります。 Unixの時間の範囲の日付しか扱いません。 このモジュールは、不当な日付のオブジェクトを作ることを許しません。 不当な日付で作ろうとすると、undefを返します。
コンストラクタ¶
new¶
my $date = Date::Simple->new('1972-01-17');
my $otherdate = Date::Simple->new(2000, 12, 25);
渡された値が妥当な日付を指定していたら、new
メソッドは、日付オブジェクトを返します。 渡された値が不正であれば、メソッドは、undefを返します。
インスタンスメソッド¶
next¶
my $tomorrow = $today->next;
明日に相当するオブジェクトを返します。
prev¶
my $yesterday = $today->prev;
昨日に相当するオブジェクトを返します。
year¶
my $year = $date->year;
日付オブジェクトが持っている日付の年を返します。
month¶
my $month = $date->month;
日付オブジェクトが持っている日付の月を返します。
day¶
my $day = $date->day;
日付オブジェクトが持っている日付の日を返します。
format¶
これらの関数は同等です。日付を表す文字列を、指定されたフォーマットで返します。 パラメータを渡さなければ、ISO8601フォーマットが返ります。
my $change_date = $date->format("%d %b %y");
my $iso_date1 = $date->format("%Y-%m-%d");
my $iso_date2 = $date->format;
フォーマットのパラメータは、srrftime(3)に渡すものと、似ています。 これは私たちが日付をフォーマットするためにそれを実際にstrftimeに渡すからです。
演算子¶
Date:Simpleインスタンスと一緒に、いくつかの演算子を使うことが出来ます。
- + += と、-= 演算子を使って、日数によって、日付をインクリメント、デクリメント出来ます。
- * +と-演算子を使うことで、日数で、新しい日付オフセットを生成出来ます。
- * 日付の間の日数を見つけるために2つの日付を引くことができます。
- * 算術/文字列比較演算子を使って、2つの日付を比較することが出来ます。
- * ISO 8601(例:2000-01-17)で、指定された形式で、 日付オブジェクトを直接に文字列に挿入できます。
著者¶
Marty Pauley <marty@kasei.com>
著作権¶
Copyright (C) 2001 Kasei
This program is free software; you can redistribute it and/or modify it
under the terms of either:
a) the GNU General Public License;
either version 2 of the License, or (at your option) any later version.
b) the Perl Artistic License.
This program is distributed in the hope that it will be useful, but
WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
or FITNESS FOR A PARTICULAR PURPOSE.
POD ERRORS¶
Hey! The above document had some coding errors, which are explained below:
- Around line 101:
-
Expected text after =item, not a bullet
- Around line 103:
-
Expected text after =item, not a bullet
- Around line 105:
-
Expected text after =item, not a bullet
- Around line 107:
-
Expected text after =item, not a bullet