catalyst 2月 27 2013Catalystで直接Expiresヘッダーを出力する 静的なファイルは基本Expiresを設定しているんですが、動的なところにもExpires設定したいですよね？ nginxでまるっと全部Expiresを設定する事もできるんですが、動的なページまでキャッシュされても困るので、CatalystでExpiresヘッダーを返したいと思います。 Control…
Cpan 2月 26 2013Perlで、UserAgent判定する(Woothee) 特定のバージョンだけ動作を変更したかったので、ちょっとお試し。 cpanm Woothee とりあえず書いてみる。 use 5.12.4; use Data::Dumper; use Woothee; my $ua = 'Mozilla/4.0 (compatible; MSIE 8.0; Wind…
WordPress 2月 25 2013WordPressのコメントでIPが取得できてない？ Nginxでproxyした時の設定が中途半端だったようです。 wordpressのForumをあさったら、wp-config.phpで、REMOTE_ADDR上書きしないといけないみたいですね。 if(isset($_SERVER)) { $list = explode(',',$_SERVER);…
祭り 2月 24 2013湯島天神「梅まつり」(神輿渡御) 湯島の梅まつりに神輿が出るって事で、軽く見学。 宮入の時間が湯島天神のページに載ってたので、宮入時間に到着ｗ ちなみに梅はボチボチ咲いてましたが、満開って感じでは無かったです・・。…
Perl 2月 23 2013Facebook::GraphでアクセスしているURLを取得する Facebook::Graphで実際にアクセスしているURLをログに出力したかったので、軽く調べた。 use Facebook::Graph; my $fb = Facebook::Graph->new( app_id => $facebook_application_id, secre…
DVD 2月 20 2013伊集院光のばらえてぃーぷらす ランナーズハイでわっはっはの巻 今回の企画もIJPで似たようなのあったような？ とりあえず三田寺ちゃんファンと、田代さやかファンは買うべしｗ 伊集院光のばらえてぃーぷらす ランナーズハイでわっはっはの巻…
廃墟 2月 17 2013廃初め2013 もう2月になってしまいましたが、ようやく今年の廃初めです。 昨年末の廃納めと同じメンバーですが、N氏、ネオピラトンさんと、友人と自分の4人で行ってきました。 今回も伏字にする必要が無いところばかりですが、伏字の方が雰囲気でるかな？ｗ ホテルB 心霊スポットとして有名なところ。 噂では夜になるとピアノ…
catalyst 2月 16 2013Catalyst::View::JSONでJSONPからの～jQuery.ajax。 普段JSONPを使う機会があまりないので、すぐ忘れますｗ 毎回ぐぐるのもあれなんでメモ程度に。 C::Plugin::ConfigLoaderで読まれるファイルに、allow_callbackを追加。 View::JSON: expose_stash: json_data allow_callbac…
