Perl Switch 语句

2024年8月29日 | 1 分钟阅读

Perl switch 语句用于从多个条件执行代码。 Perl 中没有 case 或 switch 语句。我们使用 'when' 代替 case，使用 'given' 代替 case。

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 Switch 示例

让我们看一个简单的 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';}
}

输出

Enter a Number
10
It is 10

Enter a Number
55
'Not 10, 20 or 30'

下一个主题Perl goto 语句

Perl Switch 语句

Perl Switch 示例

联系信息

关注我们

教程

面试题

在线编译器

Python

Java

.Net Framework

AI, ML and Data Science

Cloud Technology

B.Tech and MCA

Web Technology

PHP

Software Testing

Technical Interview

Java Interview

Python

Web Interview

Database Interview

B.Tech / MCA

Important Interview

Software Testing Interview

Company Interviews

Online Compilers

Multiple Choice Questions

Perl 教程

Perl 控制语句

Perl 数组

Perl 字符串

Perl 命名空间

Perl 哈希

Perl Regex

Perl 函数

Perl 文件处理

Perl 目录

Perl 错误处理

Perl 高级

Perl 面试

Perl Switch 语句

Perl Switch 示例

相关帖子

Perl if-else

Perl next 语句

Perl while 循环

Perl redo 语句

Perl last 语句

Perl do-while 循环

Perl goto

Perl 注释

Perl for 循环

订阅 Tpoint Tech

联系信息

关注我们

教程

面试题

在线编译器