精簡扼要的Perl 課程講義（三）：迴圈與控制結構 - G. T. Wang
文章推薦指數： 80 %
next 跳到這裡 } # last 跳到這裡繼續執行 # 註：next, last 與redo 皆可用在for,foreach,while 與until 等迴圈。
# (7) if # (A) $a = 5; ...
Blogger舊站
關於
Facebook
Flickr
物聯網
網站架設
程式設計
統計
素食
特價優惠
宗教
物聯網
網站架設
程式設計
統計
素食
特價優惠
宗教
精簡扼要的Perl課程講義（三）：迴圈與控制結構
2015/04/23
0則留言
迴圈與控制結構
#迴圈與控制結構
#(1)for
for($i=0;$i<10;++$i){
print$i;#印出0123456789
}
#註：{}不可省略
#(2)while
#(A)
$i=0;
while($i<10){
print$i;#印出0123456789
++$i;
}
#(B)
while(($key,$value)=each%hash){
print"$keyis$value\n";
}
#(3)dowhile
do{
print$i;
$i++;
}while($i<10);
#(4)until(與while相反)
until($i>=10){
print$i;
$i++;
}
#(5)foreach
#(A)
@arr=(1,2,3,4);
foreach$i(@arr){
print$i;#印出@arr所有元素
}
#(B)
%hash=("Bill"=>"boy","Mary"=>"gril");
foreach$key(keys%hash){
#印出%hash所有元素
print"$keyis$hash{$key}\n";
}
#(C)
printforeach(1..9);#倒裝
#(D)foreach可簡寫成for
printfor1..9;
#(6)last,nextandredo
while($something){
#redo跳到這裡重新開始
#something...
if($ok){
next;#next跳過目前此次迭代
}
if($oops){
redo;#redo重新執行目前此次迭代
}
#something...
if($error){
last;#last會終止圈
}
#something...
#next跳到這裡
}
#last跳到這裡繼續執行
#註：next,last與redo皆可用在for,foreach,while與until等迴圈。
#(7)if
#(A)
$a=5;
if($a>3){
print"$a>3\n";
}elsif($a<3){
print"$a<3\n";
}else{
print"$a=3\n";
}
#(B)
$val=3;
#倒裝，等同於：if($val>0){print$val;}
print$valif$val>0;
#(8)unless(與if相反)
$a=5;
print"$a>4"unless($a<=4);
#練習一
#
#1.寫一個perlscript印出九九乘法表
#
#基本版
for($i=1;$i<10;++$i){
for($j=1;$j<10;++$j){
print$j."x".$i."=",$i*$j,"";
}
print"\n";
}
#排版整齊
for($i=1;$i<10;++$i){
for($j=1;$j<10;++$j){
print$j."x".$i."=",$i*$j,"";
if($i*$j<10){
print"";
}
}
print"\n";
}
#精簡版
for$i(1..9){
printf"%dx%d=%-3d",$_,$i,$i*$_for(1..9);
print"\n";
}
繼續閱讀：Perl程式設計教學
Perl
G.T.Wang
個人使用Linux經驗長達十餘年，樂於分享各種自由軟體技術與實作文章。
LeaveaReply取消回覆
留言*
Name*
Email*
Website
搜尋
分類Arduino(5)
BeagleBoneBlack(1)
DIY(54)
Linux(317)
macOS(33)
Octave(15)
Perl(12)
R(47)
Windows(98)
WordPress(16)
個人(15)
免費(35)
兒童(30)
實用工具(85)
手機(13)
技巧(45)
有趣(99)
樹莓派(57)
物聯網(55)
玄學(11)
生活(209)
程式設計(137)
統計學(8)
網頁空間(36)
網頁開發(128)
虛擬化(7)
農業(42)
遊戲(9)
開箱(132)
雲端(4)
宗教
如何戒邪淫、遠離婚外情
戒淫寶典：《壽康寶鑑》白話有聲書
公益
社團法人新竹縣愛心物資集發協會
Yahoo奇摩公益
智邦公益網
台灣世界展望會
家扶基金會
©2022G.T.Wang
延伸文章資訊
- 1精簡扼要的Perl 課程講義（三）：迴圈與控制結構 - G. T. Wang
next 跳到這裡 } # last 跳到這裡繼續執行 # 註：next, last 與redo 皆可用在for,foreach,while 與until 等迴圈。 # (7) if # (A)...
- 2Perl next Statement
The Perl next statement is used inside a loop to start the next iteration and skip all code below...
- 3Perl next 语句- Perl 基础教程- 简单教程
Perl 中的**next** 语句用于停止执行从next语句的下一语句开始到循环体结束标识符之间的语句，返回到循环体的起始处开始执行下一次循环### next 语句语法格式Perl next ...
- 4Perl next Statement - Tutorialspoint
The Perl next statement starts the next iteration of the loop. You can provide a LABEL with next ...
- 5Perl next 语句 - 极客教程
Perl next 语句Perl 循环Perl next 语句用于停止执行从next语句的下一语句开始到循环体结束标识符之间的语句，转去执行continue语句块，然后再返回到循环体的起始处 ...
