Perl While: Perl中的While条件循环
Perl是世界上最常用的语言之一。这些语言有时被称为实际提取和报告语言（不是官方的首字母缩写）。Perl经历了许多修订，因为它于1987年介绍。该语言首先是旨在成为UNIX系统的通用脚本语言。从那时起，语言的功能大大增加，今天语言具有广泛的库，可以完成您可以想到的任何任务。由于其开源性质，该语言是Web开发人员和应用程序设计人员的最爱。可以修改Perl中的任何模块，甚至是语言本身。它也是IT经理的最爱，因为使用Perl执行任务所涉及的成本不是很高。
Perl作为第一种编程语言也是一个非常好的选择。语言的语法，至少在开始的时候，很容易，因为它有很强的语言学根基。它有一个自动垃圾收集器，这使得编写程序很容易。总的来说，Perl是一种易于初学者学习的语言。如果您是编程新手，请不要犹豫，选择Perl。如果你已经有了编程经验，并且知道像c++这样的语言，你会发现它更容易学习(尽管它与c++在解释语言中有很大的不同)。你可以在本课程中了解更多关于C编程的更多信息)。如果你有兴趣,我们提供一个介绍性的Perl课程，您可以参加学习语言。您还可以查看我们的Perl教程，了解一些重要的基本概念。
在本教程中，我们将详细介绍Perl中的while条件循环。
虽然有条件的循环
while条件循环用于重复执行一个任务，只要给定的条件为真，也就是说，一个代码块将重复执行，直到条件变为假。while条件循环的通用语法是:
虽然（表达式为真）{执行此}
表达式参数生成一个布尔值。如果值为false，则块中的代码(在花括号之间)将不会被执行，Perl将转移到程序的其余部分(如果有的话)。如果布尔值为真，则执行代码。然后再次检查表达式。如果它继续为真，代码块将继续执行。听起来很简单，不是吗?通常，表达式参数会在代码块中不断修改。这是为了防止无限循环的发生。
While条件循环的示例
在几个例子的帮助下，您将了解Perl时更好地循环。首先，让我们看看有条件的评估如何真正有效。让我们采取虚假的条件，看看会发生什么：
# !/usr/bin/perl $month = "一月份";while ($month eq "February") {print "The month is February\n";} print "The month is January\n";
输出
这个月是1月
这是循环的一个非常基本的例子。在这里，我们创建了一个名为“月”的简单变量，并将其值设置为“1月”。在条件表达式中，Perl将检查月份是否具有“二月”的价值。因为它显然没有，块内的代码跳过，并在执行守则之后执行（这是一个简单的打印行语句）。这就是为什么程序的输出是“月份是1月”的原因。
现在，让我们取一个真条件，让程序执行代码块中的代码:
＃！/ usr / bin / perl $月=“六月”;虽然（$月eq“六月”）{打印“月份是六月\ n”;} print "The month is January\n";
输出:
这个月是6月份是6月份的是六月......
你看到这里发生了什么吗?由于条件为真，即该月为“June”，执行block中的代码，得到输出:“the month is June”。然后，Perl再次检查条件语句。因为这个月仍然是6月，它再次执行了块中的代码，我们得到了输出:“这个月是6月”第二次。因为条件表达式永远不会为假，所以代码块会被执行无数次。Perl永远不会到达下一行代码:“月份是一月份”。这就是所谓的无限循环，如果你的脚本中包含了无限循环，就会被认为是糟糕的编程(除非是为了学习)。您可以自己尝试执行这个程序来查看无限循环的运行情况。如果您使用的是UNIX系统或Windows系统的“Ctrl + C”，则必须通过按“Ctrl + Z”手动退出循环。如果您不熟悉Perl脚本的基本语法或不熟悉如何执行Perl脚本，注册我们的Perl脚本课程。我们将在我们的课程中教你所有的基础知识。
熟悉C的人会看到Perl中的while循环，与c中的循环相似。如果你是新的编程，你肯定应该是检查本课程C编程，了解更多。
那么你如何避免无限循环？您可以添加不断递增计数器，即在达到某个值时，使Boolean表达式参数False。这样，您可以在执行的块中获取代码有限的次数：
＃！/ / usr / bin / perl $ counter = 0;虽然（$ counter <= 5）{print“$ contract
”;$ counter ++;打印“您现在退出循环”;
输出:
0 1 2 3 4 5您现在退出循环
In this script, we’ve used a variable called “counter” that has the value of 0. As long as the value of the “counter” is less than or equal to 5 (<=), the value of the “counter” will get printed on screen. The critical part of the code block is the increment operator (++). The increment operator increases the value of the “counter” by 1. So, every time the code block gets executed, the value of the “counter” keeps increasing by 1. When it becomes 6, the while loop stops executing and Perl moves on to the next part of the program.
让我们编写一个稍微复杂的程序，在循环中使用稍微为条件循环：
＃！/ / usr / bin / perl $ counter = 0;while ($counter <= 5) {if ($counter = = 3) {print "计数器现在是3 ";下一个;} print "$counter
";}继续{$计数器++;};print "You have now exit the loop";
输出:
1 2计数器现在是3 4 5，您现在退出循环
在此脚本中，我们使用了“下一步”和“继续”功能。下一个功能让Perl跳到下一次迭代。继续函数将包含在再次评估条件之前要执行的代码。我们所做的就是在达到3时中断“柜台”（和循环）3.在3时，我们打印了“柜台现在在3”的陈述中。然后，使用下一个函数，我们能够再次返回循环。继续说法，即使它在循环的主体外，也被用来将计数器的值递增1。
如果您为自己试用它们，您将更好地了解这些脚本。除此之外，您还可能想查看其他脚本语言。本课程涵盖了Bash脚本和Python的基础知识。这将帮助您比较和选择适合您需要的最佳脚本语言。
