３．１算術演算子
演算子
意味
+
加算
-
減算
*
乗算
/
除算
%
剰余
**
べき乗
++
1加算
--
1減算
.
文字連結
x
繰り返し
行番号
ＣＧＩプログラム
解 説
1
#!/usr/local/bin/perl5
１行目は必ずPerlプログラムのある場所を記入
2
#算術演算子の使い方
#の右側の文字列はコメント
3
$a =
+
;
加算
4
$b =
-
;
減算
5
$c =
*
;
乗算
6
$d =
/
;
除算
7
$e =
%
;
剰余
8
$f =
**
;
べき乗
9
$g = "
" .
";
文字連結
10
$h = "
" x
;
繰り返し
11
@x = "
" x
;
繰り返しを使って配列へ設定
12
print "Content-type: text/html\n\n";
後の学習で解説
13
print "<HTML>\n";
print文でブラウザへタグ文字列を送っています
14
print "<HEAD>\n";
15
print "<TITLE>算術演算子演習</TITLE>\n";
16
print "</HEAD>\n";
17
print "<BODY>\n";
18
print '$a='."$a<BR>\n";
加算結果をブラウザに表示
19
print '$b='."$b<BR>\n";
減算結果をブラウザに表示
20
print '$c='."$c<BR>\n";
乗算結果をブラウザに表示
21
print '$d='."$d<BR>\n";
除算結果をブラウザに表示
22
print '$e='."$e<BR>\n";
剰余結果をブラウザに表示
23
print '$f='."$f<BR>\n";
べき乗結果をブラウザに表示
24
$f++;
$fを１加算
25
print '$f='."$f<BR>\n";
加算結果を表示
26
$f--;
$fを１減算
27
print '$f='."$f<BR>\n";
減算結果を表示
28
print '$g='."$g<BR>\n";
文字連結結果をブラウザに表示
29
print '$h='."$h<BR>\n";
繰り返し結果をブラウザに表示
30
print '$x[0,3,6]='."$x[0],$x[3],$x[6]<BR>\n";
繰り返しで設定した配列の内容をブラウザに表示
31
print "</BODY>\n";
32
print "</HTML>\n";
戻る
次へ