この記事を書いている時点ではLinux/UNIX専用の技です。(Tcl/TkがXWindowsと通信できる環境が必要)
ローカルマシンでWebサーバを立ち上げて、PerlのCGIをデバッグするときに Devel::ptkdb を使ってGUIデバッガを立ち上げる手法です。
Devel::ptkdbを入れると、通常のPerlスクリプトであれば
$ perl -d:ptkdb ./hoge.pl
でGUIデバッグを利用できます。
これをCGIでも利用するには、PerlCGIの先頭行、スクリプトファイルの指定部分を下記のように-dオプションを付けます。
#!/usr/bin/perl -d:ptkdb
但し、このままではTcl/TkのGUIライブラリがXWindowsSystemと通信できませんので
$ xhost +localhost
で、ローカルホスト。つまり、CGIを起動するWebサーバからのアクセスを許可します。
コメント