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

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

確認環境
・Perl 5.24.3

while文

while(条件式){
実行される処理
}

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

#! /usr/bin/perl

use strict;
use warnings;

my $i = 0;

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

do {
実行される処理
} while (条件式);

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

#! /usr/bin/perl

use strict;
use warnings;

my $i = 2;

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

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