- 追加された行はこの色です。
- 削除された行はこの色です。
* 日付処理 [#ce07dd43] use POSIX 'strftime'; my $now = strftime "%Y/%m/%d %H:%M:%S", localtime; print $now, "\n"; use Time::Local $time = timelocal($sec,$min,$hour,$mday,$mon,$year); # 2000年7月 => $year=100 $mon=6 * 日付処理(日付のみ) [#b2656d73] use Date::Simple; my $date = Date::Simple->new(); print $date->format('%Y/%m/%d'), "\n";