#∶ perl语言的注释符，该行其后的内容不执行。
$∶匹配定位模式，表示最后一个字符得匹配，用于常规表达式(正则表达式)，置于两个/之间最后面。
$_/∶ perl运算的缺省变量，可以视为缓冲区。
例如∶foreach(reverse @a){print;}就使用了缺省变量。
+、-、*、/∶ perl语言的运算符——加、减、乘、除。
+∶组合模式，表示一个或多个它前面的字符，等价于{1,}，用于常规表达式(正则表达式)，置于两个/之间。
-∶ 字符列表中间的连接线。
例如∶A-Z，表示A到Z之间的所有字符。
+=、-=、*=、/=、%=、|=、&=、^=、~=、<<=、>>=、**=、.=∶ perl语言的运算符，修改和替代。
.∶(1)perl语言的运算符，位非。(2)perl语言的字符串连接运算符。(3)模式匹配字符，表示除了\n之外的任意字符。用于常规表达式(正则表达式)，置于两个/之间。例如 $name=~s/\W.*//;(找到第一个非单词字符，将从这里开始的到字符串尾的所有字符全部删除。)
..∶perl语言的表运算符，范围运算符。
例一∶@number=0..9;#该语句创建了一个表，从0到9的整数。
例二∶foreach $i(0..9){print "$i\n";}
,∶(1)perl语言的顺序计值符。(2)perl语言的表构造符。
*∶组合模式，表示零个或多个它前面的字符(或字符类)，等价于{0,}，用于常规表达式(正则表达式)，置于两个/之间。
**∶perl语言的乘方运算符。
^∶匹配定位模式，表示第一个字符得匹配，用于常规表达式(正则表达式)，置于两个/之间最前面。
?∶组合模式，表示零个或一个它前面的字符，等价于{0,1}，用于常规表达式(正则表达式)，置于两个/之间。例∶
$str="I xxxxx full";$str=~s/x+/am/g;这时$str="I am full"
$str="I xxxxx full";$str=~s/x+?/am/g;这时$str="I amamamamam full"
!∶perl语言的运算符——负。
!~∶perl语言的字符串运算符，将一个变量绑定到模式匹配，取非前两个运算符比较简单。
!=∶perl语言的比较运算符，不等于。用于比较数值。
&∶perl语言的运算符——位与。
&&∶perl语言的运算符——逻辑与。
%∶perl语言的运算符——模除（取整除后的余数）。
;∶ 分隔符——终止一条语句。
：∶ 分隔符——指明标号语句。
++∶ 运算符——增一。
-- ∶运算符——减一。
= ∶运算符——赋值。
==∶perl语言的比较运算符，等于。用于比较数值。
=~：perl语言的字符串运算符(相配运算符)，将一个变量绑定到模式匹配。
例一∶$var="china";
print($var=~/ina/)?TRUE:FALSE;
该例确定$var变量里是否包含ina模式，输出结果为TRUE。
例二∶$var=~s/\+/ /g;
该例中$var变量中所有+(用\+表示)都被替换成空格。
>=∶perl语言的比较运算符，大于等于。用于比较数值。
> ∶perl语言的比较运算符，大于。用于比较数值。
<=∶perl语言的比较运算符，小于等于。用于比较数值。
<∶perl语言的比较运算符，小于。用于比较数值。
<=>∶perl语言的spaceship运算符。
$a<=>$b;
等价于下面三行∶
if($a<$b){return -1;}
elsif($a==$b){return 0;}
elsif($a>$b){return 1;}
<<∶perl语言的运算符——字位左移。
>>∶perl语言的运算符——字位右移。
| ∶perl语言的运算符，按位或。
| ∶perl语言的模式组合结构，表示“或”，用于常规表达式(正则表达式)，置于两个/之间。
||∶perl语言的运算符——逻辑或。
[ ]∶分隔符——指明数组下标。
( )∶ 分隔符——用于形成表达式、隔离条件表达式，以及指明函数调用和函数参数。
( )∶ 组合模式运算符，用于常规表达式(正则表达式)，置于两个/之间。该运算符并不改变( )之间字符的匹配结果，但可以记住这些字符，后面可以用\和一个数字表示记住的是第几个( )中的字符来进行同样的匹配。如果( )中用?开头，则不会有记忆功能，仅仅是表示优先。
( )∶ 常规表达式(正则表达式)用( )表示从字符串中抽取子字符串，并赋值。
例如∶
$str="January 1,1997";
($m,$d,$y)=$str=~/\s*(\S*)\s+(\d+)\D+(\d{4})/;
跳过字符串前所有空格符；把所有非空格字符赋值给变量$m；跳过空格符；把所有数字赋值给变量$d；跳过所有非数字字符；把接下来的四个数字赋值给变量$y。
{ }∶ 分隔符——用于指明复合语句（分程序）的开始和及结束。
\\∶ perl语言的转义，反斜线。用在单、双引号字符串中。
\'∶ perl语言的转义，单引号。用在单引号字符串中。
\"∶ perl语言的转义，双引号。用在双引号字符串中。
\a∶ perl语言的转义，响铃。用在双引号字符串中。
\b∶perl语言的转义，退格。用在双引号字符串中。
\b∶用于常规表达式(正则表达式)，置于两个/之间，表示在字间进行匹配。
例如∶
$str="the apple there";$str=~s/the/an/g;替换后$str="an apple anre"
$str="the apple there";$str=~s/\bthe\b/an/g;替换后$str="an apple there"
\B∶用于常规表达式(正则表达式)，置于两个/之间，表示在字内进行匹配。
\d∶表示匹配一个数字，等价于[0-9]。用于常规表达式(正则表达式)，置于两个/之间。
\D∶表示匹配一个非数字，等价于[^0-9]。用于常规表达式(正则表达式)，置于两个/之间。
\E∶perl语言的转义，终止\L、\U、\Q的功能。用在双引号字符串中。
\l∶perl语言的转义，下个字母小写。用在双引号字符串中。
\L∶perl语言的转义，以下到\E为止的所有字母小写。用在双引号字符串中。
\n∶perl语言的转义，换行。用在双引号字符串中。如果在单引号字符串中，\n照样显示\n。
\Q∶perl语言的转义，所有非字母数字字符加上反斜线。用在双引号字符串中。
\r∶perl语言的转义，回车。用在双引号字符串中。
\s∶表示空白字符(空格、回车、制表符、换行符和换页符等)，等价于[\r\t\n\f]。用于常规表达式(正则表达式)，置于两个/之间。
\S∶表示非空白字符(包括字母、标点符号、控制字符等)，等价于[^\r\t\n\f]。用于常规表达式(正则表达式)，置于两个/之间。
\t∶perl语言的转义，制表符。用在双引号字符串中。
\u∶perl语言的转义，下个字母大写。用在双引号字符串中。
\U∶perl语言的转义，以下到\E为止的所有字母大写。用在双引号字符串中。
\w∶表示单词字符(字母、数字和下划线)，等价于[a-zA-Z0-9_]。用于常规表达式(正则表达式)，置于两个/之间。
\W∶表示非单词字符(除字母、数字和下划线之外的所有字符)，等价于[^a-zA-Z0-9_]。用于常规表达式(正则表达式)，置于两个/之间。
do∶循环语句。
例一∶do while循环语句的应用
$i=1;
do
{
print $i,' ';
$i++;
}while($i<=10);
例二∶do until循环语句的应用
$i=1;
do
{
print $i,' ';
$i++;
}until($i>10);
e∶(1)perl语言替换命令的选项，表示替换一个数值表达式(perl表达式)而不是字符串。(2)浮点数的幂次形式(如-7.25e45)。
eq∶perl语言的比较运算符，等于。用于比较字符串(比较ASCII码)。
for(变量赋初值表达式；循环结束条件表达式；变量增量表达式)∶ 循环语句。
例如∶for循环语句的应用
for($i=0;$i<=10;$i++)
{
print $i,' ';
}
foreach∶ 循环语句。
例∶foreach循环语句的应用(专门处理表和数组的循环)
@list=('a','b','c');
foreach $arg(@list)
{
print $arg,"\n";
}
foreach $i(1..10)
{
print $i,"\n";
}
g∶perl语言替换命令的选项，表示全局替换。
goto∶无条件转移语句，goto后接标识符（命名的标号）。
例如∶goto语句的应用
$i=1;
loop:
print $i++,' ';
if($i<=10)
{
goto loop;
}
ge∶perl语言的比较运算符，大于等于。用于比较字符串(比较ASCII码)。
gt∶perl语言的比较运算符，大于。用于比较字符串(比较ASCII码)。
i∶perl语言替换命令的选项，表示不区分大小写，都替换。
if(表达式)∶ 条件判别语句。表达式为真则执行随后在{ }中的语句，表达式为假，则执行elseif或else后面{ }内的语句。
le∶perl语言的比较运算符，小于等于。用于比较字符串(比较ASCII码)。
lt∶perl语言的比较运算符，小于。用于比较字符串(比较ASCII码)。
ne∶perl语言的比较运算符，不等于。用于比较字符串(比较ASCII码)。
reverse∶perl语言的运算符，使哈希表的关键字和值互换。
例∶%s2=reverse %s1;
s∶替换运算符。
用法∶
1.$变量名=~s/要被替换的字符串/替换的字符串/参数;
2.$_="长字符串";
s/要被替换的字符串/替换的字符串/参数;
tr∶转换运算符。
例如∶$name=~tr/A-Z/a-z/;
将所有大写字符变成小写。
until(表达式)∶ 循环语句。
例如∶until循环语句的应用
until($i>10)
{
print $i,' ';
$i++;
}
while(表达式)∶ 循环语句。若表达式为真，执行随后{ }内的语句。
例如∶while循环语句的应用
while($i<=10)
{
print $i,' ';
$i++;
}
$∶匹配定位模式，表示最后一个字符得匹配，用于常规表达式(正则表达式)，置于两个/之间最后面。
$_/∶ perl运算的缺省变量，可以视为缓冲区。
例如∶foreach(reverse @a){print;}就使用了缺省变量。
+、-、*、/∶ perl语言的运算符——加、减、乘、除。
+∶组合模式，表示一个或多个它前面的字符，等价于{1,}，用于常规表达式(正则表达式)，置于两个/之间。
-∶ 字符列表中间的连接线。
例如∶A-Z，表示A到Z之间的所有字符。
+=、-=、*=、/=、%=、|=、&=、^=、~=、<<=、>>=、**=、.=∶ perl语言的运算符，修改和替代。
.∶(1)perl语言的运算符，位非。(2)perl语言的字符串连接运算符。(3)模式匹配字符，表示除了\n之外的任意字符。用于常规表达式(正则表达式)，置于两个/之间。例如 $name=~s/\W.*//;(找到第一个非单词字符，将从这里开始的到字符串尾的所有字符全部删除。)
..∶perl语言的表运算符，范围运算符。
例一∶@number=0..9;#该语句创建了一个表，从0到9的整数。
例二∶foreach $i(0..9){print "$i\n";}
,∶(1)perl语言的顺序计值符。(2)perl语言的表构造符。
*∶组合模式，表示零个或多个它前面的字符(或字符类)，等价于{0,}，用于常规表达式(正则表达式)，置于两个/之间。
**∶perl语言的乘方运算符。
^∶匹配定位模式，表示第一个字符得匹配，用于常规表达式(正则表达式)，置于两个/之间最前面。
?∶组合模式，表示零个或一个它前面的字符，等价于{0,1}，用于常规表达式(正则表达式)，置于两个/之间。例∶
$str="I xxxxx full";$str=~s/x+/am/g;这时$str="I am full"
$str="I xxxxx full";$str=~s/x+?/am/g;这时$str="I amamamamam full"
!∶perl语言的运算符——负。
!~∶perl语言的字符串运算符，将一个变量绑定到模式匹配，取非前两个运算符比较简单。
!=∶perl语言的比较运算符，不等于。用于比较数值。
&∶perl语言的运算符——位与。
&&∶perl语言的运算符——逻辑与。
%∶perl语言的运算符——模除（取整除后的余数）。
;∶ 分隔符——终止一条语句。
：∶ 分隔符——指明标号语句。
++∶ 运算符——增一。
-- ∶运算符——减一。
= ∶运算符——赋值。
==∶perl语言的比较运算符，等于。用于比较数值。
=~：perl语言的字符串运算符(相配运算符)，将一个变量绑定到模式匹配。
例一∶$var="china";
print($var=~/ina/)?TRUE:FALSE;
该例确定$var变量里是否包含ina模式，输出结果为TRUE。
例二∶$var=~s/\+/ /g;
该例中$var变量中所有+(用\+表示)都被替换成空格。
>=∶perl语言的比较运算符，大于等于。用于比较数值。
> ∶perl语言的比较运算符，大于。用于比较数值。
<=∶perl语言的比较运算符，小于等于。用于比较数值。
<∶perl语言的比较运算符，小于。用于比较数值。
<=>∶perl语言的spaceship运算符。
$a<=>$b;
等价于下面三行∶
if($a<$b){return -1;}
elsif($a==$b){return 0;}
elsif($a>$b){return 1;}
<<∶perl语言的运算符——字位左移。
>>∶perl语言的运算符——字位右移。
| ∶perl语言的运算符，按位或。
| ∶perl语言的模式组合结构，表示“或”，用于常规表达式(正则表达式)，置于两个/之间。
||∶perl语言的运算符——逻辑或。
[ ]∶分隔符——指明数组下标。
( )∶ 分隔符——用于形成表达式、隔离条件表达式，以及指明函数调用和函数参数。
( )∶ 组合模式运算符，用于常规表达式(正则表达式)，置于两个/之间。该运算符并不改变( )之间字符的匹配结果，但可以记住这些字符，后面可以用\和一个数字表示记住的是第几个( )中的字符来进行同样的匹配。如果( )中用?开头，则不会有记忆功能，仅仅是表示优先。
( )∶ 常规表达式(正则表达式)用( )表示从字符串中抽取子字符串，并赋值。
例如∶
$str="January 1,1997";
($m,$d,$y)=$str=~/\s*(\S*)\s+(\d+)\D+(\d{4})/;
跳过字符串前所有空格符；把所有非空格字符赋值给变量$m；跳过空格符；把所有数字赋值给变量$d；跳过所有非数字字符；把接下来的四个数字赋值给变量$y。
{ }∶ 分隔符——用于指明复合语句（分程序）的开始和及结束。
\\∶ perl语言的转义，反斜线。用在单、双引号字符串中。
\'∶ perl语言的转义，单引号。用在单引号字符串中。
\"∶ perl语言的转义，双引号。用在双引号字符串中。
\a∶ perl语言的转义，响铃。用在双引号字符串中。
\b∶perl语言的转义，退格。用在双引号字符串中。
\b∶用于常规表达式(正则表达式)，置于两个/之间，表示在字间进行匹配。
例如∶
$str="the apple there";$str=~s/the/an/g;替换后$str="an apple anre"
$str="the apple there";$str=~s/\bthe\b/an/g;替换后$str="an apple there"
\B∶用于常规表达式(正则表达式)，置于两个/之间，表示在字内进行匹配。
\d∶表示匹配一个数字，等价于[0-9]。用于常规表达式(正则表达式)，置于两个/之间。
\D∶表示匹配一个非数字，等价于[^0-9]。用于常规表达式(正则表达式)，置于两个/之间。
\E∶perl语言的转义，终止\L、\U、\Q的功能。用在双引号字符串中。
\l∶perl语言的转义，下个字母小写。用在双引号字符串中。
\L∶perl语言的转义，以下到\E为止的所有字母小写。用在双引号字符串中。
\n∶perl语言的转义，换行。用在双引号字符串中。如果在单引号字符串中，\n照样显示\n。
\Q∶perl语言的转义，所有非字母数字字符加上反斜线。用在双引号字符串中。
\r∶perl语言的转义，回车。用在双引号字符串中。
\s∶表示空白字符(空格、回车、制表符、换行符和换页符等)，等价于[\r\t\n\f]。用于常规表达式(正则表达式)，置于两个/之间。
\S∶表示非空白字符(包括字母、标点符号、控制字符等)，等价于[^\r\t\n\f]。用于常规表达式(正则表达式)，置于两个/之间。
\t∶perl语言的转义，制表符。用在双引号字符串中。
\u∶perl语言的转义，下个字母大写。用在双引号字符串中。
\U∶perl语言的转义，以下到\E为止的所有字母大写。用在双引号字符串中。
\w∶表示单词字符(字母、数字和下划线)，等价于[a-zA-Z0-9_]。用于常规表达式(正则表达式)，置于两个/之间。
\W∶表示非单词字符(除字母、数字和下划线之外的所有字符)，等价于[^a-zA-Z0-9_]。用于常规表达式(正则表达式)，置于两个/之间。
do∶循环语句。
例一∶do while循环语句的应用
$i=1;
do
{
print $i,' ';
$i++;
}while($i<=10);
例二∶do until循环语句的应用
$i=1;
do
{
print $i,' ';
$i++;
}until($i>10);
e∶(1)perl语言替换命令的选项，表示替换一个数值表达式(perl表达式)而不是字符串。(2)浮点数的幂次形式(如-7.25e45)。
eq∶perl语言的比较运算符，等于。用于比较字符串(比较ASCII码)。
for(变量赋初值表达式；循环结束条件表达式；变量增量表达式)∶ 循环语句。
例如∶for循环语句的应用
for($i=0;$i<=10;$i++)
{
print $i,' ';
}
foreach∶ 循环语句。
例∶foreach循环语句的应用(专门处理表和数组的循环)
@list=('a','b','c');
foreach $arg(@list)
{
print $arg,"\n";
}
foreach $i(1..10)
{
print $i,"\n";
}
g∶perl语言替换命令的选项，表示全局替换。
goto∶无条件转移语句，goto后接标识符（命名的标号）。
例如∶goto语句的应用
$i=1;
loop:
print $i++,' ';
if($i<=10)
{
goto loop;
}
ge∶perl语言的比较运算符，大于等于。用于比较字符串(比较ASCII码)。
gt∶perl语言的比较运算符，大于。用于比较字符串(比较ASCII码)。
i∶perl语言替换命令的选项，表示不区分大小写，都替换。
if(表达式)∶ 条件判别语句。表达式为真则执行随后在{ }中的语句，表达式为假，则执行elseif或else后面{ }内的语句。
le∶perl语言的比较运算符，小于等于。用于比较字符串(比较ASCII码)。
lt∶perl语言的比较运算符，小于。用于比较字符串(比较ASCII码)。
ne∶perl语言的比较运算符，不等于。用于比较字符串(比较ASCII码)。
reverse∶perl语言的运算符，使哈希表的关键字和值互换。
例∶%s2=reverse %s1;
s∶替换运算符。
用法∶
1.$变量名=~s/要被替换的字符串/替换的字符串/参数;
2.$_="长字符串";
s/要被替换的字符串/替换的字符串/参数;
tr∶转换运算符。
例如∶$name=~tr/A-Z/a-z/;
将所有大写字符变成小写。
until(表达式)∶ 循环语句。
例如∶until循环语句的应用
until($i>10)
{
print $i,' ';
$i++;
}
while(表达式)∶ 循环语句。若表达式为真，执行随后{ }内的语句。
例如∶while循环语句的应用
while($i<=10)
{
print $i,' ';
$i++;
}
x∶perl语言的字符串重复运算符。对其左边的运算对象(字符串)按右边的运算对象(数字)指出的份数进行重复拼接。
原文：http://www.newsmth.net/nForum/#!article/Perl/18872
/1 
eetop公众号
创芯大讲堂
创芯人才网