Alligator Swamp

技術メモ

Time::Pieceを使って月末判定

日付が月末かどうか判定する処理、今までもっと無駄に書いてた気がするけど、こんな感じで良かった。

use Time::Piece;

my $now = localtime;
if( $now->mday eq $now->month_last_day ) {
    print "月末!", "\n";
}