WebSphere MQを使った電文の送受信をするにはC言語やJavaなど、IBMがサポートするAPIが用意された言語でしか使用できないと思っていたのですが、先日Perlでもそれを可能にする「MQSeries」なるモジュールが公開されていることを知りました。
さっそくCPANからソースをダウンロードしてAIX機にインストールしていろいろ試してみましたがこれは便利!これまではテストやなんかで特殊な編集を伴う電文の送受信が必要な場合はC言語で面倒な文字列操作をやってましたが、もともと文字列編集が得意なPerlだとそうした負荷が大幅に軽減できます。複数の環境を使い分ける必要がある場合もPerlだったらあちこちでコンパイルする必要もありません。