Perl Switch语句

perl switch语句用于从多个条件执行代码。 perl中没有大小写或switch语句。相反, 我们使用” 何时” 代替大小写, “ 使用给定” 代替大小写。
以下是perl语言中switch语句的语法:

given(expression){when (value1){//code to be executed; }when (value2){//code to be executed; } when (value3){//code to be executed; }default{//code to be executed if all the cases are not matched.}}

Perl开关示例让我们看一个简单的c语言switch语句示例。
use feature qw(switch say); print "Enter a Number\n "; chomp( my $grade = < > ); given ($grade) {when ('10') { say 'It is 10' ; }when ('20') { say 'It is 20' ; }when ('30') { say 'It is 30' ; }default { say 'Not 10, 20 or 30'; }}

【Perl Switch语句】输出
Enter a Number10It is 10

Enter a Number55'Not 10, 20 or 30'

    推荐阅读