技術ブログ

Perlでの日付処理

投稿日：2017年1月16日

Perlで翌月の月末を求め、yyyyMMddで表示する計算があったので対応。

知識がなかったんで何気にちょい時間がかかりました。PerlではこのDateTimeというライブラリがよさげ。

use DateTime;

my $today = DateTime->now;
my $from =  DateTime->new( year => $today->year, month => $today->month , day=>1 )->add(months => -1, end_of_month => "preserve")->ymd('/');
my $next_month = DateTime->now->add(months => 1, end_of_month => "preserve");
my $to   =  DateTime->last_day_of_month( year => $next_month->year , month => $next_month->month )->ymd('/');

1

2

3

4

5

6

use DateTime;

my $today = DateTime->now;

my $from = DateTime->new( year => $today->year, month => $today->month , day=>1 )->add(months => -1, end_of_month => "preserve")->ymd('/');

my $next_month = DateTime->now->add(months => 1, end_of_month => "preserve");

my $to = DateTime->last_day_of_month( year => $next_month->year , month => $next_month->month )->ymd('/');

参考リンク

http://monmon.hateblo.jp/entry/20100428/1272438175
http://iandeth.dyndns.org/mt/ian/archives/000619.html
http://memo.sugyan.com/entry/20140131/1391177666

-Perl
-ライブラリ

執筆者：matsumoto

comment コメントをキャンセル

関連記事

: Perlの配列、ハッシュ系の処理(grepを中心に)

Perlの配列やハッシュで便利そうな処理をgrepを中心にいろいろ調べてみました。 Contents1 grepとは？2 grepを使った配列処理　基本3 grepを使った配列処理　ハッシュを含む多次 …

: Perlにおけるオブジェクト指向

今回はPerlのオブジェクト指向について。 Javaほどの厳密性はありませんが、Perlでもオブジェクト指向的なプログラミングを行うことは可能です。今回はPerlのオブジェクト指向をさらっと基本的な …

: PerlでのCSV取込+金額のカンマ表示

CSV取込の場合、単純にカンマで区切って配列を取得するだけのロジックを実装すると様々な弊害が起きます。よく見られるパターンとしては下記のようなケースでしょう。フィールドの中に、カンマがあった場合、 …

: 大容量データの取り込みについて

普段プログラムを組むときには可読性や保守性が大事なポイントになりますが、それと同じぐらい速度やメモリ効率なんかも大事です。今回は少ないメモリでもなんとかできるような工夫をちょっとかいていこうかなと思 …

: Basic認証のあるページの情報の取得

ひさびさにＰＨＰネタです。ＰＨＰではWEBページを保存するときにfile_get_contents(url)と書いてあげるとHTMLデータを取得できます。が、Basic認証などのページは当然fal …

PREV: PHP(DBアクセス)→HTML→Angularを実行するために
NEXT: セッションとクッキーについて

: 2019/05/05

docker-composeに関して

: 2019/05/05

dockerコンテナ間での連携(PHP+MySQL)

: 2019/05/03

ajaxのasync:falseと複数DBのjoinに関して

: 2019/04/28

dockerでの環境構築〜コンテナ作成し、実作業ができるまで(mac編)

: 2019/04/28

JavaScriptのcall,bind+npmからのライブラリ読み込みで