Perl/日付・時間処理/Time-Piece-Month の変更点

追加された行はこの色です。
削除された行はこの色です。
Perl/日付・時間処理/Time-Piece-Month へ行く。
Perl/日付・時間処理/Time-Piece-Month の差分を削除

* Time::Piece::Month（来月を求める） [#ld717226]

 use Time::Piece;
 use TIme::Piece::Month;
 
 my $this_month  = Time::Piece::Month->new( Time::Piece->new() );
 my $month200201 = Time::Piece::Month->new("2002-01-03");
 
 my @next_month_dates = $this_month->next_month->dates();
 my $next_month_1st   = [ $this_month->next_month->dates() ]->[0];
 
 say $next_month_1st->ymd; # "20XX-XX-01"