@kyanny's blog

My thoughts, my life. Views/opinions are my own.

2009-05-01から1ヶ月間の記事一覧

今日買った本と雑誌

WEB+DB PRESS Vol.50作者: 杉山貴章,羽生章洋,川口耕介,青木靖,鶴岡直也,長野雅広,森田創,伊藤直也,武者晶紀,ミック,高林哲,栗原傑享,米林正明,小飼弾,角田直行,橋本正徳,はまちや2,久末隆裕,Junio C Hamano,グニャラくん,やまだあきら,WEB+DB PRESS編集部出…

CGM(笑い)が脱広告するには

炎上→クビのコンボが怖いので日和って少し書き直しました。へたれですいませんね。編集前の本文はこちら飲み屋の与太話をテキストおこししただけなので、まぁ、そういうつもりで読んでください。CGM(笑い)は、ユーザーは無料でサービスを使えるかわりに広…

HTTPx::Dispatcher の練習

HTTPx::Dispatcher の使い方を勉強した。ごちゃごちゃ試行錯誤して、使い方がわかったので、動かすための最小限のコードを整理して github にあげた。GitHub - kyanny/httpx-dispatcher-practice: HTTPx::Dispatcher practice 参考になったソース mobirc ど…

Text::MeCab で文章を分かち書きにして Algorithm::MarkovChain でマルコフ連鎖

markov chain and mecab · GitHub #!/usr/bin/env perl use strict; use warnings; use Text::MeCab; use Algorithm::MarkovChain; use Perl6::Say; use Data::Dumper; open my $in, '<', shift or die $!; my $text = do { local $/; <$in>; }; close $in; …

Subversion の svn:ignore 属性はディレクトリ毎に設定する

$ svn propset svn:ignore . -F .svnignore $ cat .svnignore public_html/*.html *.txt $ こんなのはうまくいかない。 .gitignore とかだとこういうトップレベルからの相対パスを使った無視パターンの書き方でいけるけど、 subversion の場合は $ svn props…

Lingua::JA::Summarize 入門

Lingua::JA::Summarize sample · GitHub #!/usr/bin/env perl use strict; use warnings; use Lingua::JA::Summarize; use Perl6::Say; use Encode; my $in = do { local $/; <>; }; my $s = Lingua::JA::Summarize->new({ charset => 'utf8', mecab_charset…

Lingua::JA::Summarize と Lingua::JA::Summarize::Extract のソースを少し読んだ

Extract のほうは、名前空間的に Lingua::JA::Summarize を use してごにょごにょやってるもんだと思い込んでいたけど全然違った。 mecab 使ってどうこうするのが Lingua::JA::Summarize のほうで、 mecab 使わず自前で N-gram とかいろいろやってるのが ::E…

HTTPx::Dispatcher, HTTP::Router, Path::Router, Path::Dispatcher など入門

HTTP::Engine を動かしてみて、スタンドアロンのサーバを起動して単一のハンドラを書くところまではできた じゃあ次は Dispatcher だ HTTP::Router ってのをどこかで見かけたなとうっすら覚えてたので POD を読む HTTPx::Dispatcher, Path::Router, Path::Di…

HTTP::Engine 入門

HTTP-Engine-0.03005 - Web Server Gateway Interface and HTTP Server Engine Drivers - metacpan.org local::lib で $HOME/perl5 以下をいろいろセットアップしてからインストール。一発で依存含めて全部入った。 HTTP::Engine, HTTP::Engine::Interface::…

今週のモーニング

まだ半分くらいの、もともと興味があった漫画しか読めてない。漫画読むのにリハビリが必要になるとは・・・。 僕の小規模な生活 劇中で福満しげゆきが「あっ!トヨエツ似の編集者と若い女の編集者が楽しそうに喋りながら歩いてる! ・・・不倫?」とか妄想す…

SELECT ... INTO OUTFILE 構文を使って結果セットを CSV 形式でファイルに書き出す

MySQL :: MySQL 5.6 リファレンスマニュアル :: 13.2.9 SELECT 構文 SELECT ... INTO OUTFILE '/tmp/hoge.txt' FIELDS TERMINATED BY ',' OPTIONALLY ENCLOSED BY '"' LINES TERMINATED BY "\n" FROM ... FIELS TERMINATED BY フィールドの区切り文字を指定 …

Lingua::JA::Summarize::ExtractContent サンプル

ExtractContent のほうを使ったサンプルだったのでタイトル修正。 Lingua::JA::Summarize のほうも直に使ってみたいし、 ExtractContent がどういう風にして文章(センテンス)を取り出しているのかに興味があるのであとでソースを読もう、 Lingua::JA::Summ…

HTML::ExtractContent サンプル

http://gist.github.com/114166 #!/usr/bin/perl use strict; use warnings; use HTML::ExtractContent; use Encode; use Encode::Detect; use Perl6::Say; use Getopt::Long; use Pod::Usage; my $help; GetOptions( 'help' => \$help, ) or pod2usage(2); …

最近の AZIK

そういえばそんなものもあったな、の境地。もはや「っ」はセミコロンのキーじゃないと無理ってくらいになってる。 AZIK 入ってないキーボードでまず戸惑うのがそこ。普通に子音を重ねて「っ」を出すことを忘れかけている。そろそろ他の拡張打鍵にも手を出し…

最近の HHKB Professional 2

相変わらず、右上の記号キーの打ち間違いが多くて苦労している。。 _ =+ \| `~ パイプやチルダがなかなか出てこなかったり、 = と - を五六回連続で打ち間違えたり。矯正したいけど、こういう記号キーを自然な感じで打鍵できるテキストってプログラムのソー…

Cocoa Emacs のフォント設定をコピペした

Cocoa Emacsでのフォント設定 - あどけない話 に書いてあるフォント設定をまるまるコピペした。 ;; フォントの設定 ;; http://d.hatena.ne.jp/kazu-yamamoto/20090122/1232589385 (setq my-font "-*-*-medium-r-normal--14-*-*-*-*-*-fontset-hiramaru") (se…

LDR 購読者数を XPath Graph で可視化する

http://blog.hansode.org/archives/51936295.htmlおめでとうございます!(もちろん購読中)僕は去年の八月から、 XPath Graph を使ってここの LDR 購読者数をグラフにしています。http://xpath.kayac.com/graph/RioNOCZo3RGiaw数字が大きい方がやる気が出る…

Yahoo! Pipes むずい

『d.hatena.ne.jp』 の新着エントリー - はてなブックマーク のフィードから はてなブックマーク - mod_rewrite の RewriteMap の Apache 内部関数の使い方 - 刺身☆ブーメランのはてなダイアリー とか、ブックマークされた URL ごとのはてブ詳細ページのフィ…

続・男の子牧場

男の子牧場への不快感をわかりやすく示す例として「女の子牧場」というサイトを開設してカウンターにしたらいいかもな、と思っていたら早速作った人がいるようで。インターネットの速度はすごいな。俺が男の子牧場に感じる、なんとも形容しづらい不快感を、…

男の子牧場

アメーバが婚活ブームに便乗したサービスを作ったそうで。広報ブログが荒れているようだ http://ameblo.jp/cair/entry-10260663830.html#mainいくつかコメントを読んでみたが、家畜扱いされるのが嫌だとか、個人情報の流出が問題だとか、あとは女性が男性を…

今週のモーニング

先日「モテキ」をなかなか本屋で見つけられなかったときに、「最近漫画を読まなくなったから勘がにぶっているな」と感じたのと、久しぶりに読みたいと思った漫画を存分に読めてリフレッシュできたので、また少しずつ漫画を読み始めようかなと思って、会社の…

人間の誤り認識能力はすごい

五月も半ばだというのに、未だに花粉症に悩まされている。むしろ、アレルギーの薬を飲んでいたぶんだけオンシーズンの先月とかのほうが楽だったくらい。今日もくしゃみと鼻水が止まらなくて、ぼーっとした頭でこんなバカコードを書いて、 my $tt = Template-…

今日の eshell alias

$ alias svn 'SVN_EDITOR=/Applications/Emacs.app/Contents/MacOS/bin/emacsclient svn $*'Cocoa Emacs の中で起動した eshell から見える環境変数を定義するには environment.plist を編集して一回ログアウトしないといけないんだけどログアウト面倒くせー…

Spanning Sync が Google Calendar quota over というエラーを出し始めた

リンク先は http://spanningsync.com/help/errors/overquota/index.htmlざっと読んでみると、 Spanning Sync は実際には同期時に Google Calendar から実データを消しておらず、そのため Google Calendar 側の容量(予定を入れておける日数ということ?)を…

Hiveminder の API がさっぱりわからない

http://hiveminder.com/help/reference/API.html説明少なすぎだろ・・・いくらなんでも・・・。タスク一覧表示するサンプルくらい載せて置いて欲しいよ。これだけじゃらちがあかないしメーリングリストもスパムだらけでろくな情報がなかったので Net::Hivemi…

Hiveminder 使い始めた

今さらシリーズ。 todo.pl を使ってみたかった。アカウント持ってる気がしたけど持ってなかったので登録した。 todo.pl del #XXXX とかやってもタスク消せない。 Need a task-id to complete. とかいわれるんだが・・・スクリプト追うのが面倒くさい。ていう…

文学フリマへ行ってきた

昼飯を食べたり、洗濯物を干したりしていたら家を出るのが遅くなってしまって、16時までのところ15時49分に京急蒲田駅に到着というギリギリっぷりだったが、なんとか間に合って、いちおうお目当てだった「奇刊クリルタイ」を買うことができた。あとついでに…

Regexp::Log::Combined 0.01 on GitHub

GitHub - kyanny/regexp-log-combined-perl: Regexp: :CombinedRegexp::Log::Combined というモジュールを作りました。Regexp::Log のサブクラスで、 Regexp::Log::Common のクローンです。 Regexp::Log::Common を使っていて不便だと思っていたところを少し…

シグナルハンドラの中で SIGINT とかを無効にしたい

#!/usr/bin/perl use strict; use warnings; use Perl6::Say; my $stop = 0; $SIG{'INT'} = sub { $stop = 1; say 'sigint received'; }; while (1) { say 'loop start'; sleep 3; exit if $stop; say 'loop end'; }こんなんでできるかと思ったけど、ダメだ…

mod_rewrite の RewriteMap の Apache 内部関数の使い方

mod_rewrite には RewriteMap というディレクティブがある。その名の通り、ある入力パターンを対応する値と置き換えるもので、外部のプログラム (rewrite.pl みたいな)を指定して使うことが多かったけど、 Apache 内部関数というのも指定できる。 # 内部関…