This page linked from [ CoverPage | InPerl:WebAccess ]

InPerl

inperl : 'an interactive interpreter perl' (or 'INCHIKI-Perl')

inperlは、すごくいいかげんに書いたPerl用のインタラクティブ・インタプリタです。
inperlを使うと、対話的にperlを実行できます。
pythonがうらやましくなったので、へろっと書いてみました。

-dオプションで起動するperlのデバッガでも似たようなことができますが、もうちょっと便利なのが欲しいので書いています。

入手法.

  cvs -d:pserver:anonymous@cvs.niu.ne.jp:/home/cvs/cvsroot login
  cvs -d:pserver:anonymous@cvs.niu.ne.jp:/home/cvs/cvsroot co inperl

Perl5以降(?)で動くと思います。
起動すると'inperl> 'というプロンプトが出るので、適当にPerlの命令を入力してください。
適当にPerlでevalして、evalした結果を出力します。

引数を付けて起動すると、そのファイル名のファイルを読み込んで評価してから、プロンプトを表示します。

evalしないでinperlが直接評価しちゃうコマンドについて。

#dump [filename]
これまでに実行したコマンドを出力します。
filenameを指定した場合、そのファイルに書き出します。
指定しなかった場合はコマンドラインに出力します。
試しに実行したコードを残しておきたいときに便利です。
#clear
#dump用のバッファの中身を消去します。
#read filename
fileの中身を読み込んでq(...)という形に展開します。
'$file = #read targetfile' のようにして使います。
#dir name
name で指定されたモジュール/オブジェクトの属するシンボルテーブルのkeyの一覧を出力
#silent
evalした結果をprintしなくなります。
#verbose
evalした結果をprintするようになります。
(eval-line) #> file
その行をevalした結果をfileに書き出します。
(eval-line) #>> file
その行をevalした結果をfileに追記します。
#eval filename
ファイルを読み込んで評価します。

cvs head
- コメント行があったときのブロック認識を少しだけましにした。
- toolbox/WebAccess.inperl をレポジトリに追加。要threadsサポート。
- 内部コマンド追加: '#eval filename' (ファイルを読み込んで評価)
0.1.5 http://white.niu.ne.jp/inperl/inperl-0.1.5.tar.gz
- 内部コマンド '#last' 追加
- 引数ファイルの'__END__'以降を評価しないように変更
0.1.4 http://white.niu.ne.jp/inperl/inperl-0.1.4.tar.gz
- 内部コマンド '#>> [filename]'追加
- 内部コマンド '#> [filename]'追加
- 内部コマンド #silent 追加
- 内部コマンド #verbose 追加
0.1.3 http://white.niu.ne.jp/inperl/inperl-0.1.3.tar.gz
- nobreakオプション(引数ファイル評価がエラーしたときに終了しない)を追加
- 起動時の引数で指定されたファイルを読み込んで評価するようにした。
- 内部コマンド追加：'#read filename' (ファイルを読み込んでq()で囲った形に置換)
  # `cat req`で同じ事ができることに後から気付く罠。
0.1.2 http://white.niu.ne.jp/inperl/inperl-0.1.2.tar.gz
- シンボルテーブルのkeyの一覧を吐き出す '#dir ModuleName?/object' 内部コマンドを追加
0.1.1 http://white.niu.ne.jp/inperl/inperl-0.1.1.tar.gz
- ブロック判定のエラー修正
0.1 http://white.niu.ne.jp/inperl/inperl-0.1.tar.gz