タグ

2013年7月12日のブックマーク (3件)

  • ゆーすけべー日記

    Perlはご存知の通りTrue/Falseと言った真偽値を扱うBooleanな型は標準で備わっていない。例えば以下のテストは偽の値と解釈され全てFailする。 use Test::More; ok(0); # Fail ok(undef); # Fail ok(''); # Fail done_testing; つまり 0 undef / 未定義値 空文字列 が偽として解釈される。普段はこうした挙動で問題は無いんだけど、キャッシュの制御の時に困ってしまい考えた挙げ句、解決策のような実装が見つかったので紹介とツッコミいただきたい次第。 追記 以下、ふつーに defined でごにょればイケる! unless(defined $value) { ...; } koba04さん、toku_bass さんあざっす。とりま自分のアプリで試してみます。 キャッシュの常套手段的にこんなフローをよく使う。

    ゆーすけべー日記
  • Pinto-0.14

    kamawada
    kamawada 2013/07/12
  • Mojolicious::Liteではじめてのアプリを作ってみた - kun432.github.com

    Kansai.pm #15 からの熱が冷めないうちに、ということで、@yusukebeさんの「Webサービスのつくり方」でもオススメされていたMojoliciousを使って、簡単なものを書いてみました。あと、ちょうどすぐわかる オブジェクト指向 Perlを読みおわったところなのっでOOPでクラスも作ってみました。 はじめてのWAF、はじめての自作クラス、と初物尽くしですが、こんなレベルでも調べながら試しながらでやってみたら数時間でそれっぽいものはできちゃうよ、ということで。 仕様 IPアドレスを入力して、「逆引き」「国情報」「Whois」のどれかを出力する。 IPアドレス関連の処理はクラスを作って、上記のそれぞれの情報に対応したメソッドを用意。 Mojolicious::Liteを使って1ファイルでシンプルに作成。 見た目は気にしない! 細かいチェックも気にしない! コード 1 2 3 4