小白教程
所有教程
关于
Search
172.70.131.120
172.70.131.120
参数设置
贡献
退出
操作
编辑
移动
保护
信息
历史
删除
查看“Perl 标量”的源代码
本页内容
上一节:
Perl_变量
下一节:
Perl_数组
因为以下原因,您没有权限编辑本页:
您请求的操作仅限属于该用户组的用户执行:
用户
您可以查看和复制此页面的源代码。
{{DISPLAYTITLE:Perl 标量}}[[Category:Perl 教程|7]] = Perl 标量 = 标量是一个简单的数据单元。 标量可以是一个整数,浮点数,字符,字符串,段落或者一个完整的网页。 以下实例演示了标量的简单应用: <sample title="" desc="" lang="perl" hererun="1"> #!/usr/bin/perl $age = 20; # 整数赋值 $name = "xiaoBai"; # 字符串 $salary = 130.50; # 浮点数 print "Age = $age\n"; print "Name = $name\n"; print "Salary = $salary\n"; </sample> 执行以上程序,输出结果为: <pre> Age = 20 Name = xiaoBai Salary = 130.5 </pre> == 数字标量 == 标量通常是一个数字或字符串,以下实例演示了不同类型的数字标量的使用: <sample title="" desc="" lang="perl" hererun="1"> #!/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"; </sample> 执行以上程序,输出结果为: <pre> integer = 200 negative = -300 floating = 200.34 bigfloat = -1.2e-23 octal = 255 hexa = 255 </pre> == 字符串标量 == 以下实例演示了不同类型的字符串标量的使用,注意单引号和双引号的使用区别: <sample title="" desc="" lang="perl" hererun="1"> #!/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"; </sample> 执行以上程序,输出结果为: <pre> var = 字符串标量 - 小白教程! quote = 我在单引号内 - $var double = 我在双引号内 - 字符串标量 - 小白教程! escape = 转义字符使用 - Hello, World! </pre> == 标量运算 == 以下实例演示了标量的简单运算: <sample title="" desc="" lang="perl" hererun="1"> #!/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"; </sample> 执行以上程序,输出结果为: <pre> str = helloworld num = 15 mix = helloworld15 </pre> == 多行字符串 == 我们可以使用单引号来输出多行字符串,如下所示: <sample title="" desc="" lang="perl" hererun="1"> #!/usr/bin/perl $string = ' 小白教程 —— 学习使人快乐! '; print "$string\n"; </sample> 执行以上程序,输出结果为: <pre> 小白教程 —— 学习使人快乐! </pre> 你也可以使用 "here" document 的语法格式来输出多行: <sample title="" desc="" lang="perl" hererun="1"> #!/usr/bin/perl print <<EOF; 小白教程 —— 学习使人快乐! EOF </sample> 执行以上程序,输出结果为: <pre> 小白教程 —— 学习使人快乐! </pre> == 特殊字符 == 以下我们将演示 Perl 中特殊字符的应用,如 __FILE__, __LINE__, 和 __PACKAGE__ 分别表示当前执行脚本的文件名,行号,包名。 '''注意''': __ 是两条下划线,__FILE__ 前后各两条下划线。 这些特殊字符是单独的标记,不能写在字符串中,例如: <sample title="" desc="" lang="perl" hererun="1"> #!/usr/bin/perl print "文件名 ". __FILE__ . "\n"; print "行号 " . __LINE__ ."\n"; print "包名 " . __PACKAGE__ ."\n"; # 无法解析 print "__FILE__ __LINE__ __PACKAGE__\n"; </sample> 执行以上程序,输出结果为: <pre> 文件名 test.pl 行号 4 包名 main __FILE__ __LINE__ __PACKAGE__ </pre> == v 字符串 == 一个以 v 开头,后面跟着一个或多个用句点分隔的整数,会被当作一个字串文本。 当你想为每个字符 直接声明其数字值时,v-字串提供了一种更清晰的构造这类字串的方法,而不像 "\x{1}\x{14}\x{12c}\x{fa0}" 这种不易于理解,我们可以看下面的实例: <sample title="" desc="" lang="perl" hererun="1"> #!/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"; </sample> 执行以上程序,输出结果为: <pre> Wide character in print at test.pl line 7. smile = &#x263a; foo = foo martin = Martin </pre>
返回至“
Perl 标量
”。
上一节:
Perl_变量
下一节:
Perl_数组