Perl 基礎語法

Perl 基礎語法

Perl借用了C、sed、awk、shell指令碼以及很多其他程式語言的特性,語法與這些語言有些類似,也有自己的特點。

Perl 程式有宣告與語句組成,程式自上而下執行,包含了迴圈,條件控制,每個語句以分號 (;) 結束。

Perl 語言沒有嚴格的格式規範,你可以根據自己喜歡的風格來縮排。


第一個 perl 程式

互動式程式設計

你可以在命令列中使用 -e 選項來輸入語句來執行程式碼,例項如下:

$ perl -e 'print "Hello World\n"'

輸入以上命令,回車後,輸出結果為:

Hello World

指令碼式程式設計

我們將以下程式碼放到 hello.pl 檔案中:

例項

#!/usr/bin/perl # 輸出 "Hello, World" print "Hello, world\n";

程式碼中 /usr/bin/perl 是 perl 直譯器的路徑。在執行該指令碼前要先確保檔案有可執行許可權,我們可以先將檔案許可權修改為 0755 :

$ chmod 0755 hello.pl 
$ ./hello.pl 
Hello, world                   # 輸出結果

print 也可以使用括號來輸出字串,以下兩個語句輸出相同的結果:

print("Hello, world\n");
print "Hello, world\n";

指令碼檔案

perl 程式碼可以寫在一個文字檔案中,以 .pl、.PL 作為字尾。

檔名可以包含數字,符號和字母,但不能包含空格,可以使用下劃線(_)來替代空格。

一個簡單的Perl 檔名:

run_oob.pl

註釋

使用註釋使你的程式易讀,這是好的程式設計習慣。

perl 註釋的方法為在語句的開頭用字元#,如:

# 這一行是 perl 中的註釋

perl 也支援多行註釋,最常用的方法是使用 POD(Plain Old Documentations) 來進行多行註釋。方法如下:

例項

#!/usr/bin/perl # 這是一個單行註釋 print "Hello, world\n"; =pod 註釋 這是一個多行註釋 這是一個多行註釋 這是一個多行註釋 這是一個多行註釋 =cut

執行以上程式,輸出結果為:

Hello, world

注意:

  • =pod、 =cut只能在行首。
  • 以=開頭,以=cut結尾。
  • =後面要緊接一個字元,=cut後面可以不用。

Perl 中的空白

Perl 直譯器不會關心有多少個空白,以下程式也能正常執行:

例項

#!/usr/bin/perl print "Hello, world\n";

執行以上程式,輸出結果為:

Hello, world

但是如果空格和分行出現在字串內,他會原樣輸出:

例項

#!/usr/bin/perl # 會輸出分行 print "Hello world\n";

執行以上程式,輸出結果為:

Hello
          world

所有型別的空白如:空格,tab ,空行等如果在引號外直譯器會忽略它,如果在引號內會原樣輸出。


單引號和雙引號

perl 輸出字串可以使用單引號和雙引號,如下所示:

例項

#!/usr/bin/perl print "Hello, world\n"; # 雙引號 print 'Hello, world\n'; # 單引號

輸出結果如下:

Hello, world
Hello, world\n

從結果中我們可以看出,雙引號 \n 輸出了換行,而單引號沒有。

Perl雙引號和單引號的區別: 雙引號可以正常解析一些轉義字元與變數,而單引號無法解析會原樣輸出。

例項

#!/usr/bin/perl $a = 10; print "a = $a\n"; print 'a = $a\n';

輸出結果如下:

a = 10
a = $a\n

Here 文件

Here文件又稱作heredoc、hereis、here-字串或here-指令碼,是一種在命令列shell(如sh、csh、ksh、bash、PowerShell和zsh)和程式語言(像Perl、PHP、Python和Ruby)裡定義一個字串的方法。

使用概述:

  • 1.必須後接分號,否則編譯通不過。
  • 2.END可以用任意其它字元代替,只需保證結束標識與開始標識一致。
  • 3.結束標識必須頂格獨自佔一行(即必須從行首開始,前後不能銜接任何空白和字元)。
  • 4.開始標識可以不帶引號號或帶單雙引號,不帶引號與帶雙引號效果一致,解釋內嵌的變數和轉義符號,帶單引號則不解釋內嵌的變數和轉義符號。
  • 5.當內容需要內嵌引號(單引號或雙引號)時,不需要加轉義符,本身對單雙引號轉義,此處相當與q和qq的用法。

例項

#!/usr/bin/perl $a = 10; $var = <<"EOF"; 這是一個 Here 文件例項,使用雙引號。 可以在這輸如字串和變數。 例如:a = $a EOF print "$var\n"; $var = <<'EOF'; 這是一個 Here 文件例項,使用單引號。 例如:a = $a EOF print "$var\n";

執行以上程式輸出結果為:

這是一個 Here 文件例項,使用雙引號。
可以在這輸如字串和變數。
例如:a = 10

這是一個 Here 文件例項,使用單引號。
例如:a = $a

轉義字元

如果我們需要輸出一個特殊的字元,可以使用反斜線(\)來轉義,例如輸出美元符號($):

例項

#!/usr/bin/perl $result = "入門教學 \"itread01\""; print "$result\n"; print "\$result\n";

執行以上程式輸出結果為:


Perl 識別符號

Perl 識別符號是使用者程式設計時使用的名字,在程式中使用的變數名,常量名,函式名,語句塊名等統稱為識別符號。

  • 識別符號組成單元:英文字母(a~z,A~Z),數字(0~9)和下劃線(_)。
  • 識別符號由英文字母或下劃線開頭。
  • 識別符號區分大小寫,$itread01 與 $itread01 表示兩個不同變數。