Perl 程式設計/關鍵字/given

thegivenkeyword

given是一個高度實驗性的流程控制關鍵字，其使用方法類似於 C 中的switch關鍵字。

thegiven迴圈從 Perl 5.10.1 開始支援。可以使用use feature "switch"或use 5.10.1命令。使用given命令，其他實驗性關鍵字 break，continue，default，和 when 也將被啟用。從 Perl 5.16 開始，也可以使用這些關鍵字，帶CORE:字首，而不使用use語句。

與 C 中的switch語句不同，C 中的case部分，givenswitch 在每個 when 語句後退出，無需 break 關鍵字。如果這不是你想要的，就必須使用 continue。

語法

  EXPRESSION when EXPRESSION
  given EXPRESSION

示例

use v5.10.1;

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

參見

• when