# Perl 中的`Switch Case` > 原文： [https://beginnersbook.com/2017/02/switch-case-in-perl/](https://beginnersbook.com/2017/02/switch-case-in-perl/) 在 Perl 5 中不推薦使用`switch-case`。如果您想知道為什么它被棄用，這就是答案： `switch-case`可能會在代碼的其他部分產生語法錯誤。如果在 heredoc 中存在`case`，則在 perl 5.10.x 上可能會導致語法錯誤。一般來說，使用`given/when`代替。它是在 perl 5.10.0 中引入的。 Perl 5.10.0 于 2007 年發布。[來源](http://search.cpan.org/~chorny/Switch-2.17/Switch.pm#BUGS)。 然而，三個新的關鍵字：`given`，`when`和`default`在 Perl 5 中引入，提供類似于`switch case`的功能。這是它的樣子： ```perl given (argument) { when (condition) { statement(s); } when (condition) { statement(s); } when (condition) { statement(s); } . . . default { statement(s); } } ``` 通過示例了解更多關于[`given`，`when`和`default`](https://beginnersbook.com/2017/02/given-when-default-statement-in-perl/)。