４．１goto（無条件ジャンプ）

無条件に、指定された場所へジャンプします。
しかし、すべてのプログラムは、gotoを使わなくても実現可能です。
また、gotoを使うと、プログラム全体がわかり難くなるので、できるだけ使わないようにしてください。

行番号 ＣＧＩプログラム 解　　　説
1 #!/usr/local/bin/perl5 １行目は必ずPerlプログラムのある場所を記入
2 #gotoの使い方 #の右側の文字列はコメント
3 print "<HTML>\n"; print文でブラウザへタグ文字列を送っています
4 print "<HEAD>\n";
5 print "<TITLE>goto演習</TITLE>\n";
6 print "</HEAD>\n";
7 print "<BODY>\n";
8 goto skip; gotoでskipと名づけられた場所へジャンプ
9 print "ここは実行されません<BR>\n"; ここは実行されません
10 skip: skipと名づけられた場所(ラベル名)
11 print "ひとつスキップしました<BR>\n"; ここから実行
12 print "</BODY>\n";
13 print "</HTML>\n";

戻る　次へ