perl的基本代码

一：

字符串的比较操作符：小于 ----- lt   大于---- gt   小于或等于----le     大于或等于------ge     

<STDIN>：获取用户输入（一行读入知道遇到末尾的换行符为止）

chomp():去掉每行字符串中换行符

循环结构用while

undef值没有赋值的一个标量。（undef作为数字时被视为0，作为字符为空字符）

defined：此函数用来判断某个字符串是undef而不是空字符串

二，列表和数组中的操作符

perl中列表中的索引是从0开始  @表示所有，$表示某一个标量

qw()建立简单的列表（qw:quoted word）

pop和push操作符

删除和新增元素到数组尾端

shift和unshift操作符

删除和新增元素到数组的开头

splice操作符

添加或移除数组中间的某些元素

splice @array ,1,2，@array( or qw(willa))  ##此操作符之多四个参数

@array指要操作的目标数组。

1：要操作数组的索引位置

2：表示要操作的元素

@array( or qw(willa)):要替换的列表

3: $3#array  数组array最后一个元素的索引值 

perl中的默认变量$_

reverse操作符：按相反次序返回该列表

sort操作符：按一定的顺序排序后返回该列表

use strict编译指令

use strict;  #强制使用一些严格的，良好的编程风格（最好写perl代码的时候要写上）  或者是用：use 5.012;

例如：由于perl是一门相当宽松的语言，有时候变量并没有定义，就可以直接用，他并不会显示错误，但是这会造成你写代码时，变量写错了，但是perl却不会报错。

持久性私有变量：state  

use strict;

eg：state $n=0

Noted:state 不能再列表上下文中初始化   

eg:  @array=qw(a,b,c)  #错误

perl中的运算符的基本介绍：http://www.jb51.net/article/34419.htm