Perl 程式設計/關鍵詞/when

Thewhenkeyword

when是一個流控制關鍵字，用於 for 和 given 語句中。

形式表示式 when 表示式用於 for 語句中，形式when 表示式在 given 語句中類似於 C 的switch語句。

請注意， given 被認為是高度實驗性的！

語法

  EXPRESSION when EXPRESSION
  when EXPRESSION

示例

use v5.14;

for ($var) {
  $abc = 1 when /^abcd/;
  $def = 1 when /^efgh/;
  $xyz = 1 when /^wxyz/;
  default { $nothing = 1 }
}
}}

use v5.10.1;

given ($var) {
  when (/^abc/) { $abc = 1 }
  when (/^def/) { $def = 1 }
  when (/^xyz/) { $xyz = 1 }
  default       { $nothing = 1 }
}
}}

use v5.14;

given ($var) {
  $abc = 1 when /^abc/;
  $def = 1 when /^def/;
  $xyz = 1 when /^xyz/;
  default { $nothing = 1 }
}
}}

參見

• for
• given