for 文は、ループ処理を行います。

	for ( 式１; 式２; 式３ ) {
	　　文１
	　　…
	　　[last;]
	}

式１は for 文の最初に実行されるため、初期化処理を行うことが多いです。
式２はループを継続するための条件です。この条件が真の間、ループは続行されます。
式３は for 文の最後に実行されるため、カウンタのインクリメント（１ずつ増加）を行うことが多いです。
ループを強制的に終了する場合は、last;を記述します。

	（例）配列 @list の要素をすべて表示します
	@list = ("aaa", "bbb", "ccc", "ddd", "eee", "fff");

	# 配列の要素数を取得します
	$list_count = @list;

	# ループ処理
	for ($idx = 0; $idx <= $list_count - 1; $idx++) {
		print "$list[$idx]\n";
	}

foreach 文は、配列のループ処理を行います。

	foreach 変数名 ( 配列名 ) {
	　　文１
	　　…
	　　[last;]
	}

foreach 文は配列のループ処理を行うのに適しています。配列名で記述された配列の要素が無くなるまで、変数名で記述された変数に代入し、ループを続けます。ループを強制的に終了する場合は、last;を記述します。

	（例）配列 @list の要素をすべて表示します

	@list = ("aaa", "bbb", "ccc", "ddd", "eee", "fff");

	# 配列の要素を１つずつ print します
	foreach $str (@list) {
		print "$str\n";
	}

if 〜 else 文は条件式により、プログラムを分岐させます。

	if ( 条件式１ ) {
	　　文１
	　　…
	}
	elsif ( 条件式２ ) {
	　　文２
	　　…
	}
	else {
	　　文３
	　　…
	}

条件式１の条件が真となる場合、文１･･･のブロックが処理されます。
条件式１の条件が偽で、条件式２の条件が真の場合、文２･･･のブロックが処理されます。
条件式１、条件式２の条件が偽の場合、文３･･･のブロックが処理されます。

（例）$count の値が１０のとき、$count に１０を足し算します。$countが１０未満のとき、
	$count の値に１００を足し算します。それ以外の場合、$count を０にします。

	if ($count == 10) {
		$count = $count + 10;
	}
	elsif ($count < 10) {
		$count = $count + 100;
	}
	else {
		$count = 0;
	}

while 文はループの処理を行います。

	while ( 条件式 ) {
	　　文１
	　　…
	　　[last;]
	}

条件式が真の間、ループが続行されます。ループを強制的に終了する場合は、last;を記述します。

	（例）ファイル read_file を読み込みます

	$read_file = "http://xxxxx/~user/userdata.dat";

	# ファイルをオープンします
	if (!open(FILE "$read_file")) {
		print "FileOpen Error\n";
		exit;
	}

	# １行ずつ print します
	while ($data = <FILE>) {
		print "$data\n";
	}

	close(FILE);