閏年（うるうどし）の話題。 Twitterで見かけた話題で「西暦1年は閏年かどうかぱっとわからん人おる？」という些か煽り気味のツイートを見かけたのだけども、反射的に「閏年じゃないに決まってるじゃん」とぱっと答えてしまわないだろうか。本当にそうだろうか？　そう単純な話なのだろうか？ プログラミングを学んでカレンダーを扱うことを学ぶ際に置閏法についても簡単に触れられることがある。置閏法というのは閏年や閏月（太陰暦では1年が13ヵ月になるケースがあり追加の月を閏月と呼ぶ）をどのようなルールで挿入するかという話で、まさにアルゴリズムであるからプログラミングの話題と相性がいい。 置閏法 現代の西暦の置閏法（ちじゅんほう）は 西暦を 400 で割り切れる年は閏年 上記以外で西暦を 100 で割り切れる年は平年 上記以外で西暦を 4 で割り切れる年は閏年 上記以外は平年 といった手続きで閏年（つまり2月

10月25日午前3時に欧州では冬時間に（2020年10月25日作成）。(c)AFP/Valentina BRESCHI 【10月25日 AFP】欧州では25日午前3時に「冬時間」に変わり、時計が1時間戻った。冬時間が終わるのは来年3月28日となっている。 欧州では1916年以来、毎年春と秋に時計の針を1時間ずらしていたが、欧州議会（European Parliament）は2019年3月、この「夏時間」制度を2021年に廃止する案を賛成多数で可決した。 欧州連合（EU）加盟国は、現在使用されている夏時間と冬時間のどちらかを年間を通して使う標準時に選択しなければならない。 夏に時計を1時間早め、冬に戻すという制度を最初に採用したのは、ドイツ帝国とオーストリア・ハンガリー帝国で、第1次世界大戦（World War I）中に電力を節約するためだった。同年には、大英帝国とフランスもそれに倣った。

2020年の東京五輪の暑さ対策のために（もしかしたら放映権収入の増加も狙って？）2019-2020年の夏時間の実施が検討されている。 システムの検証・更新に莫大な手間がかかる。やめてほしい。 日本でも1948年〜1951年に行われたが不評のため廃止 韓国では1988年のソウル五輪のため1987-1988年に夏時間を実施したが廃止 中国では1986-1991年に実施したが，十分な節電効果があがらず，不便も大きく，廃止 米国は1918年から段階的に実施。カリフォルニアでは廃止議論が進行中 欧州（EU）では84%が反対，夏時間廃止？（） Daylight saving time by country (Wikipedia) ソウル五輪で夏時間を実施したのは，暑さ対策ではなく，放送時間の問題。朝日新聞1987年5月9日： 夏時間の狙いのひとつに、ソウル五輪のテレビ放映問題があることは多くの関係者が

こんにちは、アプリケーションエンジニアの id:nanto_vi です。この記事ははてなデベロッパーアドンベントカレンダー 2015 の 2 日目です。 Perl で日時を扱うモジュールのひとつに Time::Piece があります。コアモジュールなので手軽に使えますが、Perl - Time::Piece に関するとりとめのないコト - Qiita にもまとめられているように注意すべき点も多いです。ここでは、そのような注意点をいくつか挙げていきたいと思います。 なお、以下のコードは Time::Piece 1.31 で確認しています。 タイムゾーン情報を持たない 大前提として、Time::Piece のインスタンスはタイムゾーン情報を持っていません。持っているのはローカル時間か GMT かの区別のみです。その「ローカル時間」が実際にどのタイムゾーンなのかは、環境 (環境変数 TZ の値な

_ [システム運用][Perl] 入力行に時刻を付けて吐き出すフィルタ 特定のサーバに ping 打ちっ放しとか、vmstat しっぱなしということが良くあるわけですが、いずれも各行に現在時刻を付けてくれないので後でログを確認する時になかなか不自由です。 で、そういう不便なコマンドの出力結果にタイムスタンプを付加するフィルタスクリプト↓ #!/usr/bin/env perl use strict; use warnings; use POSIX; $| = 1; while (defined(my $line = <>)) { print strftime("%F %T ", localtime), $line; } を puttime.pl とかいう名前でパスの通った場所に置いて、各コマンドの出力結果を渡してやるとｳﾏｰらしいです。 例えば ping -i 1 www.yahoo.co

デバッグ用ファイルの出力処理を書いた。 Perl5.10で標準ライブラリとして使うことのできるTime::Pieceモジュールで、日時指定などを行っている。 これまで日時指定といえばTime::Localモジュールを使っていたが、Time::Pieceの方が、 明示的に名前を指定できるので、直感で分かりやすいので、こっちを使っていこう。 後、改行文字と改行コードの違いも知らなかった。 とりあえず¥n置けばいいと思ってた。 Unix、Windows,Makintoshでそれぞれ違うみたいだし、おいおい勉強していく。 実行する処理 作成したログファイルを出力 $ cat 20140204.log 20140204 16:11:35-Status:success 参考: 文字コードと改行コードについて 第15回　DateTime：APIの標準化をめざして：モダンPerlの世界へようこそ｜gihy

現在のTime::Pieceの最新版は、1.27。 翌月は何月か、というのを得るのに #!/usr/bin/env perl use strict; use warnings; use Time::Piece; my $t = localtime; print $t->add_months(1)->mon, "\n"; というコードを書いていて、1月31日に実行したら3が返ってきていてハマった。という話。 Time::Piece::add_monthsで月を操作した結果の日付がその月の月末を超えていると、正規化されて翌月の日付になってしまうようだ。 $ perl -MTime::Piece -E 'say Time::Piece->localtime->ymd' 2014-01-31 $ perl -MTime::Piece -E 'say Time::Piece->localtime->

cho45 さんが作られた Test::Time と日付系モジュール (DateTime や Time::Piece など) と同時に使用する場合には注意が必要です。 Test::Time の動作を補足的に解説しますと、このモジュールは sleep() と time() を上書きしています。 sleep() が呼ばれると、本来ならば引数として与えられた秒数だけスリープしますが、 Test::Time を use しているとスリープされません (つまり即座にsleep() は処理を終える)。 その代わりに、引数として sleep() に与えられていた秒数を time() によって得られる秒数に加えるという動作を行います。 ...日本語で説明するのがなんだか難しいので、参考コードを掲示します。 こんな感じです。おわかり頂けるでしょうか。 で。 例えば以下の様なコードは期待通りに動作しません。

キャリア、転職、人材育成のヒントを提供してきた「リスキリング」チャンネルは新生「NIKKEIリスキリング」としてスタート。 ビジネスパーソンのためのファッション情報を集めた「Men’s Fashion」チャンネルは「THE NIKKEI MAGAZINE」デジタル版に進化しました。 その他のチャンネルはお休みし、公開コンテンツのほとんどは「日経電子版」ならびに課題解決型サイト「日経BizGate」で引き続きご覧いただけます。

最初は「最近横暴だなー」とか思っていたけど、よく考えると、絶対時刻表記より相対時刻表記の方が理にかなっていると気づいた。 要するにタイムゾーンの問題。日本だとタイムゾーンがひとつしか無いからわかりにくいだろうけど、アメリカは複数ある。 例えば、「サンフランシスコからスマホを持ってニューヨークへ飛行機で移動、その間に中央部の友達がツイートを投稿、それをニューヨークで降りてから閲覧」というシチュエーションを考えると、「13:22」とかいう絶対時刻表記よりも「3時間前」という相対時刻表記の方がわかりやすい。だって、「13:22」って書かれても、その時刻がどのタイムゾーンなのか、仮にニューヨークだとしてもスマホの時刻設定が十分正確なのかは、いちいち確認しないといけない。新しいスマホは自動的にタイムゾーンをあわせてくれるけど、古い携帯や、簡素なノートパソコンだとあわせてくれない可能性がある。だったら

てっきりHTML5のtime要素のdatetime属性などで使われる日付と時刻のフォーマットはW3CDTFだと思い込んでいたんだけど、違った。ISO 8601というわけでも、W3CDTFのようにそのサブセットというわけでもないので、パースする時はそこそこ気をつける必要がありそう。知らなければ幸せだったような気がしないでもない。 日付けと時刻の間のT A "T" (U+0054) character or a U+0020 SPACE character Tの代わりに半角スペースでも良い。ISO 8601では許可されないので、ISO 8601のパーサーではエラーが起こる可能性が高い。 タイムゾーンの: Optionally, a ":" (U+003A) character コロンは省略可能になっている。これはISO 8601と同じ。Nu Validatorとかは非対応なのでエラーになる。

『いまを映す、いまを読み解く』 激動する日本、そして不確実性を増す世界の「いま」。 背景に何があるのか。あすにつながる展望は。 東京や全国各地、海外で、その日のニュースの現場を徹底取材。 多角的な視点から問題を読み解き、深く、わかりやすくお伝えします。

こんにちはこんにちは、sakurako_sです。 日本の祝日を求めるのに便利なCalendar::Japanese::Holidayをゆるふわっと紹介します。 このモジュールには2つの関数があります。 isHoliday() - 指定日が祝日なら祝日名を返す getHolidays() - 指定月の祝日とその名前のハッシュリファレンスを返す コードを見てみましょう。 use strict; use Calendar::Japanese::Holiday; use YAML qw/Dump/; use Perl6::Say; binmode STDOUT, ':utf8'; # 祝日の名前 say isHoliday(2012, 1, 9); # 指定月の祝日 say Dump getHolidays(2012, 1); 実行結果は次の通り。 成人の日 --- 1: 元日 9: 成人の日 振