タグ

2009年4月9日のブックマーク (14件)

  • DateTime::Set と DateTime::Span の使い方がやっとわかった - 刺身☆ブーメランのはてなダイアリー

    DateTime::Set を普通に from_datetimes() で作って iterator でまわしたり as_list でリストを受け取っても、 start と end のふたつの日時しかなくて範囲の日付全部を作ることができず残念だった。 perldoc を熟読して、 from_recurrence() を使えば良いことがわかった。 こんな風にすると、 @dt には $start から $end までの範囲の日時を表す DateTime オブジェクトが入る。 ->add(days => 1) はおまじない的というか、 recurrence で指定する無名サブルーチンは DateTime オブジェクトを一つ受け取り、 The recurrence must return the next event after that object. ということらしい。 my $span = D

    DateTime::Set と DateTime::Span の使い方がやっとわかった - 刺身☆ブーメランのはてなダイアリー
  • Japan Perl Association (JPA)

    (社) Japan Perl Association Japan Perl Associationについて 一般社団法人Japan Perl Association (JPA) は Perl技術及び文化の啓蒙・促進のた めの組織です。Perl技術を利用するプロジェクト、コミュニティ、ビジネスのサポートに 取り組む事を目的とします。 理事会 Perlについて Perlは1987年に初めて発表され、以来20年以上の長きに渡って進化し続けている言語 です。インターネットの創世記にはCGIスクリプトを作成するのに多用されさらに有名に>なりました。しかしPerl自体はCGIのための言語ではありません:世界中の開発者達が自>作のライブラリを登録するCPANという巨大なライブラリネットワークを持ち、豊富なテス ト・自動化ツールを駆使して堅牢なシステム開発を可能にする、「難しい事を可能に、簡 単な事をさ

    foosin
    foosin 2009/04/09
  • 間違ったコードは間違って見えるようにする - The Joel on Software Translation Project

    Joel Spolsky / 青木靖 訳 2005年5月11日 水曜 私が最初の当の仕事をはじめたのは1983年9月に遡る。それはオラニムというイスラエルの大きな製パン工場で、16台の飛行機ほどもある巨大なオーブンで、毎晩10万個のパンが作られていた。 はじめて工場に入った時、そのあまりの汚さに信じられない思いだった。オーブンの側面は黄ばんでいるし、機械は錆びていて、そこらじゅうが油だらけだった。 「いつもこんなに汚いの?」と私は聞いてみた。 「なんだって? なんの話をしてるんだ?」とマネージャが答えた。「掃除したばかりだから、今が一番きれいな状態なんだ」 なんてこった。 毎朝の工場の清掃を何ヶ月か続けて、ようやく彼らの言っていたことが理解できるようになった。パン工場では、きれいというのは機械にパン生地が付いてないことを言うのだ。きれいというのは、ゴミ箱に発酵したパン生地が入ってないこと

  • 春なのでemacsからvimに乗り換えてみました - ふぃふmemo

    春です。 何か新しいことがしたくなるこの季節。 ついにemacsからvimに乗り換えてみました。 というわけで、ここ一週間ほどゲームtwitterもろくにせず、ひたすら.vimrcをカスタマイズしまくっていました。 正しくはカスタマイズすべくググりまくっていたんですけど‥‥。 その甲斐あってかなり結構満足するものが出来たので、思い切って晒してみます。 まず最初に私がインストールしたvimですが、いくつか試して最終的に以下のCocoa版に落ち着きました。 PrivatePortfile/Vim72 - MacPortsWiki-JP 最初はMacVimなどを使っていたのですが、他のはiminsert=0が使えませんでした。 それでは、.vimrcをぺたりんこ。 PLAIN TEXT TEXT: "--------------------------------------------

    foosin
    foosin 2009/04/09
  • はてなブログ | 無料ブログを作成しよう

    来年も作りたい!ふきのとう料理を満喫した 2024年春の記録 春は自炊が楽しい季節 1年の中で最も自炊が楽しい季節は春だと思う。スーパーの棚にやわらかな色合いの野菜が並ぶと自然とこころが弾む。 中でもときめくのは山菜だ。早いと2月下旬ごろから並び始めるそれは、タラの芽、ふきのとうと続き、桜の頃にはうるい、ウド、こ…

    はてなブログ | 無料ブログを作成しよう
    foosin
    foosin 2009/04/09
  • やってはいけない!!MySQLに悲鳴をあげさせる10の方法

    いつも「MySQLを使うときはこうするべき」という観点から記事を書いているが、今日は逆に犯してはいけない過ちをリストアップしようと思う。 1. 全てのカラムにインデックスをつけるデータベース初心者がもっともやってしまいがちな間違いはコレではないだろうか。インデックスはいい。検索がとても速くなるから。しかし、それと引き替えにインデックスは更新するときにコストがかかるし、その分多くのディスクスペースを消費する。特に更新にかかるコストは時に甚大で、該当するインデックスのページがキャッシュ上にない場合はディスクからいったんそのページを読み込まなければいけない。ディスクアクセスは動作にとても時間がかかるので、インデックスが多数、例えば全てのカラムに付いていたりすると「あれ?固まったか?」というような状態になってしまうことがあるだろう。インデックスは必要なカラムにだけつけるようにテーブルを設計しよう。

    やってはいけない!!MySQLに悲鳴をあげさせる10の方法
    foosin
    foosin 2009/04/09
  • 正規表現でマッチした部分のキャプチャ ($1,$2とか) について勘違いをしていた - @kyanny's blog

    今後また間違えそうなので丁寧めにメモ。 追記 コメント欄でせいきひょうげんの先読みという機能について教えてもらった。まだ理解できてないけど、たぶんそれを使えばスマートに解決できるのだと思う。あと、例としてかいた式が間違っていたので修正した。 - my ($a, $b) = "/b/x/2" =~ m{^(?:/(a)/x/(1))|(?:/(b)/x/(2))}; のようなコードを書いて、 $a も $b も undef になるのでしばらく悩んでいたけど、この書き方だと問題があった。 以下のようなコードを書いてみたら、意味がわかった。 #!/usr/bin/perl use strict; use Data::Dumper; my $a = q{/a/x/1}; my $b = q{/b/x/2}; my $c = q{/c/x/3}; for my $x ($a, $b, $c) { i

    正規表現でマッチした部分のキャプチャ ($1,$2とか) について勘違いをしていた - @kyanny's blog
  • これだけは読んでおきたい、すぐに使える新社会人向けビジネススキル10選 : LINE Corporation ディレクターブログ

    エイプリルフールネタの後で非常に書きづらい、当にディレクターブログ担当の飯田瞬です。べる方のニラレバは大好きというほどではありませんが、おいしいですよね。 さて、この「livedoor ディレクター Blog」読者の中で4/1から新社会人として新しいスタートを迎えた方も多くいらっしゃると思います。そこで、今まで「livedoor ディレクター Blog」に投稿されたエントリーの中で、すぐに使えるビジネススキルエントリーを10個ピックアップしてみました。 いきなり実行するのは難しいとは思いますが、覚えておいて (読んでおいて) 損はないエントリーばかりですので、是非、今週末を利用して読んでみて、月曜日から少しずつ実践してみてください! --- 【01】ディレクターの為のビジネスマナー講座 「ディレクターの為の...」とありますが、ディレクターに限らず社会人として基中の基のビジネスマナ

    これだけは読んでおきたい、すぐに使える新社会人向けビジネススキル10選 : LINE Corporation ディレクターブログ
    foosin
    foosin 2009/04/09
  • CPAN Author になりました。

    ■ [perl][tt] CPAN Author になりました。 さてやっとこさ、エイプリルフールネタですよ。じゃ無くてホントです。嘘じゃありませんって! 小松 大輔 - search.cpan.org 初 CPAN モジュールは Template-Toolkit の plugin です。Template::Plugin::PwithBR。段落を <p> でくくり、改行を <br /> に変換するだけ。それだけなんだけど、見当たらなかったんですよ。 html_para と html_break もしくは html_line_break をいろいろ組み合わせてみても期待した形にはならないんだよねぇ。それでいつも $self->tt_config( TEMPLATE_OPTIONS => { RELATIVE => 1, FILTERS => { br => sub { my $text =

    CPAN Author になりました。
    foosin
    foosin 2009/04/09
  • はてなブログ | 無料ブログを作成しよう

    来年も作りたい!ふきのとう料理を満喫した 2024年春の記録 春は自炊が楽しい季節 1年の中で最も自炊が楽しい季節は春だと思う。スーパーの棚にやわらかな色合いの野菜が並ぶと自然とこころが弾む。 中でもときめくのは山菜だ。早いと2月下旬ごろから並び始めるそれは、タラの芽、ふきのとうと続き、桜の頃にはうるい、ウド、こ…

    はてなブログ | 無料ブログを作成しよう
  • Windowsユーザのための初めてのPerlプログラミング - 葉っぱ日記

    ActivePerl (Windows版) には DynaLoader が付属しているので、今日からすぐに DynaLoader::dl_install_xsub を利用したプログラミングが出来ます。 簡単なメッセージボックスを表示するPerlプログラムは以下になります。 #!/usr/bin/perl use DynaLoader; sub GetProcAddress { my ($DLL, $API) = @_; my $path = "$ENV{SystemRoot}\\system32\\$DLL"; my $libref = DynaLoader::dl_load_file($path); pack "L", DynaLoader::dl_find_symbol($libref, $API); } my $x86 = "" . "h\0\0\0\0" . "h" . pack(

    Windowsユーザのための初めてのPerlプログラミング - 葉っぱ日記
  • Windows XP 向け ClearType 対応日本語フォント

    すべての Microsoft 製品GlobalMicrosoft 365TeamsWindowsSurfaceXboxセール法人向けサポート ソフトウェアWindows アプリAIOneDriveOutlookSkypeOneNoteMicrosoft TeamsPC とデバイスXbox を購入するアクセサリVR & 複合現実エンタメXbox Game Pass UltimateXbox Live GoldXbox とゲームPC ゲームWindows ゲーム映画テレビ番組法人向けMicrosoft CloudMicrosoft SecurityAzureDynamics 365一般法人向け Microsoft 365Microsoft IndustryMicrosoft Power PlatformWindows 365開発者 & IT デベロッパー センタードキュメントMicrosof

  • Perl ハッシュの値のリストをスカラーコンテキストで評価すると?

    $a = (3, 2, 1); の場合, 左辺がスカラー変数だから右辺もスカラーコンテキストで評価されます. で, スカラーコンテキストの場合には「(」, 「)」は普通の「優先順位を変える」意味になりかつ「,」は「順に評価する」という意味を持つ演算子になります. そのため, 上の例では 3, 2, 1 と順に評価しその最後の値である 1 が右辺の値となって $a に代入されます. 一方 @a = (3, 2, 1); の場合, 左辺が配列変数なので右辺は配列コンテキストで評価されます. この場合「(」, 「)」は配列要素をまとめるという意味, 「,」は配列要素を区切るという意味になります. で, @a は 3個の要素からなる配列になります. この状態で $a = @a; とやると, 最初の例と同様に左辺はスカラー変数だから右辺もスカラーコンテキストで評価されます. ところがこの例では右辺が

    Perl ハッシュの値のリストをスカラーコンテキストで評価すると?
    foosin
    foosin 2009/04/09
  • math/perl - 日付のhyuki表現 : 404 Blog Not Found

    2009年04月08日12:17 カテゴリLightweight LanguagesMath math/perl - 日付のhyuki表現 良問。見逃していた。 2009-03-14 - 結城浩のはてな日記 円周率3.141592653589793…の中で、最初に「"月日時分秒"と見なせる数字列」が出てくるところは、小数点以下何桁目? まず、脊髄反射で書いた答え。 use strict; use warnings; use Time::Local; use Math::BigFloat lib => 'GMP'; my $maxdigits = shift || 1000; my $pi = Math::BigFloat->bpi($maxdigits) . ''; $pi =~ s/3\./3/; for my $d ( 0 .. $maxdigits - 10) { my ( $mo,

    math/perl - 日付のhyuki表現 : 404 Blog Not Found