hippos-lab::blog

「まるごとPerl！」という本をパラパラめくっていたらGD::Barcodeなるモジュールを発見。仕事でバーコードを出力したいというニーズがけっこうあって、VC++で自作したモジュールを使ったりエクセルExcelやらAccessでmsbcode9.ocxを使っていたのですがPerlでお手軽にバーコードが作成できるならこれも1つのテとしてストックしておくに限ると思い早々にトライ。

心配は、GDの名前が示すとおりlibgd関連のライブラリが揃っていないと動かないのではないかという懸念。一応、仕事でもOSX/RedHat環境があるので最終的にはこちらで作成してもいいのですが、やっぱり手元のWin/ActivePerl-5.10環境で動かしたいというのが本音。

ppmはさすがにCPANほどモジュールが揃っていないのでそこが気に掛かるところ。おそるおそる

ppm install GD::Barcode

としてみると一応成功。依存関係も解決してくれたことを期待しつつテストコード

use strict;
use GD::Barcode;

binmode (STDOUT);
print GD::Barcode->new('EAN13','1234567890123')->plot()->png();

（たったこれだけ！いままでの苦労はなんだったんだ！）を実行してみるも、案の定GD::Fontがないよみたいなメッセージ。

あきらめてGD系のパッケージをインストールしようとおもったのだけれど検索してみるとどうもそれらしいのがないみたい。OSXかRedHatでやるかと半ばあきらめつつ一応ググってみたらありました。ppdってサードパーティからも色々あるんですねぇ。

ppm install http://cpan.uwinnipeg.ca/PPMPackages/10xx/GD.ppd

前にも書いたけれどperlコミュニティの広がりはちょっと驚き。なにかしようと思うと大抵のものはもう用意されているような気がしますよ。これまでExcel出力とかVC++で面倒なことやっていたのもSpreadsheet::WriteExcelでチョロっとできちゃうし。他にも便利そうなライブラリがてんこ盛り。もう、プログラムなんてスクラッチから書く気がしませんよ。

仕事でちょっとしたアドレス帳的なデータを扱う必要があって、勉強中のperlでユーザIDをキーにメールアドレスと名前の配列を値としたハッシュを作ろうと思ったのですがいきなり躓きました。単に、CSVからデータを読み込んで突っ込むだけなので大したことない処理だとタカを括ったのですが...最初に書いたのが以下のコード。

やりかけも気持ちが悪いので体調不良にもめげず一気にホットキー設定まで実装しました。

ホットキーに関しては最初から、HotKeyLib3の存在をチェックしてあったので迷わずこのライブラリを使いました。使ったのはＵＩインタフェースの部分だけですが、それだけでもずいぶんと手間を省くことができ短期間で完了することができました。ほんとフレームワークとかライブラリとか公開している方が大勢いて助かります。いつか、僕も受けた成果を還元したいと思う次第ではありますが何時になるやら...

clippyを公開したら思いのほかダウンロードしてくれた人が多くて、ビックリしました。自分としては、ホットキーが固定であること・自動ペーストができないという中途半端な状態でのアップだったので恐れ入るばかりです。とりあえず、この２つのうち自動ペーストについて現在アップデート中です。

会社でQTClipという便利なクリップボードユーティリティを使っているのですが、自宅のマックでも欲しくて作りました。この手のアプリは他にもあるんでいわゆる”再発明”ってことになるんですが、ちょこちょこ作っているのが楽しかったので....

アイディア・仕様は完全QTClipのパクリです(^^ゞ。が、まあ実装は完全オリジナルなのでお許しください。また、QTClipと違うところは、

メール関連のテキストを扱う必要があってSmultronでテキストを開こうとしたら予想どおりの文字化け。これまで文字コードの判定には何度か手を入れてきたけれど、ISO-2022-JPは特に何もしてこなかったので、今回はISO-2022-JP対応コードを書いてみました。

Smultron本体のエンコード判定方法の流れはv10.4で追加された新しいメソッド、NSString stringWithContentsOfFile:usedEncoding　error:を使うように変わっていて、ここで変換してうまくいかなければguessEncodingFromData:textDataを使うように変更になっていますが、このメソッドSJIS/EUCがダメでちょっとつかえません。

string = [NSString stringWithContentsOfFile:path usedEncoding:&encoding error:&error];
if (error != nil || string == nil) {
  if (textData == nil) {
    textData = [[NSData alloc] initWithContentsOfFile:path];
  }
  encoding = [SMLText guessEncodingFromData:textData];
  if (encoding == 0 || encoding == -1) {
    encoding = [[SMLDefaults valueForKey:@"EncodingsPopUp"] integerValue];
  }
}

なので、このメソッドの使用を後回しにしてこれまでどおりguessEncodingFromData:textDataを優先してエンコードを判定、まず判定したエンコードを用いて変換してみる。それでダメな場合にこちらを使うという流れに修正しました。

仕事でXCode2.xが必要になって探したのだがなかなか見つからない。どこから行っても最終的にはXCode3.xへたどり着いてしまう。あぁ、また「もうTigerなんか止めなよ」っていうAppleの暗示かと思ったのですがありました。

Codaがバージョンアップされたました。Subversionが統合されたとのことで個人的にはかなりウレシイ。skEditの軽さとSubversion統合機能でこれまでその日の気分で２つのソフトを使い分けしていたのですが、今回のSubversion機能追加でCodaへの依存度が高ままるかも。