Perl while文とdo…while文のサンプル

Perlのwhile文とdo...while文のサンプルです。

確認環境
・Perl 5.24.3

目次

while文

while(条件式){
       実行される処理
}
  • 条件式がtrueの間、処理を繰り返します。
  • 最初の条件式の判定でfalseの場合、ループは1回も実行されません。

コード

サンプルのコードです。
8行目は値が2より小さい間、処理を繰り返します。

#! /usr/bin/perl

use strict;
use warnings;

my $i = 0;

while ($i < 2) {
	print "値=", $i; # 値=0値=1が出力される
	$i++;
}

 

do...while文

do {
       実行される処理
} while (条件式);
  • 条件式がtrueの間、処理を繰り返します。
  • 必ず1回は処理が実行されます。

コード

サンプルのコードです。
11行目は値が2より小さい間、処理を繰り返します。
→値=2のみ出力されます。

#! /usr/bin/perl

use strict;
use warnings;

my $i = 2;

do{
	print "値=", $i; # 値=2が出力される
	$i++;
}while ($i < 2)

 

比較演算子

上記コードの<は比較演算子です。
以下は、数値の比較演算子の一覧です。

比較演算子 説明
a == b aとbの値は等しい
a != b aとbの値は等しくない
a > b aはbより大きい
a >= b aはbより大きい または 等しい
a < b aはbより小さい
a <= b aはbより小さい または 等しい

関連の記事

Perl if文のサンプル
Perl for文とlastとnextのサンプル

△上に戻る