Perl 标量

Perl 标量标量是一个简单的数据单元。标量可以是一个整数，浮点数，字符，字符串，段落或者一个完整的网页。以下实例演示了标量的简单应用：实例





#!/usr/bin/perl$age = 20;





# 整数赋值$name = "Runoob";





# 字符串$salary = 130.50;





# 浮点数print "Age = $age\n";print "Name = $name\n";print "Salary = $salary\n";执行以上程序，输出结果为：Age = 20Name = RunoobSalary = 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 = 200negative = -300floating = 200.34bigfloat = -1.2e-23octal = 255hexa = 255字符串标量以下实例演示了不同类型的字符串标量的使用，注意单引号和双引号的使用区别：实例





#!/usr/bin/perl$var = "字符串标量 - k88.net!";$quote = '我在单引号内 - $var';$double = "我在双引号内 - $var";$escape = "转义字符使用 -\tHello, World!";print "var = $var\n";print "quote = $quote\n";print "double = $double\n";print "escape = $escape\n";执行以上程序，输出结果为：var = 字符串标量 - k88.net!quote = 我在单引号内 - $vardouble = 我在双引号内 - 字符串标量 - k88.net!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 = helloworldnum = 15mix = helloworld15多行字符串我们可以使用单引号来输出多行字符串，如下所示：实例





#!/usr/bin/perl$string = 'k88.net—— 学的不仅是技术，更是梦想！';print "$string\n";执行以上程序，输出结果为：k88.net    —— 学的不仅是技术，更是梦想！你也可以使用 "here" document 的语法格式来输出多行：实例





#!/usr/bin/perlprint <<EOF;k88.net—— 学的不仅是技术，更是梦想！EOF执行以上程序，输出结果为：k88.net    —— 学的不仅是技术，更是梦想！特殊字符以下我们将演示 Perl 中特殊字符的应用，如 __FILE__, __LINE__, 和 __PACKAGE__ 分别表示当前执行脚本的文件名，行号，包名。注意： __ 是两条下划线，__FILE__ 前后各两条下划线。这些特殊字符是单独的标记，不能写在字符串中，例如：实例





#!/usr/bin/perlprint "文件名 ". __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 = &





#x263a;foo = foomartin = Martin