|
|
---ALL From Internet Web---
基本上，简单变量就是一个数据单元，这个单元可以是数字或字符串。
一、整型
1、整型
PERL最常用的简单变量，由于其与其它语言基本相同，不再赘述。
例：
$x = 12345;
if (1217 + 116 == 1333) {
# statement block goes here
}
整型的限制：
PERL实际上把整数存在你的计算机中的浮点寄存器中，所以实际上被当作浮点数看待。在多数计算机中，浮点寄存器可以存贮约16位数字，长于此的被丢弃。整数实为浮点数的特例。
2、8进制和16进制数
8进制以0打头，16进制以0x打头。
例：$var1 = 047; (等于十进制的39)
$var2 = 0x1f; (等于十进制的31)
++++++++++++++++++++++++
Code
#!/usr/bin/perl
$a = 047;
$b = 0x1f;
print "Content-type: text/html\n\n";
if(12+1==13)
{
print $a; #输出39
print "\n";#输出换行,\r\n也输出回车换行，不知道有什么区别，DzSoft的InBrowser中没有换行，只是空格？！
print $b;#输出31
}
print "<html><h1>Hello!</h1></html>\n";++++++++++++++++++++++++++++++
二、浮点数
如 11.4 、 -0.3 、.3 、 3. 、 54.1e+02 、 5.41e03
浮点寄存器通常不能精确地存贮浮点数，从而产生误差，在运算和比较中要特别注意。指数的范围通常为-309到+308。
例：
----$value = 2.01e+2 ; #就是2.01乘以10的2次方，就是2.01X100，就是201----
#!/usr/local/bin/perl
$value = 9.01e+21 + 0.01 - 9.01e+21;
print ("first value is ", $value, "\n");
$value = 9.01e+21 - 9.01e+21 + 0.01;
print ("second value is ", $value, "\n");
Code
#!/usr/local/bin/perl
$value = 9.01e+21 + 0.01 - 9.01e+21;
print ("first value is ", $value, "\n"); #输出0
$value = 9.01e+21 - 9.01e+21 + 0.01;
print ("second value is ", $value, "\n");#输出0.01 +++++++++++++++++++++++++++++++
三、字符串
惯用C的程序员要注意，在PERL中，字符串的末尾并不含有隐含的NULL字符，NULL字符可以出现在串的任何位置。
. 双引号内的字符串中支持简单变量替换，例如：
$number = 11;
$text = "This text contains the number $number.";
则$text的内容为："This text contains the number 11."
+++++++++++++++++++++++++++++++++++ |
|
|
QQ群⑧：
窥视卡
雷达卡
发表于 2015-12-27 17:28:08
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡