20130927 perlbeginners 10 time-piece
- 2. 廣吭 !! ? Time::Piece を嶄伉にZってます。 ? Time::Piece 嶄伉に陶ってます。 ? 書までやってしまったバグ ? 書まで巓りの繁がやったバグ ? だので、醤悶議 ? かと房います。
- 3. 徭失B初 ? 恷除、あんまり Perl いてません。 ? マネジメントばかりやってるんです orz=3
- 4. その念に
- 6. x撃畷 !! お便りって、 1 定くらいで￣お卦し￣しますよ ね? だので、栖定お便りをお卦ししたら、捻壓 バグがワラワラ竃てくるんじゃないのかと ´。 ちょっと伽い誅颪靴討澆拭
- 7. で、云籾
- 8. アジェンダ ? Time::Piece のB初 ( かるく ) ? Time::Piece を聞っていて軟こすバグと 貨をつらつらと。
- 9. Time::Piece B初 my $times = time(); my ($sec,$min,$hour,$mday,$month,$year, $wday,$stime) = localtime($times); $year += 1900; print ＾Year is ￣, $year, ＾n￣; #Year is 2013
- 10. Time::Piece B初 use Time::Piece; my $t = localtime; print ＾Year is ￣, $t->year, ＾n￣; #Year is 2013
- 11. かんた ん !! 4 佩が 2 佩に ! ､零桑とか櫃砲靴覆 !
- 12. Time::Piece B初 Perl 5.10 から淵皀献紿`ルに秘ってま すぉ。
- 13. バグった スタ`ト
- 14. バグった 1 my $t1 = Time::Piece->strptime("2013-09-27 17:00:00","%Y-%m%d %H:%M:%S"); say $t1->datetime; #2013-09-27T17:00:00 my $t2 = localtime->strptime("2013-09-27 17:00:00","%Y-%m%d %H:%M:%S"); say $t2->datetime; #2013-09-27T17:00:00
- 15. バグった 1 書のやつ揖じだと房うじゃないですか。 say $t1->epoch; #1380301200 say $t2->epoch; #1380268800 タイムゾ`ンが、ずれてるんで epoch rgが`ってます。 rgの曳^なんかしたらもうね´。
- 17. バグった 2 my $t2 = localtime->strptime("2013-09-27 17:00:00","%Y-%m%d %H:%M:%S"); say $t2->datetime; #2013-09-27T17:00:00 * Version 1.15
- 18. バグった 2 阻盾、ハッハ` !! localtime 聞ってるぜ` !! say $t2->epoch; #1380301200 Time::Piece で strptime したrの epoch になっとるやない か` !!
- 19. 貨 バ`ジョン 1.15 參 念は聞うな !! 1.16 の Changes にいてある。 Implement %z for the internal implementation of strptime(). Unfortunately this doesn't get picked up everywhere, so there are no tests for it (yet - patches welcome).
- 20. バグった 3 # F壓r震 :2013/09/27 17:00:00 my $t = Time::Piece->new; $t += ONE_MONTH; #2013-10-28T04:12:42
- 21. バグった 3 27 晩が 28 晩なっていたりと。 きっかり 1 ヶ埖ではない。
- 23. その麿 バグった ? Time::Piece をテストするrの epoch ? 24 rg ( 晩またぎ ) を階えるプロセスでの g佩 ? デ`タリセットrgのO協