perl 语言（标量）

perl 语言（标量）

perl 的标量可以分为数字标量和字符串标量，特殊字符串和含v字符串，其中数字标量也可以分为浮点型和整型。这次就重点讲述数字标量和字符串标量的用法。

数字标量

数字标量可以进行数值运算
如：

#!/usr/bin/perl
$num1 = 25+10;
$num2 = 10;
# 35+10
print "$num1+$num2\n";
# $num1 + $num2
print '$num1 + $num2';

可以看出，print内不能进行计算，但是在定义变量时是可以进行数值运算的

字符串标量

字符串标量可以进行字符串的拼接
如：

#!/usr/bin/perl
$str1 = "hello";
$str2 = " world";
# hello world
print $str1 . $str2;

字符串函数

1. index(str, sbustr, start_char) 从start_char开始查找str里是否有substr。
   如：

#!/usr/bin/perl
$str = "abcdefg";
$num = index($str,"efg","b");
# 4
print $num;

2. length(str) 返回str的字符长度
   如：

#!/usr/bin/perl
$str = "abcdefg";
$num = length($str);
# 7
print $num;

3. $substr = substr(str,start_index,length)
   如：

#!/usr/bin/perl
$str = "abcdefg";
$substr = substr($str,2,4);
# cdef
print $substr;

4. $lower = lc(str) 将str的所有字母都小写
5. $upper = uc(str) 将str的所有字母都大写
6. join(seperate,list) 将列表list中的所有元素合为一个数组，并用”seperate"分隔
   如：

#!/usr/bin/perl
@animals = ('cat','fish','dog','ant');
$str = join(' ',@animals);
# cat fish dog ant
print $str;

参考 perl中的字符串操作函数