Perlスクリプトを用いた、CGIプログラムファイルの設置例です。
プログラムファイルの一行目には、
#!/usr/local/bin/perl
と、perlまでのパスを記述する。
プログラムファイル名（拡張子）は「
.cgi
」で保存する。
アップロードは「
ASCIIモード
（テキストモード）」で行う。
プログラムファイル属性は「
755
」とする。
最初に、以下のサンプルソースをそのままメモ帳やテキストエディタにコピーして、「perl.cgi」というファイル名で保存します。
サンプルソース
#!/usr/local/bin/perl print "Content-type: text/html\n\n"; print "<html>\n"; print "<body>\n"; print "START Perl<br>\n"; print "<br>\n"; $xx = 5; $yy = 2; $zz = $xx + $yy; $nn = $zz * $yy; print "PRINT: HELLO!! my CGI!<br>\n"; print "PRINT: $xx+$yy=$zz<br>\n"; print "PRINT: $zz*$yy=$nn<br>\n"; print "<br>\n"; print "END Perl<br>\n"; print "</body>\n"; print "</html>\n";
PerlスクリプトやHTMLなどの記述については、書籍や
参考サイト
などをご覧ください。
次に、プログラムファイルをウェブサーバへアップロードします。
上述の
ポイント
とおり、「ASCIIモード（テキストモード）」で行ったうえ、プログラムファイル属性を「755」とします。
例：Windows「FFFTP」を使う場合
例：Macintosh「Fetch 3.03J」を使う場合
最後に、プログラムファイルをアップロードしたアドレス（URL）へアクセスして確認します。
アップロードした場所にもよりますが、ログインディレクトリ（docs/）に設置した場合は、「http://お客様ドメイン名/perl.cgi」でアクセスできます。
また、下の「サンプルの結果表示」と同じように、表示されるか見てみましょう。
サンプルの結果表示
START Perl
PRINT: HELLO!! my CGI!
PRINT: 5+2=7
PRINT: 7*2=14
END Perl
設置テストは以上です。
「500 Internal Server Error」が表示されうまく動かない場合は、再度、上述の
ポイント
を再確認してみましょう。
