これはなに？ cperl-mode向けのマイナーモードです。 useしているメソッド、インストールされているモジュール、組み込み変数,関数、他のperlバッファの関数,変数、バッファのdabbrev候補などを補完したりperldocを引いたりする動作をanythingのUIで実行することができます。 インストール 以下から最新版をダウンロードできます。 http://svn.coderepos.org/share/lang/elisp/perl-completion/trunk/perl-completion.el ロードパスが通った場所に置いてcperl-modeのhookでマイナーモードをonにしてください、以下、設定サンプルです。 (add-hook 'cperl-mode-hook (lambda () (require 'perl-completion) (perl-comple

久しぶりに何か書きます。 情報検索のアルゴリズムで「BM25」というものがあります。 何年か前に某研究所に遊びに行ったときに「TF/IDFより精度のいいやつ」みたいな感じでかなりアバウトに教えてもらいました。 その時は「名前だけでも覚えて帰ろう」と思っていたのですが、帰りに安い居酒屋で大酒をのみ、電車のなかで騒いでしまうほど酔っ払ってすっかりその名前を忘れてしまってました。（なにやってんだか・・・） で、最近Web+DB pressをパラパラ見ていたらBM25の名前を発見！ああ、これだこれだ、思い出したよ！ というわけで、重い腰を上げてモジュール化してみました。 githubに上げてあります。 Lingua::JA::OkapiBM25 http://github.com/miki/Lingua-JA-OkapiBM25 そのうちCPANからも落とせるようになります。 正式名称は「Okap

サキとは彼女の自宅近く、湘南台駅前のスーパーマーケットで待ち合わせをした。彼女は自転車で後から追いつくと言い、僕は大きなコインパーキングへ車を停めた。煙草を一本吸ってからスーパーマーケットへ向かうと、ひっきりなしに主婦的な女性かおばあちゃんが入り口を出たり入ったりしていた。時刻は午後5時になる。時計から目を上げると、待たせちゃったわねと大して悪びれてない様子でサキが手ぶらでやってきた。 お礼に料理を作るとはいえ、サキの家には食材が十分足りていないらしく、こうしてスーパーマーケットに寄ることになった。サキは野菜コーナーから精肉コーナーまで、まるで優秀なカーナビに導かれるように無駄なく点検していった。欲しい食材があると、2秒間程度それらを凝視し、一度手に取ったじゃがいもやら豚肉やらを迷うことなく僕が持っているカゴに放り込んだ。最後にアルコール飲料が冷やされている棚の前へ行くと、私が飲むからとチ

@list = qw/text1 text2 text3/; @new_list = map { $_=~ s/text/word/ } @list;見たいな感じでやると、 $VAR1 = '1'; $VAR2 = '1'; $VAR3 = '1';ってなる。 えぇぇぇぇって思っていろいろ調べてたら、置換処理したときは処理した回数を返すそうです。（全然知らなかった） なんで、 @list = qw/text1 text2 text3/; @new_list = map { $_=~ s/text/word/; $_ } @list;ってやってあげたら、 $VAR1 = 'word1'; $VAR2 = 'word2'; $VAR3 = 'word3';って無事なりました。 ふぅー 普段プログラミングしないからちょっとのことではまる。

地元ローカル線がよく遅れるので、駅着く前に事前に知りたいなぁ…と。 まぁ、そういうケータイサービスなんてゴロゴロしているんですが、作ってみたので貼り付け。 package WWW::TrainInfo::JREast; use strict; use warnings; use URI; use Web::Scraper; use DateTime; our $VERSION = '0.2'; our $SITE_URL = "http://www.jreast.co.jp/"; our $BASE_URL = "http://traininfo.jreast.co.jp/train_info/"; our $AREA_DATA = { 'k' => { 'name' => '関東エリア', 'sub_url' => 'kanto.aspx' }, 't' => { 'name' => '

PerlはC言語に似た文法を持ち、正規表現や連想配列など柔軟な処理機能が充実しているインタープリタ型のプログラミング言語です。 もともとPerlはUNIX上でテキストファイルの操作やバッチ的な処理の記述を中心に利用されていましたが、現在ではWebアプリケーションを記述する言語としてよく利用されています。代表的な例として、MovableTypeやPlaggerなどがあります。 また、CPANと呼ばれる機能拡張用のモジュールが非常に充実しているのも大きな特徴です。 主なWebサイト Perlの代表的なWebサイトは、The Perl Foundationの運営するPerl.orgと、そして米オライリーのPerl.com、そしてJarkko Hietaniemi氏の運営するCPAN（Comprehensive Perl Archive Network）の3つでしょう。 Perl.org （英語）

はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28

Perl › 環境構築 (この記事の内容は古くなっています、現在はcpanmを使ってモジュールをローカルにインストールするのが簡単でしょう。cpanmによるローカル環境構築を見てください。) otsuneさんのところでさくらインターネットのレンタルサーバでCPANを使用する方法が紹介されているのですが、一部手作業が発生するので、すべてコピペで実行できるように手順化してみました。 さくらインターネットサーバcpan導入手順 # ライブラリのためのディレクトリの作成 mkdir -p ~/local # CPANの設定ファイルを作成 echo no | cpan # cpanコマンドの設定ファイルMyConfig.pmの書き換え # ( __END__の行まで一気にコピーして実行してください。とまった場合はEnter ) perl - ~/.cpan/CPAN/MyConfig.pm > ~/

Perl › オブジェクト指向 › 名前衝突防止 オブジェクト指向で書かれたモジュールは、使いやすいことが多いです。オブジェクト指向で書くのは、便利だからであって「関数型の記述が古い」からではありません。 今回からはしばらく、関数型のモジュールにはないオブジェクト指向型のモジュールの利点を挙げていきます。 1. 名前の衝突を防いでくれる オブジェクト指向のひとつ目の利点は、名前の衝突を防いでくれることです。関数型のモジュールのEncodeと、オブジェクト指向型のモジュールのXML::Simpleを比較してみましょう。 Encode Encodeをuseすると、decodeという関数が使用できるようになります。 use Encode; my $string = 'あ'; my $dec_string = decode('utf8', $string); XML::Simple XML::Si