関数順 インデックス
目的別 インデックス
構文
  
　while( 条件) 処理
　while( 条件) 処理 continue 処理
返り値
  
　なし

説明

  • 条件が真の間，処理を繰り返します。
  • continueがある場合は，繰り返しの度にcontinueの処理を実行します。

使用例

標準入力の値を出力する
#!/usr/bin/perl
use strict;
use warnings;

while (my $line = <STDIN>) {
  print $line;
}
標準入力の値のうち#開始行を出力する
#!/usr/bin/perl
use strict;
use warnings;

my $count = 1;
while (my $line = <STDIN>) {
  next unless $line =~ m/^\s*#/; 
# #で始まっていない場合はnextする
  printf "%d: %s", $count, $line;
} continue {
  $count++; # nextが実行された場合ここが実行される
}