Perl 切换语句

标签 perl switch-statement case conditional-statements

如果没有匹配的案例 block ,有什么方法可以运行代码块?例如:

switch($a) {

  case // {}
  case // {}
  ...
  # DO SOMETHING IF NONE OF THE ABOVE CASES WERE MATCHED
}
else不是我要找的,因为它仅适用于最后一个案例 block 。

最佳答案

Perl 5.10 中总会有切换,当然,如果你正在运行它。

use feature qw(switch);

given($a){
  when(1) { print 'Number one'; }
  when(2) { print 'Number two'; }
  default { print 'Everything else' }
}

关于Perl 切换语句,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/4919245/

相关文章:

c++ - switch 语句 C++ [默认部分]

switch-statement - 在 switch 中使用 break 语句

c - 将 switch/case 与 malloc() 一起使用

java - 正则表达式或 Java 将某些区域转换为较低的字符串

mysql - 关闭 Perl MySQL 插入语句中的警告?

Perl 读写文件

perl - 访问数组中结构的字段

perl - 如何使用 Spreadsheet::WriteExcel 将以 '=' 开头的字符串写入单元格

mysql - CASE 将忽略重复条目

Mysql查询用于在多个条件和列上从一个表插入另一个表