■　ＣＧＩ初歩の初歩

■　ｉｆ文とｆｏｒ文

[an error occurred while processing this directive]
xx = 1
xx = 2
xx = 3
xx = 4
xx = 5
xx = 6
xx = 7
xx = 8
xx = 9
xx = 10
　ｉｆ文、ｆｏｒ文ともＣと同じ感じで使える。上の例は互い違いに色を変えている。

■　日時を取得して表示する

[an error occurred while processing this directive]
現在の時刻は2025/04/28 00:30です
　Ｃと同じようにｐｒｉｎｔｆが使用できる。

■　ｃｇｉのスクリプトを表示する

[an error occurred while processing this directive]
　<pre>を使って表示できるようにしたが、それだとｃｇｉのソースの中のｈｔｍｌタグが解釈されてしまう。それを回避するために作ったｃｇｉ。ファイルから読み込み表示するが、不等号記号だったら、置換するようにしている。

　呼び出すときにＳＳＩを使っているが、exec cgi="cgisource.cgi?file=test1.cgi"の用に使用する。ただし、ｉｓｗｅｂではこの形式ではパラメータが渡せないようになっている。セキュリティのために禁じられているのでしょう。色々試した結果、include virtual="cgisource.cgi?file=test1.cgi"の形式なら上手く行きました。

■　ｃｇｉのスクリプトを表示する２

[an error occurred while processing this directive]
　一つ上の項のスクリプトをちょっと改良してみました。タブを空白に展開するようにしてみました。私は何時もタブを４に設定しているので、空白に展開しないと８桁ごとのタブ設定だと解釈されてずれてしまいます。

　1 while ...という構文はＣには無いので、ちょっと違和感を覚えますね。length($&) * $tab - length($`) % $tabで、タブを幾つの空白に置換するかを計算しています。

■　ｃｇｉのスクリプトを表示する３

[an error occurred while processing this directive]
３８行目から５４行目までを表示：

[an error occurred while processing this directive]
　一つ上の項のスクリプトをさらに改良してみました。パラメータで指定された行を表示する機能を追加しました。変更したのは主に、渡されたパラメータを解析する部分です。

　exec cgi="cgisource.cgi?file=test1.cgi&line=5-10"の用に呼び出して使用します。