Perl 標量

標量是一個簡單的數(shù)據單元。

標量可以是一個整數(shù)，浮點數(shù)，字符，字符串，段落或者一個完整的網頁。

以下實例演示了標量的簡單應用：

#!/usr/bin/perl

$age = 20;             # 整數(shù)賦值
$name = "W3CSchool";   # 字符串
$salary = 130.50;     # 浮點數(shù)

print "Age = $age\n";
print "Name = $name\n";
print "Salary = $salary\n";

執(zhí)行以上程序，輸出結果為：

Age = 20
Name = W3CSchool
Salary = 130.5

數(shù)字標量

標量通常是一個數(shù)字或字符串，以下實例演示了不同類型的數(shù)字標量的使用：

#!/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";

執(zhí)行以上程序，輸出結果為：

integer = 200
negative = -300
floating = 200.34
bigfloat = -1.2e-23
octal = 255
hexa = 255

字符串標量

以下實例演示了不同類型的字符串標量的使用，注意單引號和雙引號的使用區(qū)別：

#!/usr/bin/perl

$var = "字符串標量 - W3Cschool教程!";
$quote = '我在單引號內 - $var';
$double = "我在雙引號內 - $var";

$escape = "轉義字符使用 -\tHello, World!";

print "var = $var\n";
print "quote = $quote\n";
print "double = $double\n";
print "escape = $escape\n";

執(zhí)行以上程序，輸出結果為：

var = 字符串標量 - W3Cschool教程!
quote = 我在單引號內 - $var
double = 我在雙引號內 - 字符串標量 - W3Cschool教程!
escape = 轉義字符使用 -	Hello, World!

標量運算

以下實例演示了標量的簡單運算：

#!/usr/bin/perl

$str = "hello" . "world";       # 字符串連接
$num = 5 + 10;                  # 兩數(shù)相加
$mul = 4 * 5;                   # 兩數(shù)相乘
$mix = $str . $num;             # 連接字符串和數(shù)字

print "str = $str\n";
print "num = $num\n";
print "mix = $mix\n";

執(zhí)行以上程序，輸出結果為：

str = helloworld
num = 15
mix = helloworld15

多行字符串

我們可以使用單引號來輸出多行字符串，如下所示：

#!/usr/bin/perl

$string = '
W3Cschool教程
	—— 從W3Cschool開始！
';

print "$string\n";

執(zhí)行以上程序，輸出結果為：

W3Cschool教程
	—— 從W3Cschool開始！

你也可以使用 "here" document 的語法格式來輸出多行：

#!/usr/bin/perl

print <<EOF;
W3Cschool教程
	—— 從W3Cschool開始！
EOF

執(zhí)行以上程序，輸出結果為：

W3Cschool教程
	—— 從W3Cschool開始！

特殊字符

以下我們將演示 Perl 中特殊字符的應用，如 __FILE__, __LINE__, 和 __PACKAGE__ 分別表示當前執(zhí)行腳本的文件名，行號，包名。

這些特殊字符是單獨的標記，不能寫在字符串中，例如：

#!/usr/bin/perl

print "文件名 ". __FILE__ . "\n";
print "行號 " . __LINE__ ."\n";
print "包名 " . __PACKAGE__ ."\n";

# 無法解析
print "__FILE__ __LINE__ __PACKAGE__\n";

執(zhí)行以上程序，輸出結果為：

文件名 test.pl
行號 4
包名 main
__FILE__ __LINE__ __PACKAGE__

v 字符串

一個以 v 開頭,后面跟著一個或多個用句點分隔的整數(shù),會被當作一個字串文本。

當你想為每個字符 直接聲明其數(shù)字值時,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";

執(zhí)行以上程序，輸出結果為：

Wide character in print at test.pl line 7.
smile = ?
foo = foo
martin = Martin