日曜プログラマのそゞろ事

zipファイルは、lang_perl_MENTA_tags_release-0.05-r24525.zipになっていました。

ぱっと見では、リンクの仕方が変わったような？
…と思ったのですが。
今のところ、変わったのはオフィシャルだけのようです。

cgi-serverで起動したところ、どちらも同じ挙動でした。

しかし、結構warningが出ているようです。
コマンドプロンプトが文字化けしていたので、一旦ctrl+cで止めて、コマンドプロンプトの文字コードの変更を参考にして「chcp 65001」とタイプして、utf-8を表示できるようにしました。

うちの環境では、コマンドプロンプトを「MS ゴシック」に設定したあとは、コマンドプロンプトを立ち上げて、すぐに「chcp 65001」とすると「MS ゴシック」のまま切り替わるようです。

レジストリの「HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Console\TrueTypeFont」のあたりを色々といじって試してみましたが、うまくいかず、断念。

ま、それはそれとして。
エラーの正体は以下のとおり。

static/menta-logo.png/ を処理する方法がわかりません at lib/MENTA.pm line 96, <DATA> line 16.

ということで、app/tmpl/header.mtの6行目にゴミ（後ろにスラッシュの文字）が入っていたようです。
以下のように直したら上記のエラーはなくなりました。

<img src="<?= static_file_path('menta-logo.png') ?>" alt="Web Application Framework - MENTA" title="Web Application Framework - MENTA" />

MTでつけたタグを管理するのにも丁度良いので、HatenaBookmarkerプラグインを使って、ブログ記事をはてなブックマークに登録しているのだが、最近、余計な仕事もしてくれているようだ。

トラックバックを受け取ったときに、その記事をブックマークしにいくのだ。
しかも、なぜかパーマリンクが間違って（ファイル名が日付と時間になって）いる。

解決できないかとソースを見ているのだが、さっぱりわからない。
トラックバックを受け取ったときに動作しないようにできればまったく問題ないとは思うのだが…。

お手上げ。

Perlでもなんでも、ソースをブログに載せるときは気をつけたいもの。

ファイルを見ると、2年前から使っている自分用のツールがある。
「<」や「>」など、HTMLでそのまま表示できないものを実体参照に変更したり、preとcodeで括ってソースとして表示しやすくするためのものだ。

少し前に、perltidyを覚えたのだが、ブランクがあいていたのと、パソコンを変えていたので、改めてインストールすることにした。
自分の記事も役に立つものです。
ただ、以前と違っていたのは、perlと同じbinフォルダではなく、site/binのほうに入っていた。

で、ソースがきれいにハイライトされているページをちらほら見かけたので、色気づいて調べてみた。
とりあえず簡単にできそうだったのが、「Quick Highlighter」というサイト。

というわけで。
euc2utf8.plをperltidyで整形して、Quick Highlighterでハイライトさせてみた。

…しかし、スタイルシートが競合するのか、ブログ上で見るといまいちかなぁ…。
もう少し調べてみよう。

久しぶりに知的活動（？）をしていたら、面白そうなものを見つけた。

MENTA は CGI で気軽につかえるウェブアプリケーションフレームワークです

• CGI でも高速に動作
• レンタルサーバーでもつかえます(ロリポとかXREAとか)
• Object 指向がわからなくてもつかえます
• 正しいプログラミングスタイルが自然と身につきます

数日間追いかけていたのだが、今日、zipファイルでダウンロードできるようになっていたので、早速ダウンロードしてWindows上で使ってみた。
使ってみた、というか、デモをそのまま動かしてみた、というか。

まあ、久しぶりにPerlな気分の時に見つけたので、しばらく追いかけてみようかと。
XREAでも使えそうなので損はなさそうです。

スクリプトのutf8化計画に役立つであろうコードを書いた。
スクリプトのあるディレクトリ以下のファイルを走査して、ファイルの文字コードをeuc-jpからutf8に変換するスクリプトだ。

それにしても、作るのに妙に時間がかかった。
徐々に勘を取り戻せればいいのだけど…。

で、色々と調べながら書いていたら、面白いモジュールを色々と見つけた。

Fatal が、渡されたサブルーチン（上の例だと open と close） をくるんで、自動で or die してくれます。open や close がだいぶすっきりしました。あとついでに先ほどの例に対してファイルハンドルを変数にしたり open を3引数にと今風に変更してみてあります。

まずはFatal。使いどころは結構あると思う。
ついでに、今までファイルを扱うときは、FileHandleを使っていたのだが、「今風」にしてみた。

File::Findの使いやすいインターフェィス

次はFile::Find::Rule。標準モジュールではないのが残念だけど。
File::Findをうまく使えればいいんだけど、いまいち使い方がよくわからない。
ファイル一覧を作って、それを順番に処理する、という感覚なので、File::Findの&wantedの考え方がいまいちしっくりこない。

perl5.8 では文字コード自動判別も用意されており，Encode::Guess がそれです．

あとは、Encode関係で、Encode::Guess。文字コードの推測です。
guess_encodingという関数が自動的にインポートされるようです。
それ以外に、Encode::Guess->guessとする方法もあるようですが、メンテナーは404 Blog Not Found:ruby|perl - 文字コードのちょっと高度な判定でguess_encodingを使っていました。

Encodeは、安定性重視から速度重視まで、色々なメソッドが用意されているようなので、404 Blog Not Found:perl tips - Encodeを速く使う方法も参考にしようと思っています。

iTunesをバージョンアップしたら新機能ができていた。
…というのも2ヶ月前の話。

自分自身のライブラリの中で、聴いていない曲というのもかなりあって、ライブラリの再発見というか、聴いていない（あるいは、iTunesでは聴いてないことになっている）曲から優先的聴く曲を選ぶツールとして役立っている。

まあ、曲自体が似通っているのか、好きな曲を数曲選んでGeniusにかけると、同じ曲がそれぞれのリストに入ってくるのだが。
それでも、無作為に聴くよりも好みの曲が聴ける精度は高いです。

最近は、新しい曲を聴くよりも、好きな曲ばかりを再生するようになっていますが…。

先日ラスベガスに行ったときに、ラジオでかかっていて耳についた曲が「I Don't Wanna Be In Love (Dance Floor Anthem)」だった。

オフィシャル
　Good Charlotte
試聴サイト
　MySpace.com - Good Charlotte - Waldorf, MARYLAND - Rock / Rock / Powerpop - www.myspace.com/goodcharlotte

車で移動して、もうすぐ目的地…というタイミングでよくかかっていた。
誰の曲かさっぱりわからないのだが、気になって気になって仕方なかった。
ラスベガスを離れる前に、なんとか放送局と時間から曲を探り当てたときの達成感はなんともいえなかった。

ちなみにその放送局
　Mix 94.1 Today’s Best Music Mix // Las Vegas - Homepage

長旅から帰ってきました。

とりあえず、気分も新たにデザインを変えてみました。
こういうことが簡単にできるのも、ブログシステムがあるからこそですね。
感謝です。

公衆トイレの落書きもインターナショナルだった。
ハングルあり、英語あり、日本語あり。

英語で「独島は日本じゃない」という落書きがあった。
その下に日本語で「竹島は日本だ」という落書きがあった。

言葉だけで言えばどちらも正しい。
日本では「竹島」と呼んでいる島が、韓国では「独島」と呼ばれているのだから。

問題はそういうことではない、というのは分かっているが、もう少し頭のいい落書きはないものかと思った。

成田空港のヤフーカフェにいます。

ラウンジオーサカに比べて、ネット環境は大分マシです。
ただ、使用頻度がかなり多いのでしょう。
キーボードの文字がかすれてしまったのか、一部に文字のシールが貼ってあります。

日本にいるのは（というか、すでに出国はしているので日本にいるのか微妙ですが）あと２時間弱となりました。

いつも思いますが、気がつくとあまり時間がなくなっている。
出国までにかなり時間がかかっているはずですが、そんなに経っているように感じないというか。
人間の感覚というのは、結構いい加減なものなのかなと。
特に時間に関しては。

改めてそう思いました。