Perl 標量
標量是一個簡單的數據單元。
標量可以是一個整數,浮點數,字元,字串,段落或者一個完整的網頁。
以下實例演示了標量的簡單應用:
實例
#!/usr/bin/perl
$age = 20; # 整數賦值
$name = "zaixian"; # 字串
$salary = 130.50; # 浮點數
print "Age = $age\n";
print "Name = $name\n";
print "Salary = $salary\n";
執行以上程式,輸出結果為:
Age = 20 Name = zaixian Salary = 130.5
數字標量
標量通常是一個數字或字串,以下實例演示了不同類型的數字標量的使用:
實例
#!/usr/bin/perl
$integer = 200;
$negative = -300;
$floating = 200.340;
$bigfloat = -1.2E-23;
# 八進制 377 , 十進位為 255
$octal = 0377;
# 十六進制 FF, 十進位為 255
$hexa = 0xff;
print "integer = $integer\n";
print "negative = $negative\n";
print "floating = $floating\n";
print "bigfloat = $bigfloat\n";
print "octal = $octal\n";
print "hexa = $hexa\n";
執行以上程式,輸出結果為:
integer = 200 negative = -300 floating = 200.34 bigfloat = -1.2e-23 octal = 255 hexa = 255
字串標量
以下實例演示了不同類型的字串標量的使用,注意單引號和雙引號的使用區別:
實例
#!/usr/bin/perl
$var = "字串標量 - IT研修!";
$quote = '我在單引號內 - $var';
$double = "我在雙引號內 - $var";
$escape = "轉義字元使用 -\tHello, World!";
print "var = $var\n";
print "quote = $quote\n";
print "double = $double\n";
print "escape = $escape\n";
執行以上程式,輸出結果為:
var = 字串標量 - IT研修! quote = 我在單引號內 - $var double = 我在雙引號內 - 字串標量 - IT研修! escape = 轉義字元使用 - Hello, World!
標量運算
以下實例演示了標量的簡單運算:
實例
#!/usr/bin/perl
$str = "hello" . "world"; # 字串連接
$num = 5 + 10; # 兩數相加
$mul = 4 * 5; # 兩數相乘
$mix = $str . $num; # 連接字串和數字
print "str = $str\n";
print "num = $num\n";
print "mix = $mix\n";
執行以上程式,輸出結果為:
str = helloworld num = 15 mix = helloworld15
多行字串
我們可以使用單引號來輸出多行字串,如下所示:
實例
#!/usr/bin/perl
$string = '
IT研修
—— 鍵盤之下,連接的是無限可能!
';
print "$string\n";
執行以上程式,輸出結果為:
IT研修 —— 鍵盤之下,連接的是無限可能!
你也可以使用 "here" document 的語法格式來輸出多行:
實例
#!/usr/bin/perl
print <<EOF;
IT研修
—— 鍵盤之下,連接的是無限可能!
EOF
執行以上程式,輸出結果為:
IT研修 —— 鍵盤之下,連接的是無限可能!
特殊字元
以下我們將演示 Perl 中特殊字元的應用,如 __FILE__, __LINE__, 和 __PACKAGE__ 分別表示當前執行腳本的檔案名,行號,包名。
注意: __ 是兩條下劃線,__FILE__ 前後各兩條下劃線。
這些特殊字元是單獨的標記,不能寫在字串中,例如:
實例
#!/usr/bin/perl
print "檔案名 ". __FILE__ . "\n";
print "行號 " . __LINE__ ."\n";
print "包名 " . __PACKAGE__ ."\n";
# 無法解析
print "__FILE__ __LINE__ __PACKAGE__\n";
執行以上程式,輸出結果為:
檔案名 test.pl 行號 4 包名 main __FILE__ __LINE__ __PACKAGE__
v 字串
一個以 v 開頭,後面跟著一個或多個用句點分隔的整數,會被當作一個字串文本。
當你想為每個字元 直接聲明其數字值時,v-字串提供了一種更清晰的構造這類字串的方法,而不像 "\x{1}\x{14}\x{12c}\x{fa0}" 這種不易於理解,我們可以看下麵的實例:
實例
#!/usr/bin/perl
$smile = v9786;
$foo = v102.111.111;
$martin = v77.97.114.116.105.110;
print "smile = $smile\n";
print "foo = $foo\n";
print "martin = $martin\n";
執行以上程式,輸出結果為:
Wide character in print at test.pl line 7. smile = ☺ foo = foo martin = Martin