Tuesday, April 03, 2007

Perl CGIスクリプトをコマンドラインから実行する

ブラウザでしか確認できないということをよく聞く。コマンドラインから実行した方がはるかに簡単にデバッグできる。

----test.cgi-----
#!/usr/local/bin/perl
use strict;
use CGI;
print "Content-type: text/html;charset=Shift_JIS\n\n";
my $q = new CGI;
my $name = $q->param('name');
my $id = $q->param('id');
print $name,"\n";
print $id,"\n";

以下のような場合

./test.cgi name='moji' id=2 と実行すればよい。

No comments: