Perl中的特殊符号介绍
$_
俗称perl的老地方，当你的程序中未告知使用哪个参数或者变量时，perl就会自动使用$_中的值，比如
for(1..10){
print;
}
这里print没有指定参数，所以它就会使用$_，那$_里面是什么呢？每次循环$_的值都会变化，所以$_实际上就是1..10这10个值，所以上面的代码打印的结果就是12345678910
$!
当且仅当某个函数调用失败时才会设置该变量，所以经常这样使用这个变量
openFILE," $/ 这是perl中的行分隔符，默认是换行符，可以改变这个变量以便一次读入整个文件，如下 $` 正则表达式匹配变量，代表匹配位置之前的内容 $& 正则表达式匹配变量，代表匹配的内容 $' 正则表达式匹配变量，代表匹配位置之后的内容 来看一个例子，解析xml文件，有如下xml文件，我想获得Code节点的值 运行结果是 stringbeforematched: 其中$`对应 $| 控制对当前选择的输出文件句柄的缓冲，例子待添加。 @_ 传给子程序的参数列表，通常一个子程序是这样获得传给它的参数的。 如果子程序只有一个参数，也可以用shift来获取，此时，shift相当于shift@_ perl常见符号 =>键值对，左键右值 ->引用，相当于java中的【对象.方法名】中的点号 ::表示调用类的一个方法 %散列的标志，定义一个键值对类型的 @数组的标志 $标量的标志 =~匹配的标志 !~不匹配的标志 $!根据上下文返回错误号或者错误串
subtest{
openFILE,"
200
用下面的perl代码来解析
my$str="
200";
if($str=~/(?<=)(\d+)(?=<\/Code>)/){
print"stringbeforematched:$`","\n";
print"matchedstring:$&","\n";
print"stringaftermatched:$'","\n";
}
matchedstring:200
stringaftermatched:，$&对应200，$'对应
subadd{
my($num1,$num2)=@_;
return$num1+$num2;
}
subsquare{
my$num=shift;#sameasmy$num=shift@_
return$num*$num;
}