資料結構
網路
關係型資料庫管理系統
作業系統
Java
MS Excel
iOS
HTML
CSS
Android
Python
C 程式設計
C++
C#
MongoDB
MySQL
Javascript
PHP
物理學
化學
生物學
數學
英語
經濟學
心理學
社會學
時尚研究
法律研究如何在 Perl 中跳出迴圈？
在大多數程式語言中，我們可以使用“break”關鍵字來跳出任何型別的迴圈。在 Perl 中，我們也有“break”關鍵字可用，但最常用於跳出迴圈的關鍵字是“last”關鍵字。
Perl 中的“last”語句
“last”語句用於 Perl 迴圈中立即退出迴圈；它相當於 C/C++ 和 Java 中的“break”語句。
在實踐中，您經常使用“last”語句在滿足某個條件時退出迴圈，例如，您找到一個數組元素，其鍵與您的搜尋鍵匹配，因此無需檢查其他元素。
“last”語句通常與條件語句（如“if”或“unless”）一起使用。
在本教程中，我們將透過兩個不同的示例演示如何在 Perl 中使用“last”關鍵字跳出迴圈。
示例 1
考慮下面所示的程式碼：
use strict;
print "Enter a string: ";
while (<STDIN>) {
last if $_ eq "tutorialspoint\n";
print "You entered: $_";
}
print "Done for now!\n";
在此示例中，我們使用了標準輸入，然後將該輸入作為引數傳遞給“while”迴圈。使用命令“perl sample.pl”執行檔案，然後在終端中輸入字串“tutorialspoint”；它將在螢幕上產生以下輸出：
Enter a string: tutorialspoint Done for now!
輸出
Enter a string: hello You entered: hello
示例 2
現在，讓我們考慮另一個“while”迴圈中“last”關鍵字的示例。
$var = 1;
while ($var < 10) {
# terminating the loop
if ($var == 7) {
$var = $var + 1;
last;
}
print "The value of var is: $var\n";
$var = $var + 1;
}
在此程式碼中，我們正在啟動一個“while”迴圈，並告訴編譯器，如果變數的值等於“7”，則只需終止迴圈。
如果我們以“sample.pl”為檔名儲存檔案，然後執行命令“perl sample.pl”，那麼我們將在終端中得到以下輸出。
輸出
The value of var is: 1 The value of var is: 2 The value of var is: 3 The value of var is: 4 The value of var is: 5 The value of var is: 6
觀察到，一旦變數的值變為“7”，控制就會跳出迴圈。
更新於: 2022-12-26
9K+ 瀏覽量
廣告