Perl语言的常用符号

#∶ 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++; 
　}  
  

x∶perl语言的字符串重复运算符。对其左边的运算对象(字符串)按右边的运算对象(数字)指出的份数进行重复拼接。  

原文：http://www.newsmth.net/nForum/#!article/Perl/18872