while循環語法：
while(some_expression){
statment_1;
statment_2;
....
}
程序執行到while語句時，首先檢查控制語句(some_expression)，若其值為真，就會執行循環體一次，如此反復不停的執行，知道控制語句的值為假，則停止while循環
示例：
#!/usr/bin/perl -w
$number=10;
while($number > 0){
print ("number is $number\n");
--$number;
}
until循環語法
until( some_expression ){
statment_1;
statment_2;
...
}
與while語句相反，some_expression 值為假則執行循環體，為真則停止循環
示例：
#!/usr/bin/perl -w
$number=10;
until($number <= 0){
print ("number is $number\n");
--$number;
}
do while 循環和do until 循環 語法
do while 或 do until 循環 至少執行一次循環體，然後才檢查條件。
do {
statment_1;
statment_2;
...
}while(some_expression);
do while 循環，條件表達式為假則循環結束
do {
statment_1;
statment_2;
...
}until(some_expression);
do until 循環，條件表達式為真則循環結束
for循環
for語句主要用於確定次數的循環，語法如下：
for(其實語句;測試語句;步進語句){
statment_1;
statment_2;
....
}
系統會首先執行起始語句。一般可以在這裡為變量賦值，不過這不是硬性規定，甚至可以什麼都不寫，但是分號還是要寫。測試語句的值若為真，循環體被執行一次，接著執行步進語句。
foreach循環
foreach循環可以接收一個列表，將其中的數據作為參數一次一個賦給某標量變量，並執行每一條有效賦值的代碼塊語句。其語法如下：
foreach $i (@some_list){
statment_1;
statment_2;
....
}
示例：
#!/usr/bin/perl -w
foreach (1..10){
print " ";
print;
}
print "\n";
foreach所用的列表跨越式任何值為列表的語句，不一定要數組變量，甚至可以不寫標量變量，讓perl使用默認變量 $_ 。如不指定任何值給print ，就會打印出$_ 的內容。
如果在應該使用列表值的地方使用了真正的變量，取代返回列表的函數，那麼perl會在循環中把用到的變量視為傳入的變量的別名，而不僅僅是拷貝值而已。這樣，如果在循環中改變了該標量變量，列表裡的對應元素也會被相應改變。例如：
#!/usr/bin/perl -w
@x=(1..10);
foreach $num (@x){
$num += 10;
}
print "@x";
print "\n";
foreach執行完後，數組@x 的值改變了。
Perl 獲取cpu使用率 http://www.linuxidc.com/Linux/2013-06/85950.htm
Perl中pop與push函數 http://www.linuxidc.com/Linux/2013-01/78154.htm
【Perl腳本】找出日志中的錯誤信息並發送郵件 http://www.linuxidc.com/Linux/2012-11/75069.htm
用Perl 從MySQL取出數據做統計分析代碼 http://www.linuxidc.com/Linux/2012-02/53289.htm
Perl語言入門 第六版中文清晰PDF http://www.linuxidc.com/Linux/2014-08/105402.htm
Perl 的詳細介紹：請點這裡
Perl 的下載地址：請點這裡