nDiki : ActivePerl

PAR が提供するもう一つの(こちらが本来はメイン?)機能は、プログラムの実行時に必要な Perl モジュールを PAR ファイルと呼ばれる Perl モジュールアーカイブファイルからロードする機能である。 XS モジュールなどもコンパイルすることができるどこかの環境で1度ビルドして PAR ファイルにしておけば、同じアーキテクチャのホスト上でそのまま利用することができる。

@ PAR リポジトリ

ロードしたい PAR ファイルはファイルパスだけではなく URL でも指定することができ、必要な時にオンデマンドでフェッチさせることができる。これを使えば Perl プログラムの集中管理可能だ。

PAR 0.951 からは PAR リポジトリというコンセプトが追加され、パッケージ毎に作った PAR ファイルをサーバ上(あるいはローカル)のリポジトリに蓄積してオンデマンドでロードできるようになった。

個別に PAR ファイルを指定する従来の方式に比べてかなり便利そうである。ということで試用してみた。

まずは

PAR
PAR::Repository
PAR::Repository::Client
PAR::Repository::Query
PAR::Dist
PAR::Packer

あたりをインストールし準備 OK。

@ 1. PAR リポジトリを作成する

最初に PAR-Repository に含まれている parrepo で。

 parrepo create -r /tmp/PAR

PAR リポジトリファイルの中にはデータベースファイルが作成されるが、これは DBM::Deep というアーキテクチャ非依存のものを使っているので、Linux でも Windows でもどちらからでもアクセス可能である (つまり Linux 上でリポジトリをメンテできるということだ)。

@ 2. Perl パッケージを PAR ファイル化する

次に必要な PAR ファイルを作成する。作成したいパッケージを展開してビルドし、blib ができている状態で PAR::Dist を使ってパッケージ化する。

 perl Makefile.PL
 make
 make test
 perl -MPAR::Dist -e blib_to_par

例えば ActivePerl*1 上で WWW-Mechanize-1.20 を PAR ファイル化すると

 WWW-Mechanize-1.20-MSWin32-x86-multi-thread-5.8.8.par

というファイルが作成される。

普段から ActivePerl で必要なライブラリは基本的に自前で PPM パッケージ化して、動作確認した上で PPM リポジトリに蓄積するようにしているので、合わせて次の手順でパッケージを作ることになる。

 perl Makefile.PL
 nmake
 nmake test
 perl -MPAR::Dist -e blib_to_par
 make_ppm

*1ここでは Windows 上の

@ 3. PAR リポジトリに PAR ファイルを登録する

PAR ファイルができたら parrepo でリポジトリに登録する。

 parrepo inject -r /tmp/PAR -f xxx.par

@ 4. PAR リポジトリ上のライブラリを使用してみる

例えば先ほどの WWW::Mechanize がリポジトリに登録されている状態で

 #!/usr/bin/perl
 use PAR { repository => 'file:///tmp/PAR/' };
 use WWW::Mechanize;
 my $mech = WWW::Mechanize->new;
 $mech->get('http://www.example.com');
 print $mech->content;

というスクリプトを書いて実行すると、PAR リポジトリから WWW::Mechanize がロードされて正しく実行される。

ここでリポジトリを Web サーバへアップロードして、repository のところに URL を指定するようにすることもできる。例えばリポジトリを http://www.example.com/PAR/ に配置したとすると

 #!/usr/bin/perl
 use PAR { repository => 'http://www.example.com/PAR/' };
 use WWW::Mechanize;
 my $mech = WWW::Mechanize->new;
 $mech->get('http://www.example.com');
 print $mech->content;

と書き換えることで、インストールしていない WWW::Mechanize を使用できるようになる。

@ Perl プログラムを実行形式化する

先ほどの Perl スクリプトを get_top_page.pl という名前で保存して pp で実行可能ファイル化する。

 pp -o get_top_page.exe -M PAR::Repository::Client get_top_page.pl

とすれば get_top_page.exe という実行可能ファイルが作成される。 WWW::Mechanize はオンデマンドで http://www.example.com/PAR/ からフェッチされるので、アップデートが必要な場合は新しい PAR ファイルを作成してリポジトリを更新するだけでよい。 EXE ファイルを作成しなおして利用者に配付しなすといった作業も不要だ。

@ スクリプトもリポジトリにおく

さらには実行するスクリプトをも PAR リポジトリに置いておくことが可能だ。

例えば WWW-Mechanize に含まれている mech-dump をオンデマンドにフェッチして実行する実行形式ファイルは以下のコマンドで作成できる。

 pp -o mech-dump.exe -M PAR::Repository::Client \
   -e "use PAR { repository => 'http://www.example.com/PAR/', \
                 run => 'mech-dump' }"

@ まとめ

ActivePerl では PPM があるとはいえ、普通のユーザにちょっとしたプログラムを使ってもらうのに「ActivePerl をインストールして、PPM パッケージをインストールして、……」というのは手間すぎる。

pp でプログラムに必要なものを全てバンドルした実行形式化ファイルにするという方法ももちろんあるのだが、頻繁にアップデートするようなスクリプトの場合には、起動のための部分だけ pp で作成しておいてあとは PAR リポジトリで集中管理するというのもちょっと魅力的である。

◇ Twitter やってます。この記事が気にいったらぜひ twitter.com/Naney の follower になってください。

[ permalink ]

自前 PPM リポジトリの管理 (2006-07-03)
[ Perl ] PDL::PP で C extension を書く (2004-02-19)
ActivePerl をやめて Strawberry Perl へ (2009-08-25)
ActivePerl 5.8.9 build 825 + MinGW 5.... (2009-02-22)
ActivePerl で Ming (2005-02-23)

[ 12月12日全て ]

2006年12月17日 (日)

■ USB メモリに Perl を入れて持ち歩きたい

ポータブルアプリケーション詰め込み。

自分の場合エディタと Perl があれば随分できることが増えるので、何とか Perl を入れておきたい。しかし定番の Windows 用 ActivePerl はセットアップが必要であり、持ち歩きには向かない。

何かいい Perl ディストリビューションがないかなと探してみたところ、インストール不要の Apache ディストリビューションが目についた。そういえばこれらには Perl が含まれていてインストール不要で使えるものがあるらしいので、それらが使えるかもしれない。

@ XAMPP for Windows 1.5.5

標準の XAMPP では Perl インタプリタしか入っていなかった。さすがにこれでは使い物にならない。

@ XAMPP for Windows ADD-Ons Perl 5.8.8-2.2.3

XAMPP で実用的な Perl 環境を用意するにはこちら。ActivePerl 5.8.8.817 上に Web アプリケーションに必要そうなパッケージが用意されている。そのかわり 200MB (!) 近い容量が必要。でかすぎ。

README には setup_xampp.bat に実行の指示がある。

@ Uniform Server 3.3

ActivePerl 5.8.7.815 が含まれている。 Perl インタプリタと、いくつかのパッケージが含まれている。パッケージは結構少なめにおさえてあるので、容量はかなり少ない。しかし

 perl -MConfig -e "print Config::myconfig()"

が動かないなどそのまま使えるわけではなさそうだ。

@ やっぱり ActivePerl?

試した2つとも結局は ActivePerl を使っているようである。 ActivePerl の部分のライセンスはどうなっているのだろう?

もしかしたら ActivePerl の AS package を展開して、不要なファイルを削除すれば (インストーラで設定されるリポジトリなどの情報を使う部分は駄目にしろ)、ある程度動くのかな。

それと Installer.bat の中で、一部ファイル(.bat、Config.pm、Config_heavy.pl、perllocal.pod、.packlist、config.h) のリロケーションをしているので、このあたりがポイントになりそう。

要確認。

[ permalink ]

TrueCrypt で USB メモリに Windows と Linux ... (2006-12-14)
xyzzyを読み取り専用メディアから起動する (2004-07-28)
XAMPP で WiKicker を動かしてみた。PPM インストール OK。 (2007-02-09)
Evernote 使用開始 (2009-03-03)
自前 PPM リポジトリの管理 (2006-07-03)

[ 12月17日全て ]

2007年2月5日 (月)

■ ActivePerl 5.8.8.820 の PPM では ppd/tar.gz を置いただけの PPM リポジトリを使えなくなった

ActivePerl 5.8.8.819 までは .ppd と .tar.gz ファイルを置いたディレクトリを Web サーバで公開しておけば、そのディレクトリの URL を PPM リポジトリとして指定して使うことができた。

これが build 820 付属の PPM だとスキャンしてくれなくなった。リポジトリの URL を指定する際、package.xml を指定しないと駄目らしい。

@ PPM リポジトリとして必要なファイル群を生成する

PPM リポジトリとして必要なファイル群は PPM-Make に含まれている rep_summary コマンドで生成することができる。

 rep_summary --rep /path/to/ppm/repository

今後はこれで package.xml その他のファイルを生成しておくことにする。

@ 複数の PPM リポジトリ

一方複数の PPM リポジトリの扱いは良くなった。build 819 付属の PPM では、複数のリポジトリにまたがってパッケージの依存解決ができなくなっていて不便だったのだが、build 820 のものでは、以前のバージョンのもののようにまたがれるようになった。

基本的な PPM パッケージ群用と、プロジェクト毎の PPM パッケージ群用の PPM リポジトリを組み合わせて使うときに、依存解決できないと厄介だったのでこれは○。

@ PATH

build 819 のインストーラでは site\bin に PATH を通してくれないので、site にインストールしたパッケージ付属のコマンドが呼び出せず不便であった(もちろん自分で PATH を通せばよいのだが)。

build 820 のインストーラでは site\bin も PATH にいれてくれるようになった。○。

[ ActivePerl ]

[ permalink ]

PAR::Repository でビルド済み Perl モジュールをネット... (2006-12-12)
自前 PPM リポジトリの管理 (2006-07-03)
XAMPP で WiKicker を動かしてみた。PPM インストール OK。 (2007-02-09)
Wineを入れてみる (2005-03-31)
Windows 上での Apache 2.0.53 では PATH_INF... (2005-04-10)

[ 2月5日全て ]

2007年11月15日 (木)

■ 今日のさえずり - Mobile Google Notebook、iモードではまだ駄目

09:30 バッグの中で発信してしまっていたので、やっぱり D703i のタイマープロテクトキー設定を ON にした。[mb]
10:06 会社の Windows BOX が最近遅いので、 Google デスクトップをまずはアンインストールした。
12:12 朝「白い恋人」の紙袋を持っている人を見た。今日から再開らしいが、この紙袋は以前の時のかも。 *Tw*
13:27 ActivePerl 5.8.8.822 が8月1日に出ていたか。手元は ActivePerl 5.8.8.820。 *Tw*
15:22 Mobile Google Notebook、iモードではまだ駄目。http://googlesystem.blogspot.com/...
16:16 今月の給料明細書はやいなと思ったら、先月のだった。 *Tw*
16:25 社内で FM ラジオが流れていた頃が懐しい。 *Tw*
17:03 PostgreSQL 8.2.5 を Windows XP にインストールしたが途中でこけた。プログレスバーが後戻りして悲しい。 *Tw*
17:35 お。今日は enraku きてるのか。今 Windows セーフモードで起動しなおそうと思っていたんだけれども。 *Tw*
19:18 MovaTwitter やっぱりアイコン表示するようにした。[mb]
19:47 今日の LABI ポイントマシーンも100ポイント。L:大井町[mb]
24:02 Better Gmail 2 入れて Gmail の言語設定を English にした。あれ? Better Gmail 2 は、まだ Better Gmail と同じってわけじゃないんだ。

[ permalink ]

Evernote 使用開始 (2009-03-03)
今日のさえずり - 勢いあまって NCSA Mosaic 3.0 for ... (2007-11-08)
今日のさえずり - 限定 PORTER オリジナルトートバッグのせいで興奮 (2009-08-31)
今日のさえずり - 上げ潮特大号 (2008-09-18)
今日のさえずり - 背後に立たれていても気がつかないという恐れ (2008-09-09)

[ 11月15日全て ]

2007年12月20日 (木)

■ 今日のさえずり - 「この場ではずれる!」と書くべき

09:38 オバサンが車内で脳トレ系ソフトで激しく DS をタタタタタップしてて、ウルサイ。[mb]
10:15 Natera Bonsai outliner for U3 リリース案内のメールが届いてた。 *Tw*
12:16 「この場で当たる!」は確率的にいって「この場ではずれる!」と書くべき。[mb]
15:55 Visual C# 2005 の IntelliSense、「スペースバーを押すことによって確定する」がデフォルトってひどい。定義書く前に呼出しコードを書いて変な補完確定されるとムキー。
16:21 SERIAL 使ったのに、シーケンスの方に GRANT してなかったのを直した。
19:55 クイックルワイパー買った。乾燥してきているなか、すぐ綿埃がたまるので、これで退治する。[mb]
24:22 ActivePerl 5.10.0.1001 が出てる。http://tinyurl.com/2h7gzh

[ permalink ]

Windows 上での Apache 2.0.53 では PATH_INF... (2005-04-10)
今日のさえずり (2007-09-20)
今日のさえずり - もりもり加湿中 (2008-01-15)
つくばエクスプレスではNTTドコモの PHS が使えない (2006-11-06)
SO905iCS ファーストインプレッション (2008-02-16)

[ 12月20日全て ]

2008年9月5日 (金)

■ Pentium 4 マシンから Athron 64 マシンに乗り替え

@ Dell Dimension 4500C

今会社で使っているデスクトップ PC は Dell Dimension 4500C。 Pentium 4 2.40 GHz、メモリ 768MB の Windows XP Home Edition SP2。

ここ最近メモリが足りないのかすぐアプリケーションが落ちまくり。またいろんなソフトウェアインストールしたりアンインストールしたりを繰り返していたのでシステムがおかしくなってきているのか、動作も怪しい。

ちょっと仕事にならないレベルなってきたので、空いている別の Dell の PC に乗り替えることにした。

@ Dell Dimension C521

乗り替え先は Dell Dimension C521。 AMD Athlon 64 3200+、メモリ 1GB の Windows XP Home Edition SP2。

OS は Dell PC リストアで出荷状態に戻す。と思ったらテストサーバとして Fedora とデュアルブートとして使われていたため、MBR が書き換えられていたのか Dell PC リストアに入れない。 Web で調べたところ Dsrfix というので元に戻せるとのことなので、これを使って MBR を戻す。

で Dell PC リストア。リストア自体は結構あっという間に終わる。

Windows XP セットアップ後、順次ソフトウェアの追加・削除。以下今日の作業分。

[削除] Google デスクトップ
[追加] Google Chrome
[追加] Windows XP SP3
[削除] マカフィー製品
[追加] Norton Internet Security
[追加] Skype
[削除] Dell Network Assistant
[削除] Adobe Reader 7
[追加] Adobe Flash Player 9
[追加] Adobe Reader 9
[追加] ActivePerl
[追加] 7-Zip
[追加] Skype4COM
[追加] Microsoft Office

あとは前の環境で入れていたもののうち、必要になったら順次入れていく予定。

XKeymacs、SKKIME、zyzzy、 Unlocker、TrueCrypt、 Subversion、TortoiseSVN、WinMerge ThinkingRock、Ripplex、 PDFCreator、ImgBurn、 JUDE/Community、DBDesigner、NUnit。

今まで HHK Lite 使ってきてたけれど、これ PS/2 なので C521 には直接ささらないんだよな。どうしよう。PS/2 - USB コンバータ買うか。

それとも USB モデルの HHKB Lite 2 買うか。カーソルキーはいらないけれど、HHKB Professional 2 は高いしキータッチが好みじゃないしなあ。悩ましい。

[ permalink ]

今日のさえずり - 上げ潮特大号 (2008-09-18)
Google ブラウザではなかった Google Chrome (2008-09-03)
今日のさえずり - すかいらーくといえば、今だに「愛・おぼえていますか」 (2009-09-18)
DropboxPortable で必要な時に USB メモリ内を最新環境に同期 (2009-10-12)
Windows XP Home Edition 再インストール (2004-07-16)

[ 9月5日全て ]

2009年2月9日 (月)

■ 今日のさえずり - Doing リストが思ったよりよい

@ 2009年02月06日

11:25 ここ数日探しているのだが、microSDカードリーダがでてこない。 *P3
18:36 Linux 再起動繰り返しているので、ちょっと浮気して Twit 最新版にしてみた。P3 に慣れちゃっている自分を実感。 *Tw*
23:28 ようやく今日、Linux kernel 2.6.26 に移行できた。 *P3

@ 2009年02月07日

08:18 北方領土の日。 [mb]
23:44 通帳見ながら去年の光熱費入力しようと思ったら、途中からクレジット支払いにかえたんだった。集計面倒だな。 *P3

@ 2009年02月09日

09:55 蛍光灯が1本切れて大騒ぎになっている。 *P3
11:42 過去に作ってある PPM パッケージを使いたいので、ActivePerl を 5.10 から 5.8 にダウングレードしているところ。 *P3
12:00 Doing リストが思ったよりよい。タスクのスタックとしてうまく機能している。 http://tinyurl.com/bk784z *P3
12:06 無印良品と本屋行ってくる。 *P3
13:44 ようやく ActivePerl 5.8 のインストーラが終了した。何か Windows 自身が重かったので再起動中。 *P3
23:22 ヨドバシカメラに今日出した同時プリントは、まずますの品質だった。ほっとした。 *P3

[ permalink ]

ActivePerl で Ming (2005-02-23)
今日のさえずり - ソフマップの店員にヨドバシカメラの場所たずねているジイチャン (2009-09-02)
Wineを入れてみる (2005-03-31)
PAR::Repository でビルド済み Perl モジュールをネット... (2006-12-12)
今日のさえずり - 勢いあまって NCSA Mosaic 3.0 for ... (2007-11-08)

[ 2月9日全て ]

2009年2月22日 (日)

■ ActivePerl 5.8.9 build 825 + MinGW 5.1.4 + PAR で Perl スクリプトを実行可能ファイルに

久しぶりに PAR の出番。休日出勤して環境作り。

今回実行可能ファイルにしたい Perl プログラムが Perl 5.8 で開発・テストされているものの改訂版で、必要な PPM パッケージも 8xx 用に作りだめしてあるので、ActivePerl 5.8.9.825 上で行うことにした。

PAR::Packer は ActivePerl の build と合っていないとうまく動かないので、自分でソースからビルドして PPM パッケージ化する。必要な依存モジュールのバージョンも軒並み上がっているので、それらもビルド。

今まで Visual Studio 6.0 でビルドしていたのだけれど、この間 PC をかえてから入れていなかったので、今回は MinGW を使うことにした。 SourceForge.net 上から g++ をダウンロードしてネットワークインストールできないようなので、そこだけ SourceForge.JP で探してきてインストール。

MinGW の bin ディレクトリを PATH に追加したら、特に問題なく Perl モジュールコンパイルできている。素晴しい。ExtUtils::FakeConfig 無くてもいいのかな。

[ permalink ]

ActivePerl をやめて Strawberry Perl へ (2009-08-25)
ActivePerl で Ming (2005-02-23)
PAR::Repository でビルド済み Perl モジュールをネット... (2006-12-12)
bundle を作成して Perl モジュールをまとめてインストール。 (2004-10-21)
自前 PPM リポジトリの管理 (2006-07-03)

[ 2月22日全て ]

2009年8月12日 (水)

■ 今日のさえずり - 哭きの竜のポーズの人発見(多分寝てる)

@ 2009年08月10日

09:31 雨的にひどいタイミングで家を出発して乗車。 [mb]
09:35 今日の京浜東北線はゾクゾクするね! (冷房と濡れた靴) [mb]
10:05 出社。神田川も増水してる。 L: 東京都千代田区東神田3 *P3
10:26 ナポレオンやりたい。 *P3
10:50 ActivePerl 5.10 を 5.8 に何で戻しておいたのか思い出した。 5.10 用の PAR::Packer およびその他 PPM パッケージ作ってなかったからだ。 *P3
12:27 Happy Birthday to 後ろの人! (粗品授与) *P3
12:35 「しゃんしゃん祭」を「しゃしん祭」と見間違えて喰らいついた。 *P3
13:11 RHODIA メモカバー #10 と Walkie Pen BOLD [Flickr] http://tinyurl.com/kl6yol
14:03 自分でビルドした PAR::Packer ようやくはいった。 ActiveState の PAR パッケージの PROVIDE が PAR:: となっているところを PAR と修正して PAR をインストールしなす必要があった。 *P3

@ 2009年08月11日

11:11 return foo = bar ? true : false; とか、やめてほしい。 *P3
12:43 FriendFeed の友達リストの一括整理の仕方をようやく把握した。 *P3
12:49 FriendFeed からポストしてみる。 http://ff.im/-6qNVn
12:52 2009年8月8日の歩行: 3515歩、2.69km、33分、4.84km/h、消費 130.6kcal、脂肪燃焼 18.7g、1.7エクササイズ。 *P3
12:53 2009年8月9日の歩行: 4570歩、3.51km、41分、5.02km/h、消費 171.9kcal、脂肪燃焼 24.5g、2.4エクササイズ。 *P3
12:55 2009年8月10日の歩行: 4801歩、3.82km、35分、6.37km/h、消費 179.7kcal、脂肪燃焼 25.7g、2.6エクササイズ。 *P3
16:32 哭きの竜のポーズの人発見(多分寝てる)。 *P3
18:25 Dropbox がつまってリズムが崩れた。 *P3
18:38 あ、/home が 6.9MB しか残っていなかった。 *P3
18:57 ソフトウェアダウンロードアーカイブを一部 microSDHCカードに移動して /home を広げている最中。 *P3

@ 2009年08月12日

09:31 今年の夏コミ日程を確認。8月14日から8月16日か。今週末なのね。 [mb]
09:46 ソフマップ新店舗について。 L:秋葉原駅 http://movapic.com/...
12:24 2009年8月11日の歩行: 7514歩、6.01km、55分、6.49km/h、消費 282.5kcal、脂肪燃焼 40.4g、4.1エクササイズ。 *P3
12:34 茶月のお持ち帰り限定お買い得セールってなんだ? あの店舗でイートインあるの? (と書いていて配達という選択肢の可能性に気づいた) [mb]
12:37 水鉄砲って100円しないのな。 L:シモジマ [mb]
12:49 クーピーペンシル買った。 [mb]
12:54 マーボードワーフ。 [mb]
12:57 @shuwatto クーピーペンシル、缶箱のデザインも昔と同じです。逆にキャラクター物とかお店で見つかりませんでした。 [mb]
13:21 @HeroesC 子供用のクーピーペンシル店頭で見たのですが、あれ子供にも短すぎたりしないですか? (値段的にも割高感があったので今日は普通のをチョイス) *P3
14:57 社内サーバにはいっている svn は svn merge --reintegrate できないバージョンです。 *P3
15:42 危うくセブン-イレブンで生茶パンダ先生 in ボトル買うところだった。手にしたけど考えてみたら777円も出せん。 [mb]

[ permalink ]

今日のさえずり - 会社の横の空き地でポイの昼練 (2008-10-29)
今日のさえずり - 餞別用意したけど最終日の今日来なかった (2009-06-15)
今日のさえずり - 許されるのは嘘ではなくドワーフのような沈黙 (2010-02-23)
今日のさえずり - オールラインレッド! (2009-10-08)
今日のさえずり - ティッシュ配り回避に気を取られて車に轢かれそうになった (2009-05-08)

[ 8月12日全て ]

2009年8月25日 (火)

■ ActivePerl をやめて Strawberry Perl へ

ActivePerl 5.10.0.1005 + Visual Studio 2005 SP1 上で PAR::Packer を使って実行可能ファイル化したものの、今日別の環境で動かしたら「このアプリケーションの構成が正しくないため、アプリケーションを開始できませんでした」というエラーがでてしまった。

今まで Visual Studio 6.0 で PPM パッケージの作成やら PAR::Packer による実行可能ファイル化をしていたので気がつかなかったのだが、調べてみると Visual Studio 2005 以降だとどうもいろいろ面倒らしい。

ActivePerl + PPM パッケージだと自分で PPM リポジトリを用意しておくことで、開発環境の統一が楽になるという利点があったのだけれどもしばらく一筋縄ではいかなさそうなので、別の Perl ディストリビューションを使ってみることにした。

Windows 上の Perl としてしばらく使ってみることにしたのは Strawberry Perl。現在のバージョンは 5.10.0.6。以前にもちょっと入れてみたことはあったけれども、きちんと使ってみるのは初めて。

MinGW や dmake が同梱されており、CPAN.pm を使って UNIX 上と近い感覚で Perl モジュールのインストールができる。 PAR::Packer を使って実行可能ファイル化した Perl スクリプトも実行できることを確認。

しばらく乗り替えてみることにする。