perl 字符串处理(1)

上网一搜perl，大家都说perl的字符串的处理能力很强，最近正在学习perl，我们总结下看看perl有哪些强大的字符串处理能力。

1， 首先其灵活的变量就很方便：

$var = 123;  #$var 的值为123

$var = “He is a good boy!”;  #$var 的内容为“He is agood boy!”

2， 在上面我们可以把一个字符串赋值给一个变量，让我感觉很自由，呵呵，perl 里面还有一个函数：split能将字符串分解成一个个单词存进数组，看

@array = split（” “，$var）;  # split 有两个参数，第一个是分割的标志，这里是用的空格” “。

3， 现在我们算是得到了一个数组了，我们似乎会想我们怎么得到这个数组的长度的，呵呵，在perl中可是一件相当简单的事情：

申明一个变量$length = @array  # 对！$length的值就是数组@array的长度，呵呵，很方便吧。我们除了想知道数组的长度，通常还会想打印数组，以前我们都是通过数组下表访问数组中的值的，例如：

@array[1] = “He”

在perl也支持这种语法的。不过他还能直接打印数组的，呵呵，这个就比较好玩了：

Print（”@array\n”）; #运行结果如下：

 He is a good boy !