Perl 标量

Perl 教程 · 2019-02-26 13:44:26

标量是一个简单的数据单元。

标量可以是一个整数,浮点数,字符,字符串,段落或者一个完整的网页。

以下实例演示了标量的简单应用:

实例

#!/usr/bin/perl $age = 20; # 整数赋值 $name = "Codercto"; # 字符串 $salary = 130.50; # 浮点数 print "Age = $age\n"; print "Name = $name\n"; print "Salary = $salary\n";

执行以上程序,输出结果为:

Age = 20
Name = Codercto
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 = "字符串标量 - 码农教程!"; $quote = '我在单引号内 - $var'; $double = "我在双引号内 - $var"; $escape = "转义字符使用 -\tHello, World!"; print "var = $var\n"; print "quote = $quote\n"; print "double = $double\n"; print "escape = $escape\n";

执行以上程序,输出结果为:

var = 字符串标量 - 码农教程!
quote = 我在单引号内 - $var
double = 我在双引号内 - 字符串标量 - 码农教程!
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 = ' 码农教程 —— 学的不仅是技术,更是梦想! '; print "$string\n";

执行以上程序,输出结果为:

码农教程
    —— 学的不仅是技术,更是梦想!

你也可以使用 "here" document 的语法格式来输出多行:

实例

#!/usr/bin/perl print <<EOF; 码农教程 —— 学的不仅是技术,更是梦想! EOF

执行以上程序,输出结果为:

码农教程
    —— 学的不仅是技术,更是梦想!

特殊字符

以下我们将演示 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 = &#x263a;
foo = foo
martin = Martin

点击查看所有 Perl 教程 文章: https://www.codercto.com/courses/l/19.html

查看所有标签

复杂网络理论及其应用

复杂网络理论及其应用

汪小帆、李翔、陈关荣 / 清华大学出版社 / 2006 / 45.00元

国内首部复杂网络专著 【图书目录】 第1章 引论 1.1 引言 1.2 复杂网络研究简史 1.3 基本概念 1.4 本书内容简介 参考文献 第2章 网络拓扑基本模型及其性质 2.1 引言 2.2 规则网络 2.3 随机图 2.4 小世界网络模型 2.5 无标度网络模型 ......一起来看看 《复杂网络理论及其应用》 这本书的介绍吧!

HTML 压缩/解压工具
HTML 压缩/解压工具

在线压缩/解压 HTML 代码

Markdown 在线编辑器
Markdown 在线编辑器

Markdown 在线编辑器

UNIX 时间戳转换
UNIX 时间戳转换

UNIX 时间戳转换